Đọan code sau giúp bạn đọc một câu bằng tiếng Anh.
Đọan code này làm việc với SAPI 4.0 đến 5.1. SAPI thì có trong hầu hết các phiên bản Windows.
Phiên bản SAPI tùy thuộc vào phiên bản Windows/hoặc Office. Các bạn hãy thử đọan mã sau:
Vậy các bạn có thể phát triển thêm tùy theo mục đích của mình.
Vbavn
Nguồn
Đọan code này làm việc với SAPI 4.0 đến 5.1. SAPI thì có trong hầu hết các phiên bản Windows.
Phiên bản SAPI tùy thuộc vào phiên bản Windows/hoặc Office. Các bạn hãy thử đọan mã sau:
Mã:
Sub SpeakText()
Dim oSpVoice As Object
Set oSpVoice = CreateObject("SAPI.SpVoice")
oSpVoice.Speak "Welcome to Scriptorium"
End Sub
Vbavn
Nguồn