मजेदार ट्रिक
आज मैं आपके लिए एक ऍसी ट्रिक लेकर आया हू जिससे आपका कंप्यूटर बोलने लगेगा यानि आप जो भी लिखेंगे वो आपको बोलकर बताएगा की आपने क्या लिखा है इसके लिए बस आपको निचे दिए हुवे कोड को नोडपेड में कोपी करना है और उसे किसी भी नाम के आगे .vbs लगा कर सेव करना है यानि अगर आप saeed नाम से सेव करते हो तो आपको के आगे saeed.vbs लगाना है जब ये फाइल सेव हो जाये तो इसे डबल क्लीक करके ओपन करे और बिच में दी गई जगह पर कुछ भी लिख कर ओके करे फिर देखो आपका कंप्यूटर केसे बोलता है !
ये है वो कोड जो आपको Notepad में कॉपी करके सेव करना है
Dim msg, sapi<br /> msg=InputBox("Enter your text","Talk it")<br /> Set sapi=CreateObject("sapi.spvoice")<br /> sapi.Speak msg
