For / Next nested

I'm sure more than one opportunity we have to use For's nested, are very useful for a lot of homework.

Then I show a simple example that uses two nested For to represent the multiplication tables from one to ten.

Create a new form and copy the following code in the load event.

[Code lang = "vbnet"]
Private Sub Form1_Load (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim table As New TextBox
tablas.Multiline = True
tablas.ScrollBars = ScrollBars.Vertical
tablas.Dock = DockStyle.Fill
Me.Controls.Add (tables)
tablas.Text = "Table S" & vbCrLf
tablas.Text & = "==========" & vbCrLf & vbCrLf

For i As Integer = 1 To 10
tablas.Text & = String.Format ("Table {0}", i) & vbCrLf
tablas.Text & = "-------" & vbCrLf
For a As Integer = 1 To 10
tablas.Text & = i.ToString & "x" & a.ToString & "=" & (i * a). ToString & vbCrLf
Next
& = vbCrLf tablas.Text
Next
End Sub

[/ Code]

Now only remains to run the program to display the result on the form.