منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم اخواني احتاج مساعده
يوجد عني كوماند عدد اثنان واريد عندما اضغط على واحد منهم كلك يعمل والاخر دبل كلك يعمل
وذلك عن طريق تحديد الايفنت للاول كلك وللثاني دبل كلك
عندما اطبق البرنامج لا يعمل
صاحب الدبل كلك
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MessageBox.Show("welcom")
End Sub
Private Sub Button2_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.DoubleClick
MessageBox.Show("hihihi")
End Sub
End Class

السلام عليكم ورحمة الله وبركاته

اخي اسم الموضوع مخالف للقوانين والمكان ايضآآ طرحته في المكان الخطأ لازم في قسم الاسئلة

(28-10-13, 02:34 PM)scluay كتب : [ -> ]السلام عليكم اخواني احتاج مساعده
يوجد عني كوماند عدد اثنان واريد عندما اضغط على واحد منهم كلك يعمل والاخر دبل كلك يعمل
وذلك عن طريق تحديد الايفنت للاول كلك وللثاني دبل كلك
عندما اطبق البرنامج لا يعمل
صاحب الدبل كلك
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MessageBox.Show("welcom")
End Sub
Private Sub Button2_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.DoubleClick
MessageBox.Show("hihihi")
End Sub
End Class

ياريت تطبيق قوانين صارمة حول طرح الاسئلة او المواضيع

وضع الاكواد بهذه الطريقة ينفرزني .. فالرجاء وضع قانون ضرورة استخدام الوسوم php او code لعرض الكود

والا ستكون مهزلة

(28-10-13, 03:16 PM)3booody كتب : [ -> ]السلام عليكم ورحمة الله وبركاته

اخي اسم الموضوع مخالف للقوانين والمكان ايضآآ طرحته في المكان الخطأ لازم في قسم الاسئلة

كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("welcom")
        Button2_DoubleClick(sender, e)
    End Sub

    Private Sub Button2_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.DoubleClick
        MsgBox("hihihi")
    End Sub

Button2_DoubleClick(sender, e)
ماهذا الكود لا افهم معتاه
وثانيا انا اريد عند الضغط على الكومن دبل كلك يعمل

السلام عليكم و رحمة الله
أولا قم بإضافة كلاس جديد و أعد تسميته كما يلي: Buttondoubleclick
2 ضع هذا الكود في الكلاس الجديد الذي اضفته ليكون بالشكل التالي :

ثالثا قم بتشغيل التطبيق ثم أوفقه بعده إذهب للقائمة تول بوكس فتجد أنه ظهر زر جديد تحت اسم Buttondoubleclick قم بوضعه على الفورم ثم أضف زر آخر كما تريد النوع الموجود من قبل أو Buttondoubleclick
الآن في حدث الكليك للزر الموجود افتراضيا في القائمة أكتب الكود التالي ليكون على الشكل الموالي :
ثم في حدث الدوبل كيلك للزر الجديد Buttondoubleclick اكتب ما يلي
بالتوفيق إن شاء الله

(29-10-13, 05:37 PM)mohammed moh كتب : [ -> ]السلام عليكم و رحمة الله
أولا قم بإضافة كلاس جديد و أعد تسميته كما يلي: Buttondoubleclick
2 ضع هذا الكود في الكلاس الجديد الذي اضفته ليكون بالشكل التالي :

PHP كود :

Public Class Buttondoubleclick
    Inherits Button
    Public Sub New()
        SetStyle(ControlStyles.StandardClick Or ControlStyles.StandardDoubleClick, True)

    End Sub
End Class 


ثالثا قم بتشغيل التطبيق ثم أوفقه بعده إذهب للقائمة تول بوكس فتجد أنه ظهر زر جديد تحت اسم Buttondoubleclick قم بوضعه على الفورم ثم أضف زر آخر كما تريد النوع الموجود من قبل أو Buttondoubleclick
الآن في حدث الكليك للزر الموجود افتراضيا في القائمة أكتب الكود التالي ليكون على الشكل الموالي :

PHP كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        MsgBox("i am btn1")
        Buttondoubleclick1_DoubleClick(sender, e)
    End Sub 


ثم في حدث الدوبل كيلك للزر الجديد Buttondoubleclick اكتب ما يلي

PHP كود :

Private Sub Buttondoubleclick1_DoubleClick(sender As Object, e As EventArgs) Handles Buttondoubleclick1.DoubleClick
        MsgBox("i am btn2")
    End Sub 


بالتوفيق إن شاء الله

وعليكم السلام اولا انا اشكرك جدا جدا على اهتمامك وعلى مساعدتي
ولكن هذا الكود لا يتطبق في الفجول بيسك 2010

إقتباس :وعليكم السلام اولا انا اشكرك جدا جدا على اهتمامك وعلى مساعدتي
ولكن هذا الكود لا يتطبق في الفجول بيسك 2010

لا أخي ربما أنت أخطأت في شيء معين و بصراحة انا أعمل على في بي 2012 لكن ايضا يصلح على في بي 2010
و هناك مثال في المرفقات
بالتوفيق إن شاء الله