5 lines
129 B
VB.net
5 lines
129 B
VB.net
|
Dim message, sapi
|
||
|
|
message = "This is an example of speech synthesis."
|
||
|
|
Set sapi = CreateObject("sapi.spvoice")
|
||
|
|
sapi.Speak message
|