Skip to content

Instantly share code, notes, and snippets.

@djprmf
Created August 23, 2016 19:21
Show Gist options
  • Save djprmf/817ac3e4a65ab9ffb1a063358b72b237 to your computer and use it in GitHub Desktop.
Save djprmf/817ac3e4a65ab9ffb1a063358b72b237 to your computer and use it in GitHub Desktop.
Fazer o computador falar com o Bloco de Notas
Dim message, sapi
message=InputBox("O que vou dizer hoje?")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment