Make your PC say what u want using Notepad

**عبدالقدوس** · 03-07-10, 09:29 AM

کافی پرانا ہے لیکن ہے مزیدار
مندرجہ ذیل کوڈ کو نوٹ پیڈ میں لکھ کر vbs. کی ایکٹنشن کے ساتھ محفوظ کریں

کوڈ:

Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg

اس کے بعد ڈبل کلک کریں اور مزے کریں

**shafresha** · 03-07-10, 10:10 AM

03-07-10, 09:29 AM	#1
عبدالقدوس Administrator تاریخ شمولیت: May 2007 مقام: گوگل عمر: 24 مراسلات: 25,294 کمائي: 2,346,364 شکریہ: 18,821 12,630 مراسلہ میں 29,416 بارشکریہ ادا کیا گیا	Make your PC say what u want using Notepad Make your PC say what u want using Notepad کافی پرانا ہے لیکن ہے مزیدار مندرجہ ذیل کوڈ کو نوٹ پیڈ میں لکھ کر vbs. کی ایکٹنشن کے ساتھ محفوظ کریں کوڈ: Dim msg, sapi msg=InputBox("Enter your text","Talk it") Set sapi=CreateObject("sapi.spvoice") sapi.Speak msg اس کے بعد ڈبل کلک کریں اور مزے کریں Share Share this post on Digg Del.icio.us Technorati Twitter Facebook!

03-07-10, 10:10 AM	#2
shafresha ناظم اعلی تاریخ شمولیت: Jun 2008 مقام: کراچی عمر: 40 مراسلات: 9,663 کمائي: 254,788 شکریہ: 53,125 7,706 مراسلہ میں 22,602 بارشکریہ ادا کیا گیا	آپ کا کمپیوٹر کرے آ پ سے بات! Share Share this post on Digg Del.icio.us Technorati Twitter Facebook!

موضوع کے اختیارات
Show Printable Version Email this Page
ظاہری انداز	Rate This Thread
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode	Rate This Thread:

Similar Threads
موضوع	موضوع شروع کیا	فورم	جوابات	آخری مراسلہ
Make CD Bootable	wajee	سوفٹ ویرز کے بارے میں آپکی رائے اور سوفٹ ویر کی درخواست	8	20-12-11 08:22 PM
How to make a Web Server? (MUST SEE)	محمدخلیل	ویب ڈیزائینگ	2	07-01-11 03:57 PM
WHAT TEACHERS MAKE	ابو عمار	Chit Chat	0	12-08-09 05:26 PM
Notepad++	عبدالقدوس	سوفٹ ویرز کے بارے میں آپکی رائے اور سوفٹ ویر کی درخواست	3	19-07-07 06:39 AM

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)