PDA

View Full Version : آرایه ای از lable ....



namin
چهارشنبه 20 اسفند 1382, 15:07 عصر
سلام

آرایهای طریف کردم از نوع lable .
Dim ُTableSamp(100, 100) As Label
() ُTableSamp(i, j) = New Label
حال می خواهم روی رویداد MouseEnter مربوط به آن یک تابع اجرا شود .

با یک مثال بیشتر توضیح میدهم . فرض کنید می خواهیم جدولی بسازیم 100 در 100 از lable . و وقتی موس روی هر یک از lable ها رفت پیغام مشابهی چاپ شود .
برای این کار چه باید کرد .
با تشکر از همه دوستان



نسیم .

Farhad.B.S
چهارشنبه 20 اسفند 1382, 15:24 عصر
ابتدا باید یه تابع یا پراسیحر برای مدیریت کردن رویداد مورد نظر به شکل زیر بنویسید :


Public Sub MyLabelEventHandler(ByVal sender As Object, ByVal e As System.EventArgs)
MessageBox.Show("This is my event handler !")
End Sub


و بعد در زمان ساختن لیبل مورد نظر ، با استفاده از AddHandler پراسیجر بالا رو به عنوان مدیریت کننده رویداد مورد نظر به لیبل ساخته شده نسبت بدید :


AddHandler Label1.MouseEnter, AddressOf MyLabelEventHandler

Abbas Arizi
چهارشنبه 20 اسفند 1382, 16:01 عصر
برای تکمیل فرمایشات فرهاد خان یه نگاه کوچولو هم به اینجا بنداز:
http://abbas.europe.webmatrixhosting.net/ShowArticle.aspx?ID=1