Ahora empezaremos profuncizando un poco en algunos eventos y métodos que estaremos usando:
1. Initialize.
2. Refresh.
3. Load.
Refresh es un método, es decir, es ordenado por el usuario, no es automático. Es bueno hacer que en cada botón exista este método, sirve para actualizar la información que esta siendo presentada.
Cuando se ejecuta un formulario ocurren dos eventos: Load y Initialize.
Load ocurre cuando el formulario es cargdo de la memoria de la PC, todos los objetos tienen un evento Load.
Initialize se ocupa para establecer valores predeterminados a los objetos y para inicializar variables. Como ejemplo, en la tarea donde teniamos que habilitar las TextBox porque aparecían deshabilitadas por default, las pusimos deshabilitadas con la propiedad Enabled=False en la ventana de propiedades; pero si lo hubieramos querido hacer con código, se daba doble click en el formulario, y luego buscamos el código para el evento "initialize", eso esta en la lista de arriba a la derecha. Entonces entre
Private Sub Form_Initialize()
End Sub
ahi en medio se pone Text1.Enabled=False y asi con todos los que queramos deshabilitar al principio.
Private Sub y End Sub marcan el ninicio y final respectivamente de un procedimiento.
TAREA 2:
Hacer en el código de la TAREA 1 lo siquiente:
1. Aparezcan deshabilitadas las 5 casillas desde el inicio, pero hacerlo con código, no con la ventana de propiedades.
2. Se habiliten solo las primeras tres de las cinco casillas al dar click en "Nuevo".
3. Borrar la información que haya en las 5 casillas al dar click en "Nuevo"
3. Se ponga el cursor sobre la casilla de texto 1(Text1) al habilitar las casillas con "Nuevo".
RESOLUCION:
Private Sub Command1_Click()
Text1.Enabled = True
Text2.Enabled = True
Text3.Enabled = True
Text1.SetFocus
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
End Sub
Private Sub Form_Initialize()
Text1.Enabled = False
Text2.Enabled = False
Text3.Enabled = False
Text4.Enabled = False
Text5.Enabled = False
End Sub
Text1.SetFocus lo que hace es que cuando se da click al botón 1, automáticamente situa el cursor en la casilla de texto 1.
Text1.Text = "" lo que hace es que cuando se da click al botón 1, borre lo que sea que este escrito en la casilla uno. Las comillas significan espacio en blanco.
FIN DE CLASE IV
lunes, 9 de junio de 2008
Suscribirse a:
Enviar comentarios (Atom)

No hay comentarios:
Publicar un comentario