coba ketik
sub button1.click()
   rs.movenext  //rs adalah nama recordset yang
dipaggil       
   text1.text=rs.field('nama fild')
   text2.text=rs.field('nama fild')
   if rs.BOF then
      Messagebox'Maaf data ini adalah data yang
pertama'
   end if
 end sub


__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 


Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]

 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/Programmer-VB/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 


Kirim email ke