Hallo zusammen ,
hab hier ein VBS Code der zeigt mir in einer Form den unten angegebenen Text an wenn ich auf den Button klicke. Möchte diesen Code jetzt so erweitern das bei jedem klick auf den Button ein anderer Text erscheint hab da keine Ahnung wie ich das umsetzen soll mit einer Bedingung oder Schleife oder ???? Mit dem Button starte ich Sub Losung().
Vielen Dank für eine Idee oder einen Lösungsansatz
Option Explicit
Sub Losung()
Dim objFrmLos
Set objFrmLos = Applets("Losung").Forms("Form1").Pages("PAGE1").Controls
objFrmLos("textfeld").Text = " Hier ist der Text drin? "
Set objFrmLos = Nothing
End Sub
hab hier ein VBS Code der zeigt mir in einer Form den unten angegebenen Text an wenn ich auf den Button klicke. Möchte diesen Code jetzt so erweitern das bei jedem klick auf den Button ein anderer Text erscheint hab da keine Ahnung wie ich das umsetzen soll mit einer Bedingung oder Schleife oder ???? Mit dem Button starte ich Sub Losung().
Vielen Dank für eine Idee oder einen Lösungsansatz
Option Explicit
Sub Losung()
Dim objFrmLos
Set objFrmLos = Applets("Losung").Forms("Form1").Pages("PAGE1").Controls
objFrmLos("textfeld").Text = " Hier ist der Text drin? "
Set objFrmLos = Nothing
End Sub