เทียบคำสั่ง VB.Net กับ VFP

Form Event

เช็คปุ่มฟังก์ชันคีย์บนฟอร์ม
VFP
1. ที่ Form Property กำหนด KeyPreview = .T.
2. ที่ ฟอร์มอีเวนต์ ชื่อ KeyPress เมื่อกดปุ่ม F5 แล้วให้ปุ่มคำสั่ง cmdExec ทำการประมวลผล
และ ปุ่ม ESC ให้ออกจากฟอร์ม

&& Form.KeyPress Event
DO CASE
CASE nKeyCode = -4
    ThisForm.cmdExec.SetFocus()
    ThisForm.cmdExec.Click()
CASE nKeyCode = 27
    ThisForm.Release
ENDCASE

VB.Net
1. ที่ Form Property กำหนด KeyPreview = true
2. ที่ ฟอร์มอีเวนต์ ชื่อ KeyUp เมื่อกดปุ่ม F5 แล้วให้ปุ่มคำสั่ง cmdExec ทำการประมวลผล และ ปุ่ม ESC ให้ออกจากฟอร์ม

Private Sub Form1_KeyDown( _
    ByVal sender As Object, _
    ByVal e As System.Windows.Forms.KeyEventArgs _
    ) Handles MyBase.KeyDown 'แก้จาก Me.KeyDown - เป็น - MyBase.KeyDown 
   Select Case e.KeyCode
      Case Keys.F5
          Me.btnExec.Focus()
          Me.btnExec.PerformClick()  ' VFP ใช้ Click() เฉย ๆ 
       Case Keys.Escape
           End   'exit
   End Select
End Sub