Non differisce molto da come la creavo in VB6.
Mi pare di ricordare che anche in VB6 si poteva creare con Me.Controls.Add.
Io la creavo con Load. Comunque il risultato è ottimo anche qui.
Posso fare riferimento a uno degli elementi della matrice, come evidenziato dal codice dell'evento Form_Click che mi sposta il secondo elemento della matrice a destra, e che ho appunto creato come prova della possibilità di accedere a un preciso elemento a scelta della matrice.
Public Class Form1 Dim btn(3) As Button Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load For n = 0 To 2 btn(n) = New Button Me.Controls.Add(btn(n)) On Error Resume Next btn(n).Top = btn(n - 1).Top + btn(n).Height Next End Sub Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click btn(1).Left = btn(1).Left + 200 End Sub End Class
Nessun commento:
Posta un commento