Dim message, sapi
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
message=InputBox("What do you want me to say?","Speak to Me")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
- Copy above code
- Open notepad and paste the code
- Save file any name with the extension of .vbs
- Double click the saved file
- Type a text in box and click OK
See video tutorial.... please like, share and subscribe
2 comments:
christian louboutin sale
colts jerseys
jacksonville jaguars jersey
ugg boots
ugg outlet
nike store
jordan 4
nike huarache
seahawks jersey
skechers shoes
canada goose uk
kate spade handbags
coach outlet
salomon boots
ralph lauren outlet
ralph lauren shirts
supreme clothing
coach outlet
Post a comment