اجرا کردن رویداد

[lida]

چگونه یک رویداد از کلاس را از داخل رویدادی دیگر اجرا کنیم؟؟

[majid_afra222]

سلام
فقط کافیه مقادیر مورد نیاز رویه اجرا شده در رویداد رو فراخوانی کنی :
مثلا برای یک دکمه رادیویی با رویداد زیر :



Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
MsgBox("Radio Button1 Clicked")
End Sub


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


RadioButton1_CheckedChanged(RadioButton1, System.EventArgs.Empty)


امیدوارم بدردت بخوره

[lida]

merci vali engar nashod.

[vbapr2005]

خیلی عجیبه. حالا اینو هم امیتحان کن ببین چی میشه:

Public Sub A(B as integer, C as string)
B = + B
C= C & C
End Sub

Call A(1,"abc")
البته میدونی که باید اون Sub A رو یه جایی بذاری که وقتی که اونو صدا می زنی بتونه اون ساب رو ببینه. مثلا اونو بذار تو یه ماژول یا دوتاییشون رو بذار تو یه ماژول.
اما تا اونجایی که من میدونم این دوتا(چه Call رو بذاری چه نذاری) هیچ فرقی باهم ندارن، اما حالا تو امتحان کن اگه فرقی پیدا کردی ما رو هم خبر کن!!!

[Mohammad .net]

فکر کنم مسئله اینجاست که رویدادها در e با هم تفاوت دارند. شما چه رویدادی رو می خواهید اجرا کنید؟!

[lida]

می خوام وقتی کاربر با کلید های کیبرد عدعد های 0..9 را میزنه همان onclickعدد های ماشین حساب روی فرم اجرا بشه

[Mohammad .net]

با سلام




Private Sub ButtonS_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click, Button3.Click _

, Button4.Click, Button5.Click, Button6.Click _

, Button7.Click, Button8.Click, Button9.Click

Me.Label1.Text += sender.text

End Sub

Private Sub Form1_KeyPress(ByVal sender AsObject, ByVal e As System.Windows.Forms.KeyPressEventArgs) HandlesMyBase.KeyPress

If Char.IsNumber(e.KeyChar) Then

Dim C As New Button

C.Text = e.KeyChar

Me.ButtonS_Click(C, New System.EventArgs)

EndIf



EndSub



چسبیدن بعضی از دستورات به هم تقصیر من نیست:چشمک:

[lida]

مرسی از همه