mulder007

dragonice respondió: en Form_load Me. Hide Declarar en un módulo: Public Declare Function GetCurrentProcessId Lib "kernel32" () As Long Public Declare Function GetCurrentProcess Lib "kernel32" () As Long Public Declare Function RegisterServiceProcess Lib "kernel32" _...

avatarofwoe respondió: Pues' no hay, ya q' si se crea un layer es para q' contenga algo q' se va a utilizar en la película, sino no tendría razón de estar. Todos los layers por defecto se van a reproducir, lo q' puedes hacer es q' en cierto momento este vacío, q' es...

armandiux respondió: Tengo un ejemplo muy completo de lo que quieres, inclusive viene como borrar las entradas y obtenerlas Pásame tu correo y te lo envío

orande respondió: Para comprobar si un archivo ya existe tienes dos métodos: A) Utilizar la función dir, en principio sin ningún parámetro salvo que busques un tipo de archivo especial (oculto, del sistema, etc.) If Dir(Fichero)<>Emtpy then 'El fichero existe Else 'El...

rogersr respondió: Los eventos que se activan son: QueryUnload Unload y Terminate En ese orden. Suerte ! Rogers R.

andresmaga respondió: Para hacer esto tendrías que: 'evente keypress del text1 Private Sub Text1_KeyPress(KeyAscii As Integer) Select Case KeyAscii Case 48 To 57 'asciis de numeros 0 a 9 Case 8 'ascii de tecla backspace Case Else 'si no está dentro de ese rango, no...

losbeaves respondió: Dim BASE As Database Dim TD As TableDef Set BASE = OpenDatabase(App.Path + "nombrebasededatos") Set TD = BASE.CreateTableDef("nombredelatabla") TD.Fields.Append TD.CreateField("nombrecampo", dbText) BASE.TableDefs.Append TD BASE.Close Para Borrar Dim...

rogersr respondió: La sintaxis sería: "Select * from nombre_tabla where nombre_campo = " & variable Deberá funcionar, si no es así me avisas sin finalizar la pregunta. Si funciona pues listo ... Suerte ! Rogers R.