Étape 2: Le code
Il s’agit de tout le code dont vous avez besoin son très court
Dim message, sapi
message = InputBox("What do you want me to say?","Speak to Me") Set sapi=CreateObject("sapi.spvoice") sapi. Parler de message
Notez qu’il est calme et se referme après chaque utilisation