luponx

Este ejemplo en la linea donde esta escrito la instrucción Me.Comando6.Enabled = False EJ: Private Sub Comando5_Click() On Error GoTo Err_Comando5_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = "Formulario1" DoCmd.OpenForm...

Haber si entendí la pregunta: Al usar SQL standard sería una sentencia como esta SELECT Codigo, Producto FROM Productos ORDER BY Codigo, Producto; ¿Sería algo como ésto lo que quieres hacer, pero en Visual Basic?

Respeto de crear carpetas ( folder ): If Len(Dir("c:\Ejemplo", vbDirectory)) = 0 Then MkDir "c:\Ejemplo" vv = MsgBox("Carpeta creada", vbOKCancel) Else vv = MsgBox("Carpeta existente", vbOKCancel) End If Lo anterior sería un ejemplo para crear una...

Dim tt, tt2 As String Option Compare Database ------------------------------------- Private Sub Texto0_Change() tt = Texto0.Text tt2 = tt2 + Mid(tt, Len(tt), 1) End Sub Una respuesta sería lo siguiente: Tt2 sería la variable que acumula carácter por...

A primera vista puede ser un error de sintaxis ( _&), pero también en la comparación de los tipos de datos. De todas formas voy a ejecutar el ejemplo y te respondo más detalladamente. ¿Qué version de access usas?

¿Cómo hago para armar una planilla en la cual el programa solo me deje ingresar números de 2 cifras? Probé con formato, incluso uno personalizado, pero al poner números de 1 o 3 cifras, el programa los acepta igual Respecto de esa pregunta: la celda...

Hice las tablas ejemplos que pides y funciona. Haber si entendí: ALUMNOSMATRICULASGRUPOS Idmatricula Idalumno---->idalumno Idgrupoidgrupo Arrastras idalumno(ALUMNOS) hasta idalumno (MATRICULA) y exiges integridad referencial. Arrastras...

Comienza por definir Ingeniería de Software y después la OO ( orientación a objetos). Te propongo eso para que investigues un poquito más. Hay mucha información respecto de eso por ej: http://definicion.de/ingenieria-de-software/

Esto permite validar la entrada de números del RUN **************************************************************** Private Sub Run_KeyPress(KeyAscii As Integer) Dim Caracteres As String Dim Contador As Integer Dim respuesta As String If KeyAscii >=...