>> Di Properties "KeyPreview" Form Anda setting ke TRUE
   
  >> Terus masukkan Koding dibawah ini :
  Private Sub Form_KeyPress(KeyAscii As Integer)
  If KeyAscii = 13 Then SendKeys vbTab
  DoEvents
End Sub
   
  >> Kalau pake ini mau kontrol-nya textbox, combo, dll tinggal ENTER saja
   
  >> Kalau tidak mau pake di salah satu kontrol misal Text1, add koding ini :
  
Private Sub Text1_GotFocus()
  Me.KeyPreview = False
End Sub
   
  Private Sub Text1_LostFocus()
  Me.KeyPreview = True
End Sub
   
  >> Semoga Membantu
   
  Best Regard,
  Airlangga Eka W.



       
---------------------------------
Be a better friend, newshound, and know-it-all with Yahoo! Mobile.  Try it now.

[Non-text portions of this message have been removed]

Kirim email ke