مشکل با لیبل و آرایه ها

[محمد رشوند 1,209]

سلام دوستان من مشکلم رو چندین بار به چندین نفر گفتم ولی متاسفانه فکر کنم سر بزرگواران شلوغ بود اشکالی نداره

 

یک لیبل دارم به این صورت تعریف شده

dim lbl(7,6) as label

 

خب حالا برای اینکه این لیبل رو بتونیم براش قابلیت کلیک بنویسیم باید چه کنیم؟

یکی از دوستان گفت که باید از تگ سندر استفاده کنی ولی استفاده کردم نشد

روشی دارید براش؟

 

داخل تقویم استاد ارتا هستش

[Farzad Musavi 576]

اگه درست متوجه شده باشم میخوای رو لیبل های تاریخ کلیک شد بفهمی دگ؟

تو سورس این ساب رو اضافه کن

Sub b_click
	Dim b As Label
	b=Sender
	ToastMessageShow(b.Text,True)
End Sub

[محمد رشوند 1,209]

@@Farzad Musavi,

sub _b_click

اینجا به جای b باید اسم لیبل رو بنویسم یا باید همین b باشه

اگه سورس رو نگاه کرده باشید برای اینکه ساب کلیک رو بنویسم باید لیبل اینیشیالایز بشه

چطور اینیشیالایز کنم و تو کدوم ساب؟

[Farzad Musavi 576]

@@Farzad Musavi,

sub _b_click

اینجا به جای b باید اسم لیبل رو بنویسم یا باید همین b باشه

اگه سورس رو نگاه کرده باشید برای اینکه ساب کلیک رو بنویسم باید لیبل اینیشیالایز بشه

چطور اینیشیالایز کنم و تو کدوم ساب؟

همون b رو بزن

[مهران محمودی 778]

درود،

شما فقط شماره روز رو میخواستید یا تاریخ کامل؟

 

عکس زیر رو ببینید:

 

 

تاریخ کامل رو در همه ی ماه ها و روزها نمایش میده.

 

پ.ن: کار من نیست و استاد آرتا زحمتش رو کشیدن!

[محمد رشوند 1,209]

@@مهران محمودی,

مقدار لیبل رو برگردوند

با کتابخونه persian date تونستم روز هارو برگردونم

به صورت روزانه هم که با اریا لیست ویو که سرعت بالایی داره تونستم با گرفتن پوزیشن درستش کنم