JavascriptProva

sabato 11 agosto 2012

Matrice di controlli in VB.NET

Ho trovato il modo di creare una matrice di controlli in VB.NRT.
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