Problemas de programación en VB 1. Cree un cuadro de texto en el formulario. Cuando se hace clic en el cuadro de texto, la fecha y la hora actuales se muestran en secuencia. ¿Cómo programar con vb?

End Sub

Private Sub Timer1_Timer()

N estático como entero

N = N + 1

Si N Mod 2 = 1 Entonces Texto1.Texto = Fecha De lo contrario Texto1.Texto = Hora

Fin Sub

Si N Mod 2 = 1, Entonces Texto1.Texto = Fecha, de lo contrario Texto1.Texto = Hora.