Sveiki, šodien parādīšu kā izveidot .vbs faila programmu kur Jūs ierakstat tekstu, un to programma izrunā. Tātad, atver notepad un ieraksti šādu tekstu.

 

Dim message, sapi
message=InputBox("teksts","teksts")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

 

Tālāk: File -> Save as... -> 

 

 


Tālāk nospiežat save, un atverat. Parādīsies kautkas šāds: 

 

 

 

Tad ieraksti tekstu, un uzspied OK. To tu dzirdēsi. Iesaku rakstīt anglisku tekstu.

Cerams ka kādam noderēja. Robot

Laboja Robot, labots 3x