Sub Main()
For outer = 3 To 6
For inner = 10 To 12
Console.WriteLine("{0}*{1}={2}", outer, inner, outer * inner)
Next inner, outer
Console.ReadLine()
End Sub
Here is another tutorial
Sub Main()
Dim j As Integer
For i As Integer = 1 To 3
j = 0
Do While j < 3
j += 1
For k As Integer = 1 To 3
Dim test1 As Boolean = k = 2
If test1 Then Exit For
Dim test2 As Boolean = i = j
If test2 Then Exit Do
Console.WriteLine(i & ", " & j & ", " & k)
Console.ReadLine()
Next k
Loop
Next i
Console.ReadLine()
No comments:
Post a Comment