За / Next вложените

Сигурен съм, че повече от една възможност, ние трябва да се използват за, вложени са много полезни за много домашна работа.

След това един прост пример, който използва два вложени, за да представлява таблицата за умножение 1-10.

Създаване на нова форма и копирайте следния код в случай на натоварването.

[Код Lang = "vbnet"]
Лично за Sub Form1_Load (ByVal подателя като System.Object, ByVal Е, System.EventArgs) Дръжки MyBase.Load
На Дим таблицата Нова каре
tablas.Multiline = True
tablas.ScrollBars = ScrollBars.Vertical
tablas.Dock = DockStyle.Fill
Me.Controls.Add (таблици)
tablas.Text = "Таблица S & vbCrLf
tablas.Text & = "==========" и vbCrLf & vbCrLf

Защото аз като Integer = 1 Към 10
tablas.Text & за = String.Format ("Таблица {0}", I) и vbCrLf
tablas.Text & = "-------" и vbCrLf
За като цяло число = 1 до 10
tablas.Text & = i.ToString и "х" и a.ToString и "=" & (I * а). ToString vbCrLf
До
И = vbCrLf tablas.Text
До
End Sub

[/ Код]

Сега остава само да стартирате програмата, за да се покаже резултат на формата.