Hallo,
ich möchte den Text eines Labels, welches ich während der Laufzeit erstellt habe, ändern.
Mein Code zum erstellen des Labels ist wie folgt:
Set LabelSMA = Entscheidung_Form.Controls.Add("forms.label.1", "Label_1")
With LabelSMA
.Left = 12
.Top = 18
.Width = 70
.Height = 18
.Caption = "Label 1"
.FontSize = 11
End With
Entscheidung_Form.Label_1.show
Entscheidung_Form.Label_1.Caption = "Test"
Im nächsten Schritt soll er beim Klick auf dem Button in der Userform den Wert des Labels "Label_1" ändern:
Private Sub Berechnen_Click()
Entscheidung_Form.Label_1.Text = "Test"
End Sub
Leider findet er "Label_1" nun nicht.
|