test email, abaikan saja
----- Original Message ----
From: Fatma Sari <[EMAIL PROTECTED]>
To: Programmer-VB@yahoogroups.com
Sent: Thursday, July 24, 2008 3:59:41 PM
Subject: Re: [Programmer-VB] setfocus
Ikut numpang lewat..
coba pake kaya gini aja:
Private Sub DTPicker1_KeyDown( KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyReturn Then
Text1.SetFocus
End If
End Sub
Pada tanggal 24/07/08, arlenda_YPMI@ yamaha-motor. co.id <arlenda_YPMI@
yamaha-motor. co.id> menulis:
Bro Iwan, sya udah coba bisa tuh..
Private Sub DTPicker1_CloseUp( )
Text1.SetFocus
End Sub
Private Sub DTPicker1_DropDown( )
Text1.SetFocus
End Sub
Pakai event closeup bisa atau dropdowntidak ada masalah.
Kalo boleh tahu listing prog. nya seperti apa?
Best Regards
Arlenda Fitranto
iwan gunawan <[EMAIL PROTECTED] com>
Sent by: Programmer-VB@ yahoogroups. com
2008/07/24 15:29
Please respond to
Programmer-VB@ yahoogroups. com
To Programmer-VB@ yahoogroups. com
cc
Subject Re: [Programmer- VB] setfocus
Dear arlenda, sy coba tapi koq run time error, ada saran lain?
----- 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 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.
