Stap 2: De Code
Dim tekst, sapi
tekst = inputbox ("enter tekst worden uitgesproken")
Set sapi=Createobject("sapi.spvoice")
SAPI. Tekst laten uitspreken
Wat betekent dit nu?
-Toen u dit script maakt het eerst een invoervak die is erkend als "tekst".
-Vervolgens stelt het script de sapi dus we nu gebruiken kunnen (dit wat zal spreken)
-Tot slot het neemt wat is ingevoerd in het invoervak 'tekst' en stuurt het naar de sapi worden uitgesproken.