Senin, 23 Januari 2017

Cara membuat komputer Bisa Bicara

hai......Sobat.....

kali Ini Kita Belajar bermain Dengan VBS... Kita akan Membuat Komuter Berbicara sesuai apa yang kita perintahkan/Ketikkan...

Berikut adalah Caranya


  • Bukalah NotePad
  • Tuliskan kalimat berikut 

 Dim msg, sapi

msg = InputBox ( "Apa yang Anda ingin saya katakan?", "agus_a@banpuindo.co.id")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

  • Savelah Dengan Extension VBS.
Berikut Contohnya 


Untuk Contoh Bisa Di Donload di Sini  DOWNLOAD HERE

Tidak ada komentar:

Posting Komentar