Invalid use of null reported when adding db field to listbox.

[Dejjzey]

Hey
Im new in vb and i have some questions.Im trying to make save command but everytime im trying to save debug window pops up with invalid use of null.This is my code please someone help me

data1.Recordset.AddNew
Data1.Recordset.Update
Data1.Refresh
List1.Clear
Dim val1 As Database, val2 As Recordset, val3 As Field
Set val1 = OpenDatabase(App.Path & "\KONACNO.mdb")
Set val2 = val1.OpenRecordset("Prava")
Set val3 = val2("Ime i Prezime")
val2.MoveFirst
Do While Not val2.EOF
    val2.MoveNext
    List1.AddItem val3
Loop

[Dököll]

Hey
Im new in vb and i have some questions.Im trying to make save command but everytime im trying to save debug window pops up with invalid use of null.This is my code please someone help me

 
data1.Recordset.AddNew
    Data1.Recordset.Update
    Data1.Refresh
    List1.Clear
    Dim val1 As Database, val2 As Recordset, val3 As Field
    Set val1 = OpenDatabase(App.Path & "\KONACNO.mdb")
    Set val2 = val1.OpenRecordset("Prava")
    Set val3 = val2("Ime i Prezime")
    val2.MoveFirst
    Do While Not val2.EOF
    val2.MoveNext
    List1.AddItem val3
    Loop
 
 

Greetings and salutations, Dejjzey!

Count your columns, and your blessings, give this another whirl. You should consider making sure your Access end fields are set to have null values allowed, just a hunch. Also, should (List1.Clear) be added after (List1.AddItem val3)???

Sorry for your troubles...

Dököll

[Dejjzey]

I have done all that and still its not working.
When "Invalid use of Null" window pops up i press debug and it shows me that
is something wrong with (list1.additem val3)

[Killer42]

I have done all that and still its not working.
When "Invalid use of Null" window pops up i press debug and it shows me that
is something wrong with (list1.additem val3)

Sounds as though val3 must contain a null value, then. Try displaying it once you go to debugging mode.

[Dejjzey]

Please, explane me something more. I dont know what to do :(

[Killer42]

Sounds as though val3 must contain a null value, then. Try displaying it once you go to debugging mode.

When you hit the error, go to debug mode and display the value of val3. If you don't know how to do that, you really need to study your documentation, and maybe look up some VB tutorials. The debugging tools built into VB are your best friends in a case like this.

[Killer42]

By the way, are you aware that your logic will skip the first record? You say to go to the first record, then until you hit the EOF, skip to the next record and put it in the listbox. So the first one will never be loaded.

In fact, now that I think about it, that may be the source of the error. You are doing MoveNext, then loading the field value, then checking for EOF. So if you're at EOF, won't you get an error (or no value) from loading the field?