Experimenter,
Я создаю элементы (20 лейблов) в цикле вот так:
на onLoad формы пишем:
| Цитата |
'Задаем Размер формы на весь экран Dim ScreenW As Integer = System.Windows.Forms.Screen.PrimaryScreen.Bounds.Width Dim ScreenH As Integer = System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height Me.Size = New Size(ScreenW, ScreenH) Me.Location = New Point(0, 0)
'Строим 15 элементов типа Label в цикле Dim i As Integer For i = 1 To 15
Dim lbl As New Label lbl.Name = String.Format("{0}", "name" & i) Me.Controls.Add(lbl)
With lbl .Text = "Label" & i .Location = New Point(i * 60, i * 60) .Size = New Size(110, 50) .BackColor = Color.Aqua End With
Next
|
|