VISUAL BASIC

PARA UTILIZAR VISUAL BASIC PUEDES HACER ESTO

Private Sub Command1_Click()Dim resultado As Long, retornoFor f = 1 To 20resultado = Text1 * fretorno = Chr(13) & Chr(10)Text2 = Text2 & Text1 & "x" & f & "=" & resultado & retornoNext fEnd Sub
Private Sub Command2_Click()Text1 = " "Text2 = " "Text1.SetFocusEnd Sub
Private Sub Command3_Click()If MsgBox("por favor confirma si ya te quieres salir del programa", vbYesNo, "¿quieres salirte del programa ?") = vbYes ThenEndElseCancel = 1End IfEnd Sub



End Sub
Private Sub Text1_Change()
End Sub

COMO HACER UN PROYECTO EN VISUAL BASIC

PARA HACER ESTO DEBES HACER DOBLE CLICK EN EL 2º LABEL Y ESCRIBIR ESTO

Private Sub Label2_Click()
Label2.Caption = Time
End Sub
PARA HECER ESTO DEBES HACER DOLE CLICK EN 4º LABEL Y ESCRIBIR ESTO

Private Sub Label4_Click()
Label4.Caption = Date
End Sub