আমি সর্বপ্রথম ধন্যবাদ জানাই টেকটিউনস এর সমস্ত ডেভেলপারদের যারা তৈরি করেছে এই সুন্দর ওয়েব সাইট টি এবং সেই সব টিউনারদের যাদের টিউনস গুলো ওয়েব সাইটটির আলংকার বাড়িয়েছে । আমি খুব
আনন্দিত হয়েছিলাম যেদিন এই সাইট এ আমি প্রথম প্রবেশ করি । সত্যি কথা বলতে কি বাংলাতে লেখা সর্ববৃহৎ
ব্লগ ।

যাইহোক এটা আমার তৃতীয় পোস্ট ( টিউনস ) , সেই হিসাবে কিছু ভুল হইত হতে পারে তবে চেষ্টা করবো যাতে কোন ভুল না হয় ।

আজ আমি সবাইকে জানাতে চাই কিভাবে ভিসুয়াল বেসিক এ কোনও একটি লেবেলে থাকা লেখার সাইজ সময়ের সাথে সাথে আপনা-আপনি পরিবর্তন করা যাই ।
এর জন্য নিচের মত করে ফর্ম সাজিয়ে নিতে হবে ।

General Dicrearation এ লিখতে হবে

General Dicrearation

Dim S as Single

এর পর FORM এর ওপর Double Click করার পর Load ইভেন্ট এ নিচের কোড গুলি লিখতে হবে ।

Private Sub Form_Load ( )

Label1.AutoSize = True
Timer1.Interval=100
Timer1.Enabled=False
S = 0

End Sub

এর পর Commad Button এর ওপর Double Click করার পর নিচের কোড গুলি লিখতে হবে ।
Private Sub Command1_Click ( )

Timer1.Enabled=True

End Sub

এর পর Timer এর ওপর Double Click করার পর নিচের কোড গুলি লিখতে হবে ।

Private Sub Timer1_Click( )

S=S+1
Label1.FontSize=S
If S = 72 Then
S = 8
End If

End Sub

ব্যাস এই টুকুই আর কি । আবার দেখা হবে পরবর্তী পোষ্টে । ভালো থাকুন সবাই, আগাম ঈদ মোবারক ।

কেমন লাগলো আপনাদের জানাবেন, তাতে পরবর্তী পোস্ট করতে উৎসাহিত হবো ............................................. ।