For / Next verschachtelte

Ich bin sicher mehr als eine Gelegenheit müssen wir für den Aufruf zu verwenden, sind sehr nützlich für eine Menge Hausaufgaben.

Dann habe ich ein einfaches Beispiel zeigen, die verwendet zwei geschachtelte Für die Multiplikation Tabellen 1 bis 10 darstellen.

Ein neues Formular erstellen und kopieren Sie den folgenden Code im Load-Ereignis.

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

For i As Integer = 1 bis 10
tablas.Text & = String.Format ("Tabelle {0}", i) & vbCrLf
tablas.Text & = "-------" & vbCrLf
Für ein As Integer = 1 bis 10
tablas.Text & = & i.ToString "x" & a.ToString & "=" & (i * a). ToString & vbCrLf
Nächste
& = VbCrLf tablas.Text
Nächste
End Sub

[/ Code]

Jetzt bleibt nur noch um das Programm auszuführen, um das Ergebnis auf dem Formular anzuzeigen.