«

»

ভিজ্যূয়াল বেসিকে তৈরি করুন স্টপ ওয়াচ(৩)

বন্ধুরা, কেমন আছেন সবাই? নিশ্চয়ই ভালো। ভিবির গত পর্বে আমরা দেখেছিলাম কিভাবে আমাদের তৈরি স্টপ ওয়াচে কোড লিখতে হবে । তবে একটি গুরুত্বপূর্ণ বাকি রেখেছিলাম, যা হল timer1 এর কোড। আজ তা নিয়েই আমি আলোচনা করব।

timer1 এর timer ইভেন্টে নিচের কোডটুকু লিখুন।

seclbl.Caption = Val(seclbl.Caption) + “1”
If seclbl.Caption = “60” Then
seclbl.Caption = “00”
minlbl.Caption = Val(minlbl.Caption) + “1”
End If
If minlbl.Caption = “60” Then
minlbl.Caption = “00”
hrlbl.Caption = Val(hrlbl.Caption) + “1”

End If

এখানে seclbl.Caption = Val(seclbl.Caption) + “1” এর মাধ্যমে বলা হচ্ছে seclbl নামে লেবেলের ক্যাপশন(seclbl.Caption) হিসেবে এতে যে মান আছে (Val(seclbl.Caption)) তার সাথে ১ যোগ করলে যত হয় তত সংখ্যাকে সেট করতে। যেমন, এই লেবেলের ক্যাপশন যদি ১ হয় তবে পরবর্তী timer ইভেন্টে এর মান হবে ২।

উল্লেখ্য timer1 এর ইন্টারভেল এর মান সেট করা হয়েছে ১০০০ অর্থাৎ ১ সেকেন্ড। ফলে প্রতি সেকেন্ডেই timer ইভেন্ট সংঘটিত হবে হবে এই কোড কাজ করবে।

পরের লাইনে

If seclbl.Caption = “60” Then
seclbl.Caption = “00”
minlbl.Caption = Val(minlbl.Caption) + “1”
End If

এর মাধ্যমে বোঝানো হচ্ছে, যদি (if) , seclbl এর ক্যাপশন 60 হয়(seclbl.Caption = “60” ) তবে এর ক্যাপশন যেনো “০০ ” হয় (seclbl.Caption = “00”) এবং minilbl লেবেলের ক্যাপশন যেনো হয় এর যে ক্যাপশন আছে তার থেকে 1 বেশি (minlbl.Caption = Val(minlbl.Caption) + “1”)

একই ভাবে

If minlbl.Caption = “60” Then
minlbl.Caption = “00”
hrlbl.Caption = Val(hrlbl.Caption) + “1”

End If

এর মাধ্যমে বলা হয়েছে minilbl এর ক্যাপশন ১ করে বাড়তে বাড়তে যখন ৬০ হবে (minlbl.Caption = “60”) তখন যেনো এর ক্যাপশন হিসেবে “০০” নির্ধারিত হয়। এবং hrlbl এর ক্যাপশন এর আগের ক্যাপশনের মানের চেয়ে ১ বেশি হয়(hrlbl.Caption = Val(hrlbl.Caption) + “1”)

আসুন আমাদের স্টপ ওয়াচটাকে একবার রান করে দেখি।

START/STOP এ ক্লিক করার পরে এটি চলতে শুরু করবে।

START/STOP বাটনে আবার ক্লিক করলে এটি বন্ধ হবে।

RESET বাটনে ক্লিক করলে এটি প্রাথমিল অবস্থায় ফিরে যাব।

এইতো!!!! হয়ে গেল আমাদের ক্যালকুলেটর। ভালো থাকবেন সবাই। ধন্যবাদ।


এ সম্পর্কিত আরো কিছু টুইট:

নিজের ব্লগ আইকন
দুনিয়ার সবচেয়ে সহজ ট্যাগের মাধ্যমে Mediafire Site হতে ফাইল ডাউনলোড করুন! তাও নিজের ইচ্ছামতো!!
আপনি কি বিভিন্ন দেশের ভাষা শিখতে চান? তাহলে আমার ধারাবাহিক টিউন দেখুন।এইভাষার শব্দগুলো মাইক্রোসফট ওয়...
দেখে নেই বিশ্বের 5 সেরা হ্যাকার কে….
ফ্রি তে নিয়ে নিন ১৬ জিবি পেনড্রাইভ সহ আকর্ষনীয় সব ইলেকট্রনিক গেজেট!!! (প্রমান সহ)
গ্লোবাল ব্র্যান্ডের অ্যালকাটেল ওয়ানটাচ ফ্ল্যাশ ২ তে রয়েছে অ্যাপ্লিকেশন প্রাইওরিটাইজিং
যারা কম্পিউটারের Browser এ বাংলা দেখতে পারেন না শুধু তারা দেখেন

মন্তব্য দিনঃ

comments

About the author

MITHU

Permanent link to this article: http://techtweets.com.bd/uncategorized/mithublue/12033

মন্তব্য করুন