تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
..If sender.name ="Button1" then
#1
السلام عليكم
PHP كود :
Public Class Form1
    Dim MeL 
As IntegerSS As Stringoo As System.Object
    Private Sub Button1_Click
(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
        Dim Newbutton 
As New Button
        Newbutton
.Text InputBox("Ente Text:")
 
       Newbutton.Name InputBox("Ente Name:")
 
       Newbutton.Left MeL
        MeL 
+= Newbutton.Width
        SS 
Newbutton.Name
        Controls
.Add(Newbutton)
 
       AddHandler Newbutton.ClickAddressOf nebe
    End Sub
    Private Sub nebe
(ByVal sender As System.ObjectByVal e As System.EventArgs)
 
       oo sender
        Events1
()
 
   End Sub
    Function Events1
()
 
       If oo.ToString.Contains("Button1"Then
            MsgBox
("تم الضغط على زر1")
 
       ElseIf oo.ToString.Contains("Button2"Then
            MsgBox
("تم الضغط على زر2")
 
       End If
 
       '\\: الكود المطلوب
        '
\\ اذا كان اسم الزر "زر1" بعد ذلك تطبيق الحدث 
        
'\\ if oo.name = "Button1" then Msgbox("Button1") end if
    End Function
End Class 
اتمنى المساعدة في هذا الكود
Basil Abdallah 

الرد
تم الشكر بواسطة:
#2
تم الحل ...,....
Basil Abdallah 

الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ايد كود عند الضغط علي Button1 يروح يضغط تلقائياً علي Button2 ؟ DanyGhost2010 3 367 01-01-18, 11:44 PM
آخر رد: حريف برمجة
Rainbow [سؤال] تدوير البوتون Button1 محمد مسافر 1 643 13-11-15, 09:18 PM
آخر رد: حريف برمجة

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم