Diberdayakan oleh Blogger.
RSS

Komputer Berbicara

copy text di bawa ini


Dim msg, sapi
msg = "Ubah speak kata2"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

kemudian buka notepad dan save as mypc.vbs

  • Digg
  • Del.icio.us
  • StumbleUpon
  • Reddit
  • RSS

0 komentar:

Posting Komentar

Catatan: Hanya anggota dari blog ini yang dapat mengirim komentar.