اضافه کردن رویداد به button به صورت runtime

[هادی123]

با سلام
من به بن بست رسیدم نمی دونم باید چه کارکنم

انتهای برنامه ام
فرض کنید یک حلقه داریم از دکمه که مثلا چهار دکمه ( به تعداد نا مشخص ) ایجاد می کند

for i=0 to 4
Dim b As New Button
b.Name = "b" +i.ToString
b.Text = "b" +i.ToString
e.Controls.Add(b
next
حالا چگونه تشخصی بدهم که روی کدام دکمه کلیک می کنم؟

[ghafoori]

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

addhandler b.click,addressof yoursub

sub yoursub(sender as object,e as eventargs)

endsub

حالا رویداد کلیک این دکمه ها به تابع yoursub پاس داده می شود و پارامتر sender نماینده دکمه است و با کد زیر می توانید به نام ان دکمه پی ببرید

ctype(serder,button).name

[حامد رضائی]

سلام باید هندل بدی
این رو توی فرم لود بذار
Dim Btn As New Button
AddHandler btn.Click, AddressOf btn_click


Sub btn_click(ByVal sender As Object, ByVal e As EventArgs)'this function
MsgBox("Button click")'Button clicked
End Sub
این برای یک Button
این ررو برای همه تست کن امیدوارم که جواب بده

[اَرژنگ]

اضافه کردن رویداد به button به صورت runtime