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 Diese Seite wurde bereits 21.939 mal aufgerufen. |
Neu! sevEingabe 3.0 Einfach stark! Ein einziges Eingabe-Control für alle benötigten Eingabetypen und -formate, inkl. Kalender-, Taschenrechner und Floskelfunktion, mehrspaltige ComboBox mit DB-Anbindung, ImageComboBox u.v.m. Buchempfehlung Tipp des Monats Mai 2024 Hermann Röttger Wochentage eines Datumsbereichs ermitteln Wochentage eines Datumsbereichs ermitteln, optional mit Feiertagsberechnung Access-Tools Vol.1 Über 400 MByte Inhalt Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB |
||||||||||
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. |