se si tratta di una riga vuota puoi usare questo metodo...riempire manualmente il dropdownlist e mettere una riga vuota di tanto in tanto

Dim rifclas As New utilita.setdata()
Dim riempi As SqlDataReader
Dim conn As New SqlClient.SqlConnection()
conn = rifclas.Connessione
Dim SQL As New SqlCommand(str, conn)
conn.Open()
riempi = SQL.ExecuteReader
Do While riempi.Read
oggetto.Items.Add(New ListItem(riempi(campo1), riempi(campo2)))
Loop
conn.Close()