Private Sub DataGrid1_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = 13 Then
        DataGrid1.Row = DataGrid1.Row + 1
        DataGrid1.Col = 0
        DataGrid1.SetFocus
        DataGrid1.EditActive = True <-----ditambahkan statement ini
    End If
End Sub
----- Original Message -----
From: Eko
Sent: Friday, February 03, 2006 4:28 PM
Subject: Re: [Programmer-VB] set focus column pd tdbgrid

tanya lagi mas Padu,
gmn klo kita sedang berada di column 4, lalu tekan enter maka
kursor menuju column 1 pada baris berikutnya:
 
saya cb padukan dg jwbn mas robby brk pd pertanyaan yg lain tp blm bisa
Private Sub Form_Activate()
    Dim Baris
    Baris = 5
    DataGrid1.Row = Baris - 1
    DataGrid1.SetFocus
End Sub
----- Original Message -----
Sent: Thursday, February 02, 2006 10:42 AM
Subject: Re: [Programmer-VB] set focus column pd tdbgrid

Mr Eko,
 
saya coba bantu ya tp ini saya coba pake datagrid bukan tdbgrid (kayaknya sih sama) pake keycode pada proc grid_keydown,
 
  If KeyCode = 13 Then
     If DataGrid1.Col = 0 Then   > Jika focus berada pada kolom o
          DataGrid1.Col = 1        > mengarahkan kursor dlm hal ini ke kolom 1
          DataGrid1.SetFocus    > menunjukkan focus 
     End If
  End If
 
salam,
padu arsana


Eko <[EMAIL PROTECTED]> wrote:
prend semua
mo tanya lagi nih
 
gimana caranya ketika kursor pada satu column tdbgrid
begitu kita tekan enter, kursor menunjuk ke column tertentu yang lain
 
makasih sblmnya


Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer




SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages Java programming language


YAHOO! GROUPS LINKS




Kirim email ke