... Load frmTmp
Unload frmTmp
Einfach eine neue Form die Visible = false ist
In deinem Fall also
Private Sub Anzeige()
lbl_Zubereitung.Caption = "Beispieltext" 'Erst TEXT ANZEIGEN
Load frmTmp
Unload frmTmp
sprachausgabe (lbl_Zubereitung.Caption) 'Dann TEXT VORLESEN
End Sub
Private Sub sprachausgabe(text As String)
Dim voice ...
Verfasst am: 17.11.2009, 21:45 Aufrufe: 815
Kann mir da jemand einen klugen Tipp geben?
Gruß und vielen Dank vorab!!
Magico777
___________________
Private Sub Anzeige()
lbl_Zubereitung = "Beispieltext" 'Erst TEXT ANZEIGEN
sprachausgabe (lbl_Zubereitung.Caption) 'Dann TEXT VORLESEN
End Sub
Private Sub sprachausgabe(text As String)
Dim voice As Variant
Set voice = Crea ...