Re: [Programmer-VB] tanya error "object variable not set"

[ipinz]

Anda mesti gunakan item click bukan 
listviewnya....
Private Sub LstVwData_ItemClick(ByVal Item As 
MSComctlLib.ListItem)
 
End SubAnda mesti menggunakan item click bukan 
list view click

 
Private 
Sub 
LstVwData_ItemClick(ByVal Item As 
_
MSComctlLib.ListItem)
Dim sKode 
As 
String
 If 
IsNull(Kode) = True Then Exit 
Sub sKode = item.text If 
Rec.RecordCount = 0 Then Exit 
Sub With 
FrmItemInfo  .LblBarcode = Kode  .Show 
vbModal End 
With
 End 
Sub
 
Ipinz 

 
 
----Original Message ----- 
From: "August sudana" <[EMAIL PROTECTED]>
 > 
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/> > > > > 
>





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



   Visit your group "Programmer-VB" on the web. 
   To unsubscribe from this group, send an email to: [EMAIL PROTECTED] 
   Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.