Try this one!
Private Sub DTPicker1_Change()
Text1.SetFocus
End Sub
--- In Programmer-VB@yahoogroups.com, iwan gunawan <[EMAIL PROTECTED]>
wrote:
>
> Private Sub dtpicker1_KeyPress(KeyAscii As Integer)
> If KeyAscii = 13 Then
> txt1.SetFocus
> End If
> End Sub
>
>
> kodi
Try this one!
Private Sub DTPicker1_Change()
Text1.SetFocus
End Sub
--- In Programmer-VB@yahoogroups.com, iwan gunawan <[EMAIL PROTECTED]>
wrote:
>
> Dear arlenda, sy coba tapi koq run time error, ada saran lain?
>
>
>
> - Original Message
> From: "[EMAIL PROTECTED]" <[EMAIL