null row records in access displays in ListView

[lightroses]

I trying to display all records of table in listview.

But it generates a error if one of the fields does not have a value(null).my codes is below:

 
 With FrmTithes.ListView.ListItems
            Set TItem = .Add(, , Trs!ID)
 
               TItem.SubItems(1) = Trs!Fullname
               TItem.SubItems(2)= Trs!Jun_2_2013
               TItem.SubItems(2)= Trs!Jun_9_2013
              TItem.SubItems(2)= Trs!Jun_16_2013
 
 

When i run the program the message box appear and says" invalid use of null". I need to display all the records in table even some fields are null! What codes fits best?

Thank you in advance!

[Rabbit]

Convert nulls to a different value, such as a blank string, using the Nz() function.

[lightroses]

how can I convert it. can you give me some example codes? I try to search to the internet later but I hope your answer! thanks a lot

[Rabbit]

A search shows plenty of examples.

Here is a link to Microsoft's documentation on the Nz function.
https://office.microsoft.com/en-us/a...001228890.aspx

[lightroses]

I try to visit the link and read about the tutorial I get some Ideas, but i dont know on how to code this. I dont understand well. Forgive me if I'm slow in sql.

The code I do is:

 
 With FrmTithes.ListView.ListItems
            Set TItem = .Add(, , Trs!ID.null.Value.ToString)
 
               TItem.SubItems(1) = Trs!Fullname
               TItem.SubItems(2)= Trs!Jun_2_2013
               TItem.SubItems(2)= Trs!Jun_9_2013
              TItem.SubItems(2)= Trs!Jun_16_2013
 
 

Its not work and gain errors. What can I do!
I try to search to the internet but there code is very different on me so I cannot understand them well. Please provide some examples and I will study it.
Thanks again!

[Rabbit]

Sorry, I didn't notice this was for VB6 and not VBA, VB6 does not have the Nz function. You will have to use the IsNull function. Here is a link to the documentation on that function http://www.chennaiiq.com/developers/...ons/isnull.asp.

What you attempted above won't work because that is VB.Net code, not VB6.

[lightroses]

It's okay. Rabbit how can I apply it to vb6 I don;t know on how to start code!

[Rabbit]

An example would be:

If IsNull(someValue) Then
   'Value is null, do something
Else
   'Value is not null, do something else
End If

[lightroses]

Thank you so much for this code it's completely solved my error linking in vb6.

[Killer42]

Sorry to jump in late here, but for future reference one might also use:

• IIF function, if it's available (you may have to add a reference to your project, but I no longer have VB6 available to check). Example...
  

  TItem.SubItems(1) = IIF(IsNull(Trs!Fullname),"",Trs!Fullname)

• Concatenation can change your value to a string. Example...
  

  TItem.SubItems(1) = "" & Trs!Fullname