dear all..
saya pnya scrip, dibwh ini

Private Sub LstVwData_Click()
 If IsNull(Kode) = True Then Exit Sub
 Kode =
LstVwData.ListItems.Item(LstVwData.SelectedItem.Index).Text
 If Rec.RecordCount = 0 Then Exit Sub
 With FrmItemInfo
  .LblBarcode = Kode
  .Show vbModal
 End With
End Sub

sewaktu listview saya klik dalam keadaan belum berisi
data (kosong), muncul error "Object Variable or With
block variable not set". saya cukup sering mendpt
error spt ini.
kira2, bagian mana yg salah..??

thanx for attention master-VB smua..

-agus-

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


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
 
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