[تركي قرمزلي]

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

إليك الكود المطلوب

كود :

    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

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