SlaDER писал(а):А теперь суть проблемы: я не могу через код создать ни одну картинку, вроде ошибок нет и все нормально, но картинка не отображается.
Я и Visible ставил и многое пробовал никак вообще. Только через интерфейс. Но нужно не просто создать одну картинку, а организовать некий их массив (или коллекцию).
Помогите пожалуста.!
Dim npb As System.Windows.Forms.PictureBox
Dim n As Integer, n2 As Integer
For n = 1 To 10
For n2 = 1 To 10
npb = New System.Windows.Forms.PictureBox
Me.Controls.Add(npb)
npb.Visible = True
npb.Left = n * 36
npb.Top = n2 * 36
npb.Width = 36
npb.Height = 36
npb.BorderStyle = BorderStyle.Fixed3D
Next
Next
Private Sub pbClick(ByVal sender As Object,ByVal e As System.EventArgs)
MsgBox CType(sender,PictureBox).Name
End Sub
SlaDER писал(а):npb.Click += new System.EventHandler(pbClick) 'Событие Click
AddHandler npb.Click, pbClick(npb)
Private Function pbClick(ByVal sender As System.Object)
MsgBox("ТестКлик")
Return 1
End Function
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 113