4.1.10 Bubles: FOR, FOR EACH, WHILE, WEND, DO LOOP
Tarea: Investiga y representa un ejemplo de un programa donde se ocupa cada sentencia. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Text = "Tabla" T = Val(InputBox("¿Qué tabla quiere conocer?" & vbCrLf & _ "(Introduzca un número de 1 a 10)", "¿Número?")) LabelTabla.Font = New Font("Arial", 10, FontStyle.Bold) LabelTabla.TextAlign = ContentAlignment.MiddleCenter LabelTabla.Text = "TABLA DEL " & T & vbCrLf & vbCrLf For i = 1 To 10 LabelTabla.Text = LabelTabla.Text & T & " * " & i & " = " & T * i & vbCrLf Next i End Sub End Class Sub Reempl() Dim ce...