Cách làm cho máy tính biết nói với Notepad

[Thandieu2]

Cách làm cho máy tính biết nói với Notepad.
​

1) Mở Notepad. ở Start/Programs/Accessoires.

2 ) Chép những dòng sau và dán vào notepad mới vừa mở ra.

Dim userInput

userInput = InputBox("Write a message for me to say")

Set Sapi = Wscript.CreateObject("SAPI.SpVoice")

Sapi.speak userInput

3) Sau đó, bạn save as với all files, bằng một tên bất kỳ tuỳ thích nhưng buộc phải có đuôi .vbs


4) Giờ, bạn thử click đôi vào file vbs mới làm ra đấy để mở ra, bạn sẽ thấy một hộp thoại nhỏ giúp điền vào bất kỳ dòng chữ nào.

​

5) Khi bạn đánh thử một dòng chữ tiếng Anh nào đó và ấn tiếp OK .

6) Nó sẽ bắt đầu đọc ra những gì bạn đã viết vào (chỉ tiếng Anh mà thôi, tiếng việt chưa được).

Thật thú vị phải không các bạn. Bài này mình sưu tầm được đó. hehe.