Negrito Novato

[El negrito]

GRACIAS AMIGO.
Dos mas:
1) como hago para mostrar la hora en forma constante en un form y la fecha? yo hice asi, pero me muestra solo cuando lanza el form y no se actualiza:

Private Sub Form_Load()
Label15 = Format(Now)
End Sub

2) La expresion If then etc etc, puedo poner una dentro de otra? ej.

If text1.text = valor then
if text2.text = meses then
text3.text = edad
else
text4.text = sexo
end if
end if

Es un ejemplo cualquiera, tenes laguna idea de como usar una expresion de esta forma? gracias de nuevo
El negrito


Agradezco tu ayuda, El negrito