how to handle a datareader with no records..

[bontyboy]

I am using a datareader and its returning no records and I want to know how to handle that.

Example:

If not IsDbNull(dr("field1")) Then
listbox1.Items.FindByValue(CType(dr("field1"), string).Selected = True
End If

Error:
Invalid attempt to Read when no data is present.