postingan kali ini saya akan share sedikit artikel yang mudah-mudahan bermanfaat bagi agan sekalian.Nah.. sesuai judul diatas, saya akan menjelaskan bagaimana membuat komputer kita berbicara, langsung saja kita praktekan.

Ikuti langkah-langkah berikut:

Caranya

1. buka notepad

2. copy-paste script berikut

Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin anda katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

3. ganti huruf yang berwarna biru dengan kata-kata agan

4. lalu save as menggunakan nama terserah anda dengan akhiran ".vbs" misal saya beri nama speak.vbs, dan pada save as type pilih all files

5. buka program yang sudah di save tadi dan ketikkan kata-kata yang ingin anda dengarkan pada kotak yang tersedia, lalu klik OK, dan dengarkan komputer agan berbicara sesuai kata-kata yang agan ketikkan tadi.

Cara kedua

sebenarnya hampir sama dengan cara pertama namun scriptnya saja yang berbeda.

1. ganti script no2 diatas dengan script berikut

Dim msg, sapi
msg = "Ganti dengan kata-kata anda"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

2. ganti huruf yang berwarna biru dengan kata-kata agan.

3. ulangi cara - cara no 4.

4. jika sudah di save, buka program yang telah kita buat tadi. dan agan akan langsung mendengar komputer agan berbicara sesuai dengan kata-kata yang anda ganti, tanpa melalui input box.

5. Selesai

Semoga cara diatas dapat agan terapkan dengan mudah.