- Messages
- 9
- Reaction score
- 0
- Points
- 16
HI guys...help naman oh
may dbgrid ako...kelangan ko na pag nagselect ako ng row sa kanya...magdisplay yung info sa text box....
eto na yung code ko ngaun..
Option Explicit
Public db As Database
Public rs As Recordset
Private Sub Form_Load()
Set db = OpenDatabase(App.Path & "\database\data.mdb")
Set rs = .OpenRecordset("MasterList")
End Sub
Private Sub Grid_Click()
with rs
if .recordcount > 0 then
dim item as string
item = dbgrid.(hindi ko alam yung lalagay dito)
.move item
!Lastname = text1.text
end if
end with
End Sub
help naman po...
help po
may dbgrid ako...kelangan ko na pag nagselect ako ng row sa kanya...magdisplay yung info sa text box....
eto na yung code ko ngaun..
Option Explicit
Public db As Database
Public rs As Recordset
Private Sub Form_Load()
Set db = OpenDatabase(App.Path & "\database\data.mdb")
Set rs = .OpenRecordset("MasterList")
End Sub
Private Sub Grid_Click()
with rs
if .recordcount > 0 then
dim item as string
item = dbgrid.(hindi ko alam yung lalagay dito)
.move item
!Lastname = text1.text
end if
end with
End Sub
help naman po...
help po