Készítette: W7W7 2009. november 30. 16:40:41 - 23666 megtekintés
Szükséges:
Windows
Müvelet:
Csináljatok Egy Új Szöveges Dokumentumot Jobb Klikk ---> Új--->Szöveges Dokumentum Irjátok Bele Hogy Dim message, sapi
message=InputBox("Mondjad!","Kiejtő")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
Mentsétek .vbs Ként (Átirjátok A .txt Formátumot .vbs-re)
Persze Ez Angol
Kész Is Sok Sikert Hozzá!
Amire szükségünk lesz
számítógép
Beszélő program készítése
Csináljunk egy új szöveges dokumentumot, jobb klikk -> Új ->Szöveges Dokumentum Írjuk bele: Dim message, sapi
message=InputBox("Mondjad!","Kiejtő")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
ha akarod én csinálhatok egy olyat hogy ne lépjen ki... majd ugy csinálom meg hogy amikor elmondja a szöveget bedob egy ablakot hogy ujra akarod-e inditani... ezt sztem bárki meg tudja csinálni hozzá aki ért egy kicsit a programozáshoz... majd bemásolom ide a kommentekhez
ha akarod én csinálhatok egy olyat hogy ne lépjen ki... majd ugy csinálom meg hogy amikor elmondja a szöveget bedob egy ablakot hogy ujra akarod-e inditani... ezt sztem bárki meg tudja csinálni hozzá aki ért egy kicsit a programozáshoz... majd bemásolom ide a kommentekhez