Dim message, sapi
message=InputBox("Mit olvassak fel?","speaks")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
Copy-Paste txt - save as ****.vbs
A következő címkéjű bejegyzések mutatása: vbs. Összes bejegyzés megjelenítése
A következő címkéjű bejegyzések mutatása: vbs. Összes bejegyzés megjelenítése
speaks
Katt Ide
text1=msgbox("Na mi van, ide kattintottál!", 52, "Hiba vazzeg !")
text1=msgbox("Na de ejnye bejnye!", 32, "Hüha !")
text1=msgbox("Kiváncsi vagyok!", 16, "Nane !")
text1=msgbox("És mikor lesz vége?", 64, "Hiba vazzeg !")
Copy-Paste txt - save as ****.vbs
1 2 3 4 5 16 32 48 64
Feliratkozás:
Bejegyzések (Atom)
