Өөрийн бичсэн текстээ хэрхэн уншуулах вэ?

Бид бүхэн зарим нэг англи үгийг хэрхэн дуудхаа мэдэхгүй бол ямар нэг толь бичиг ашигладаг шүү дээ. Тэгвэл энд заах гэж буй зүйл бол заавал толь бичиг ашиглахгүйгээр дуудах гэж буй текстээ бичээд OK дархад шууд уншигдах хэрэгсэлийг хэрхэн бүтээх тухай байх болно.

Алхамууд

1.Notepad програмыг нээнэ.
2.Дараах кодыг хуулаад буулга.

Dim message, sapi
message=InputBox("Хэлэх vгээ оруулна уу?","Хэлээд eгнee")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message

3.Дурын нэртэй .vbs өргөтгөлтэйгээр хадгална.
4.Хадгалсан файлаа ажиллуулаад текст бичих хэсэгт ямар нэг зүйл бичээд OK дарна. Ингээд л гүйцээ.