Get This

Monday, December 19, 2011

បម្លែងការសរសេរទៅជាសម្លេងដោយប្រើ Notepad


វាជាគន្លឹះដ៏ពិសេសមួយក្នុងការប្រើកម្មវិធី Notepad ដែលមានស្រាប់ក្នុង Window ដើម្បីបម្លែង
រាល់ការសរសេររបស់អ្នកទៅជាសម្លេង។វាសាមញ្ញហើយដំណើរការបានគ្រប់ Window ទាំងអស់
របស់ Microsoft ។
ជាដំបូងសូមបើកម្មវិធី Notepad រួចចម្លងកូដទាំងអស់នេះទៅដាក់ក្នុង Notepad របស់អ្នក


Dim message, sapi
 message=InputBox("What do you want me to say?","Speak to Me")
 Set sapi=CreateObject("sapi.spvoice")
 sapi.Speak message 
 
 
បន្ទាប់មកនៅត្រង់ Save as type សូមយក All file ចំណែកឈ្មោះសូមដាក់ Speak.vbs ឬអ្វី
ក៏បានឱ្យតែមានកន្ទុយជា .vbs។

ឥឡូវសូមបើក Speak.vbs រួចសរសេរអ្វីដែលអ្នកចង់ឱ្យវាអានរួចចុច Ok។
 

comments

No comments:

IP

ចុច Play ដើម្បីស្ដាប់ការផ្សាយផ្ទាល់ពី VOY FM 105.25 Mhz

Note: If you cannot hear, please install Adobe Flash Player. Visit Our Website