Dynamischer Zugriff auf Steuerelemente VB-Version:  VB2005, VB2008
	Views:  22.453

Manchmal möchte man dynamisch auf Steuerelemente zugreifen, indem man einen Namen und einen Index angibt.

Hier ein Beispielcode aus dem Forum:

Auf einer Form befindet sich ein Label (Label1) dem die Beschriftung sowie die Schriftfarbe beim Laden der Form zugewiesen wird. Hierbei wird der Datentyp Integer explizit nach String umgewandelt, damit das Ganze auch bei eingeschalteter Option "Option Strict On" funktioniert:

Public Class Form1
 
  Private Sub Form1_Load(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles MyBase.Load
 
    Dim i As Integer = 1 	' Variable, die den Index darstellt
 
    ' dem Label einen Text zuweisen
    Me.Controls("Label" & i.ToString).Text = "Hallo"
 
    ' Text farbig darstellen
    Me.Controls("Label" & i.ToString).ForeColor = Color.Red
  End Sub
 
End Class

Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.