READING TEXT SOFTWARE

Pada awal nya software ini dibuat untuk membantu orang yang buta dalam menggunakan komputer tapi sekarang sudah di gunakan untuk umum.
Nice langsung aja ini cara pembuatannya==>


source code nya==>>

Private Sub Cmdbaca_Click()
Call BacaTeks(Text1.Text)
End Sub

PENJELASAN: source diatas untuk tombol baca

Public Sub BacaTeks(ByVal TextString As String)
Set SuaraTeks = CreateObject("SAPI.SpVoice")
Call SuaraTeks.Speak(TextString, SPF_DEFAULT)
End Sub

penjelasan:
source code diatas untuk memanggil fungsi pengeluaran suara dari komputer.

semoga berguna AL|
by_NewBie O_