Programación General > Visual Basic 6.0 e inferiores

 Duda Con El Text.box

<< < (2/2)

F_Tanori:
Aqui nadie molesta, mientras no se pidan tareas :P


Lo que se ha opindado aqui es muy cierto  :smartass:  pero hay varias formas de hacerlo y aqui hay otra

no es text.box es Textbox (sin el punto)


puedes establecer en un modo la ventana por ejemplo en ModoCaptura o ModoEdicion puede ser una variable 'global en el form' (de instancia) entonces cuando se va capturar la activas ejemplo


--- Código: Text --- Private Sub cmdNvo_Click()    ModoCaptura=TrueEnd Sub  

si quieres validar cada textbox yo te recomiendo el evento Validate que es primero en el orden de ejecucion que tambien acertadamente te comenta Abel (LostFocus)

Para que este evento 'funcione' el textbox debe de tener la propiedad CausesValidation en True


entonces seria algo asi


--- Citar ---Private Sub Text1_Validate(Cancel As Boolean)
  If  trim(Me.Text1.Text) = "1" Then
      MsgBox "Cualquier dato excepto el 1"
      Cancel = True
  End If
End Sub
--- Fin de la cita ---


Establecer la variable Cancel en Verdadero indica que  no paso la validacion esto impedira que el textbox pierda el enfoque

Claro que es conveniente tener el boton para salvar o aceptar los cambios  y al guardar estarias la informacion iria "validada" como lo da a entender ArKantos

no creo que quieras estar guardando cada vez que se cambia de textbox o que modifica uno :S

Si el usuario se arrepiente y cierra la ventana, no importa si el control pierde el enfoque o no al fin y al cabo si cierra la ventana es que no quizo hacer cambios :P

y lo pudieras validar asi



--- Citar ---Private Sub Form_Unload(Cancel As Integer)
    If ModoCaptura Then
        If MsgBox("¿Desea salir de la captura?", vbQuestion + vbYesNo) = vbNo Then
            Cancel = 1
        End If
    End If
End Sub
--- Fin de la cita ---


Saludos

noldo:
Hola de otra vez, bueno primero que todo dar gracias a todos por la respuesta y en especial por las palabras del amigo "abelsql3000" y "F_Tanori" cuando me intan a seguir consultando, Vale por eso y se los agradezco. Con respecto al problema igual gracias me funcionó, y lo ingresé en un Comand Button, llamado Ingresar

Navegación

[0] Índice de Mensajes

[*] Página Anterior