কীবোর্ডের নৃত্য !

কীবোর্ডের নৃত্য দেখেছেন কখনও? না দেখে থাকলে আজ দেখবেন। চমকপ্রদ এই ব্যাপারটি উপভোগ করার জন্য আপনাকে সহায়তা করবে ছোট্ট দু'টি প্রোগ্রাম।

নিচে দেওয়া প্রোগ্রামগুলো দু'টি ভিন্ন প্রোগ্রাম।

প্রোগ্রাম-১

Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
wshshell.sendkeys "{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop

প্রোগ্রাম-২

Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 200
wshshell.sendkeys "{CAPSLOCK}"
wscript.sleep 100
wshshell.sendkeys "{NUMLOCK}"
wscript.sleep 50
wshshell.sendkeys "{SCROLLLOCK}"
loop

এখান থেকে যেকোন একটি কপি করে নোটপ্যাড খুলে তাতে পেষ্ট করুন। সেভ করার সময় যে কোন নাম দিয়ে এক্সটেনশন দিন vbs অর্থাৎ নামটি হবে এরকম name.vbs । সেভ করা হয়ে গেলে তাতে ডাবল ক্লিক করুন আর মজা দেখুন। বন্ধ করতে হলে Ctrl+Alt+Delete চেপে টাস্ক ম্যানেজার খুলুন। এবার Processes ট্যাব থেকে wscript.exe নামের ফাইলটি খুঁজে বের করে Kill করুন।

(বিঃদ্রঃ   এন্টিভাইরাস প্রোগ্রাম দু'টিকে পিসির জন্য থ্রেট মনে করতে পারে। যদি করে তাহলে ভাইরাস গার্ডটি সাময়িকভাবে বন্ধ করে দিন। ভয় নেই এগুলো কোন ক্ষতি করবে না)

Level 0

আমি m.h.mithu। বিশ্বের সর্ববৃহৎ বিজ্ঞান ও প্রযুক্তির সৌশল নেটওয়ার্ক - টেকটিউনস এ আমি 15 বছর 1 মাস যাবৎ যুক্ত আছি। টেকটিউনস আমি এ পর্যন্ত 54 টি টিউন ও 45 টি টিউমেন্ট করেছি। টেকটিউনসে আমার 0 ফলোয়ার আছে এবং আমি টেকটিউনসে 0 টিউনারকে ফলো করি।


টিউনস


আরও টিউনস


টিউনারের আরও টিউনস


টিউমেন্টস

জটিল তো, প্রথমে চমকে গিয়েছিলাম।

Level 0

হা হা হা

আমি বূজটে পারী নাই ।। পরে বুজলাম…। আমার এই লেখা পরে আপনারাও বুজতে পারছেন

খুবই ভাল লাগল

ভাল লেগেছে তবে প্রথমে তো ভয় ই পেয়েগিয়েছিলাম। ধন্যবাদ।

Level 0

মজার বটে।

সুন্দর!!!
program দুিট েকান language এ বানান। জানােবন plz.

ধন্যবাদ

জটিল একটা জিনিশ… ধন্যবাদ… 😉

hello ভাই, আমার কীবোর্ডের ১-৪ ও ৭-৯ কীপ্যাড কাজ করছে না। আমি কিন্তু নিউমেরিক কি এর কথা বলছি না। অন্যান্য ইংরেজি লেখার উপরে যে সব সংখ্যা থাকে তার কথা বলছি।