سوال در مورد بستن فرم در vb.net

[arashkamangir]

مي خواستم يه برنامه خيلي ساده تو vb.net بنويسم ولي نشد ؟؟؟
به نظر خيلي ساده مي ياد ولي هر ساده اي كه پارسي كولا نمي شه ؟؟؟ مي شه ؟؟؟
برنامه اي بنويسيد كه با استفاده از متد form_closing وقتي فرم بسته مي شود با يك سوال از كاربر در صورتي كه كاربر تاييد كرد فرم بسته شود .
كد ها تقريبا به شكل زير مي شود :

  Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        Dim ask As Byte
        ask = MsgBox("Are you sure ???", MsgBoxStyle.YesNo)
        If ask = 6 Then
            '????
        Else
            '?????
        End If
    End Sub
[code\]

 

[Mikhak]

Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        Dim a As Integer
        a = MessageBox.Show("Do you want to exit?!", "Exit", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
        If a = 7 Then
            e.Cancel = True
        End If
    End Sub

فكر كنم توضيح لازم نباشه
در ضمن يادتون باشه كداتون رو تو تگ كد بنويسين هميجوري ول نكنين به امون خدا گناه داره
------------------------
سينا

 

[arashkamangir]

ممنون ...
بابا دنبال کد گشتم نبود ( شوخی کردم سعی می کنم تکرار نشه )

 

[arashkamangir]

می شه منبع رو هم معرفی کنید

 

[Mikhak]

مگه من مقاله نوشتم كه منبع رو هم بگم
شما يه كد خواستي منم طبق تجربه كه ياد گرفته بودم اينجا نوشتم
ولي اگه منبع بخواين ميتونم بگردم واستون منبع پيدا كنم البته در اين جور موارد بعترين منبع msdn هستش
--------------------------
سينا

 

[arashkamangir]

آخه چنتا سوال دیگه هم دارم ولی نمی خوام مضاحم شما بشم !!!
دنبال یه سایت فارسی هستم که یه نمور سنگینتر از کد های معمولی گفته باشه و ...
فعلا سوالم اینه می شه برای کلید ویندوز هم برنامه نوشت ( کلید ویندوز کد اسکی ندارد کد اسکن دارد )

 

[MnavidM]

با سلام.

این نوع کلید ها به "Virtual-Key" معروف هستند .

و شما برای استفاده از اون ها نیازی به کد اون ها نداری بلکه به جای اون ها از یک سری ثابت ها استفاده می کنید .

اینجا رو ببینید .

البته اونجا شامل کد همه نوع کلیدی هست
یه مرجع کامل برای کلید ها .

نحوه استفاده اون ها هم به این صورت هست که مثلا به جای :

if key=کد کلید then

از

if key=VK_HOME then

اگه مشکلی بود بگید