tabla de multiplicar. proyect of visual basic

Estos son los codigos que utilizamos para realizarla
Private Sub Command1_Click()
Private Sub command1_clikes()
Dim rea As Long, retorno
For f = 1 To 12
res = Text * f
retorno = cht(13) & Chr(10)
Text2 = Text1 & "x" & f & "=" & res & retorno
Next f


End Sub

Private Sub Command2_Click()
Private Sub comand2_clik()
Text1 = ""
Text2 = ""
Text1.SetFocus


End Sub

EL RELOJ

este trabajo nos permite ver la hora y la fecha en que estamos actualmente i utilizamos los siguientes comandos
Private Sub timer1_timer()
Label2.Caption = Time
Label4.Caption = Date

End Sub


Private Sub Text1_Change()

End Sub

Private Sub label2_click()
Image1.Picture = Picture1.Picture
Label4.Caption = "Kristen Jaymes Stewart (n. 9 de abril de 1990) es una actriz estadounidense de cine y televisión. Es principalmente conocida por su papel en la película basada en el best-seller de Stephenie Meyer, Crepúsculo, donde interpreta a Bella Swan."

End Sub

Private Sub label3_click()
Image1.Picture = Picture2.Picture
Label4.Caption = "Taylor Daniel Lautner (n. Grand Rapids, Míchigan, 11 de febrero de 1992) es un actor estadounidense y experto en artes marciales que ha participado en películas como Las aventuras de Sharkboy y Lavagirl en 3-D, Cheaper by the Dozen 2, Crepúsculo, Luna nueva y Valentine's Day. En 2010 es uno de los veinte actores mejor pagados de Hollywood"

End Sub