Sapi yang dapat berbicara di VB 2008

wah judulnya mustahil yah, sapi kok dapat berbicara.
yah disini ada object yang bernama sapi.spvoice
jadi object ini untuk merubah teks menjadi suara seperti kita berbicara
tapi gak seperti sapi juga yah bicaranya hanya "Moooo....." :D

yasudah langsung saja deh buka VB 2008nya
dan sekarang buat 1 textboxt dan satu button untuk namenya gak usah diganti
trus pada textboxt ubah property multiline menjadi true dan property scrolbar menjadi vertical

design seperti gambar dibawah ini

doubleklik button1 dan kopi pastekan koding simple dibawah ini

        Dim sapi
        Dim kata As String = ""
        kata = TextBox1.Text
        sapi = CreateObject("sapi.spvoice")
        sapi.speak(kata)

 Dan jalankan dengan tekan F5

Selamat mencoba... :D