منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] ممكن طريقة تنفيذ حدث عن الضغط يمين بزر الماوس - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] ممكن طريقة تنفيذ حدث عن الضغط يمين بزر الماوس (/showthread.php?tid=162)

ممكن طريقة تنفيذ حدث عن الضغط يمين بزر الماوس - يوسف - 19-09-13

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

نفسي بكود يعمل بشكل ممتاز بدون اي خطأ

اريد اضع زر Button وعند الضغط عليه بزر الماوس الايمن يغلق البرنامج
وعند الضغط عليه بزر الماوس الأيسر يفتح فورم ثانيه ؟
بشرط عدم ظهور رسالة من سطح المكتب عند اغلاق البرنامج

Confused

RE: ممكن طريقة تنفيذ حدث عن الضغط يمين بزر الماوس - تركي قرمزلي - 19-09-13

السلام عليكم و رحمة الله و بركاته
إليك الكود المطلوب
كود :
    Private Sub button1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles button1.MouseDown
        If e.Button = Windows.Forms.MouseButtons.Left Then
MyForm.Show
        Else
Application.exit
        End If
    End Sub
السلام عليكم و رحمة الله و بركاته

RE: ممكن طريقة تنفيذ حدث عن الضغط يمين بزر الماوس - يوسف - 19-09-13

عزيزي تركي تحيه

أنا قلت بشرط
عدم ظهور قائمة من سطح المكتب عند اغلاق البرنامج

شوف الصورة توضح ظهور قائمة مزعجه عند ضغطي

بزر الماوس الايمن



كيف اضغط بزر الماوس الايمن ولا تظهر اي قائمة
Sad

RE: ممكن طريقة تنفيذ حدث عن الضغط يمين بزر الماوس - تركي قرمزلي - 20-09-13

السلام عليكم و رحمة الله و بركاته
بسيطة أخي ، ضع الكود في حدث MouseUp للزر
السلام عليكم و رحمة الله و بركاته


RE: ممكن طريقة تنفيذ حدث عن الضغط يمين بزر الماوس - eng.khalidvb - 20-09-13

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

هذا ما يقصده الاخ تركي 


كود :
Private Sub Button1_MouseUp(sender As Object, e As MouseEventArgs) Handles Button1.MouseUp


        If e.Button = Windows.Forms.MouseButtons.Left Then


            Form2.Show()


        ElseIf e.Button = Windows.Forms.MouseButtons.Right Then


            Me.Close()


        End If


    End Sub

   شكر للاخ تركي ...

RE: ممكن طريقة تنفيذ حدث عن الضغط يمين بزر الماوس - يوسف - 20-09-13

اخواني المحترمين

تركي قرمزلي / eng.khalidvb


بارك الله فيكم

الكود سليم 100%

Shy