Looped End

How do i fix Run Time Error 94 in Visual Basic 6?
Whenever I run my Program “Invalid Use of Null” occurs.
Here is the code. I have also made a module.
Private Sub Form_Load()
Set Conn1 = New ADODB.Connection
Call OpenDB
sSQL = “SELECT DISTINCT Name FROM Authors”
Set Rs1 = New ADODB.Recordset
Rs1.Open sSQL, Conn1, adOpenDynamic, adLockOptimistic, adCmdText
List1.Clear
Rs1.MoveFirst
Do Until Rs1.EOF
List1.AddItem Rs1.Fields(0) —> this is the problem
Rs1.MoveNext
Loop
End Sub
change it to…
sSQL = “SELECT DISTINCT ISNULL(Name,”) as Name FROM Authors”
Tagged as:
looped end cable,
looped end dust mop,
looped end mop heads,
looped end mop heads china,
looped end mop large,
looped end mops,
looped end tie wires,
looped end wet mop,
looped end wire ties,
looped ends