Try:
Using con As SqlConnection = New SqlConnection(strConnect)
con.Open()
Using cmd As SqlCommand = New SqlCommand("SELECT myDateColumn FROM myTable WHERE rowID = @RI", con)
cmd.Parameters.AddWithValue("@RI", valueWhichSelectsTheRightRow)
Using reader As SqlDataReader = cmd.ExecuteReader()
While reader.Read()
Dim dt As DateTime = CType(reader("myDateColumn"), DateTime)
Console.WriteLine(dt)
End While
End Using
End Using
End Using