Try this one!
Private Sub DTPicker1_Change()
Text1.SetFocus
End Sub
--- In [email protected], iwan gunawan <[EMAIL PROTECTED]>
wrote:
>
> Dear arlenda, sy coba tapi koq run time error, ada saran lain?
>
>
>
> ----- Original Message ----
> From: "[EMAIL PROTECTED]" <[EMAIL PROTECTED]>
> To: [email protected]
> Sent: Thursday, July 24, 2008 3:16:27 PM
> Subject: Re: [Programmer-VB] setfocus
>
>
>
> Oh maaf, pakai event DropDown.
> Cukup ketik :
> txt1.setfocus
>
> Best Regards
>
> Arlenda Fitranto
>
>
>
>
> iwan gunawan <[EMAIL PROTECTED] com>
> Sent by: Programmer-VB@ yahoogroups. com
> 2008/07/24 15:01
> Please respond to
> Programmer-VB@ yahoogroups. com
> To Programmer-VB@ yahoogroups. com
> cc
>
> Subject Re: [Programmer- VB] setfocus
>
>
>
>
>
>
> Sy sudah coba pake event clik, tetap ga bs,
> hrs cek di mn lagi yah?
>
> ----- Original Message ----
> From: "arlenda_YPMI@ yamaha-motor. co.id" <arlenda_YPMI@ yamaha-
motor. co.id>
> To: Programmer-VB@ yahoogroups. com
> Sent: Thursday, July 24, 2008 2:44:21 PM
> Subject: Re: [Programmer- VB] setfocus
>
>
> koding tersebut untuk event keypress, ketika tekan enter fokus di
txt1.
> Kalau ingin setelah memilih tanggal baru txt1 fokus, gunakan event
click.
>
> Best Regards
>
> Arlenda Fitranto
>
>
>
> iwan gunawan
> <[EMAIL PROTECTED] com>
> Sent by: Programmer-VB@ yahoogroups. com
> 24/07/2008 14:01
>
> Please respond to
> Programmer-VB@ yahoogroups. com
>
> To indoprog-vb@
> yahoogroups. com
> cc programmer-VB@ yahoogroups.
> com
> Subject [Programmer- VB] setfocus
>
>
>
>
>
>
>
>
> Private Sub dtpicker1_KeyPress( KeyAscii As Integer)
> If KeyAscii = 13 Then
> txt1.SetFocus
> End If
> End Sub
>
>
> koding diatas salah dimana yah, gw pengen pas dtpicker di klik/
enter, pilih
> tgl trus setfocus ada di txt1, thanks yah b4.
>
