.VBS দিয়ে একটু মজা একটু শিখা…..(না দেখলে বিরাট মিস)

30
661
.VBS দিয়ে একটু মজা একটু শিখা.....(না দেখলে বিরাট মিস)

মুক্ত বিহঙ্গ (রিজভী)™

আমি ২০১১ সালে ডিপ্লোমা ইন-ইলেকট্রিক্যাল ইঞ্জিনিয়ারিং কমপ্লিট করেছি এখন EEE তে বিএসসি ইঞ্জিনিয়ারিং এ অধ্যায়নরত আছি, আর শুরু হতে টিউনারপেইজের সাথে আছি আশা করি ভবিষ্যৎও থাকব ইনশাআল্লাহ,আমার ব্লগ সাইট
.VBS দিয়ে একটু মজা একটু শিখা.....(না দেখলে বিরাট মিস)
বিসমিল্লাহির রহমানির রাহিম .VBS দিয়ে একটু মজা একটু শিখা.....(না দেখলে বিরাট মিস)সবাইকে জানায় আমার আন্তরিক শুবেচ্ছা ও অভিনন্দন সবাই কেমন আছেন আসাকরি ভাল আছেন আমিও আল্লাহর রহমতে অনেক ভাল আছি আজকে মনস্থ করেছি .VBS (VBS=Visual Basic Script)নিয়ে কিছু লিখব তাই বসে পড়লাম আসা করি আমার এই টিউন থেকে আপনারা সামান্য হলে ও ভেজুয়্যাল বেসিক স্ক্রিপট সমবন্ধে ধারণা পাবেন……

.VBS দিয়ে একটু মজা একটু শিখা.....(না দেখলে বিরাট মিস).VBS দিয়ে একটু মজা একটু শিখা.....(না দেখলে বিরাট মিস)আপনার কম্পিউটারে নোটপেড খোলে নিচের কোডটি পেস্ট করুন


A=msgbox(“do you want to start the program?”,vbyesno+vbquestion)
If a=vbyes then
B=inputbox(“first of all, what’s your name?”)
Msgbox “oh, so your name is ” & b
C=msgbox(“that’s a nice name. do you like your name?”,vbyesno)
If c=vbno then
Msgbox “well, it’s not your fault, is it?”
Else
Msgbox “that’s good.”
End if
D=inputbox(“what’s your age?”)
If d > 17 then
E=msgbox(“do you have a car?”,vbyesno)
If e=vbyes then
Msgbox “cool!”
Else
Msgbox “ok, don’t cry…”
End if
Else
Msgbox “well then, you’ll have to wait a little until you’re able to drive…”
End if
Msgbox “well then, it was nice to talk to you, ” & b & “!”
Msgbox “goodbye!”
End if

এবং এটাকে .vbs নামে সেভ করুন এবার সেভ করা ফাইলটি খুলুন…

.VBS দিয়ে একটু মজা একটু শিখা.....(না দেখলে বিরাট মিস)

এবার এটার বিস্তারিত খুটিনাটি
এখানে দেখুন প্রথম লাইনটি আপনি যদি পরিবর্তন করতে চান তাহলে do you want to start the program?” এই লেখাটি পরিবর্তন করতে পারবেন আর এখানে আরকেটি কথা এখানে Msgbox দেওয়ার অর্থ হল বাক্স আকারে লেখাটি দেখাবে,inputbox দেয়ার অর্থ হল আপনি কিছু ইনপুট করবেন তার জন্য সে একটি খালি বাক্সসহ আপনাকে মেসেজ সো করবে,আর এখানে A B C D এগুলো দেয়া হয়েছে সিরিয়ালি আপনাকে মেসেজ সো করবে একটার পর একটা,আর প্রথম লাইনে vbyesno+vbquestion এই লেখাটি আছে এটা পরিবর্তন করা যাবে না পরিবর্তন করলে আপনার প্রোগ্রাম রান করবে না এখানে এই কোডটি বলতে চাচ্ছে যে লেখাটি দেখাবে তার সাথে yes এবং no সহ এটি একটি প্রশ্ন আকার ধারণ করবে…
আবার এখানে If এবং else দেয়া আছে এখানে
  if
  D=inputbox(“what’s your age?”)
  If d > 17 then
লেখাটি আছে এখানে বলা হয়েছে আপনার বয়স কত তার সাথে শর্ত দিয়ে দিয়েছে যদি ১৭ বছরের নিছে হয় এক শর্ত ১৭ বছরের উপরে হরে আরেক শর্ত, হাঁ এবার বলি ১৭ বছরের নিচে হলে আপনাকে পর পর এই তিনটি বার্তা দেখাবে “well then, you’ll have to wait a little until you’re able to drive…”
“well then, it was nice to talk to you” “goodbye!” আর যদি ১৭ বছরে উপরে হয় “do you have a car” এটি দেখাবে তখন yes দিলে দেখাবে  আর no দিলে দেখাবে ok, don’t cry এরপর পর পর দুটি বার্তা দেখাবে  it was nice to talk to you, এবং “goodbye!”আবার একি ভাবে নিচেরটা একটু চেস্টা করলে বুঝে যাবেন……
.VBS দিয়ে একটু মজা একটু শিখা.....(না দেখলে বিরাট মিস).VBS দিয়ে একটু মজা একটু শিখা.....(না দেখলে বিরাট মিস)

নিচের কোডটি 

আগের মত নোড পেড খোলে পেস্ট করুন

msgbox “You must enter a password to continue!”
password=”tunerpage”
do
ask=inputbox(“Enter password:”)
select case ask
case password
answer=true
x=msgbox(“You did it!”)
wscript.quit
end select
answer=false
x=msgbox(“Try again!”)
loop until answer=ture

এবার .vbs নামে ফাইলটি সেভ করুন এবার সেভ করা ফাইলটি খুলুন… এবার মজা নিন মজা……..
আসা করি VBS সম্বন্ধে কিছূটা ধারণা পেয়েছেন  আজ এইটুকুতে থাকে….সবাই ভাল থাকবেন ..সুস্থ থাকবেন এই কামনায় শেষ করছি….আল্লাহ হাফেজ……. আর ভাল লাগলে কমেন্ট করতে ভূলবেন না কিন্তু……..
.VBS দিয়ে একটু মজা একটু শিখা.....(না দেখলে বিরাট মিস)

 

30 মন্তব্য

    • কেন কাজ করবেনা অবশ্যই করবে…. আপনি কোড গুলো কপি করে নোড পেডে পেস্ট করে .vbs (vbs এর আগে অবশ্যই ডট দিবেন) নামে সেভ করুন এবার ফাইলটি অপেন করুন…….এর পরেও যদি কাজ না করে তাহলে কিছূ করার নাই আমার কোডের কোন সমস্যা নাই ….তাহলে আপনার পিসিতে অন্য কোন সমস্যার কারণে কাজ করছে না……

একটি উত্তর ত্যাগ