contar cantidad de registros

hola como estan!! quisiera saber como se puede hacer para
obtener la cantidad de registros con visual.net y ado.net
la siguiente es la funcion que estoy tratando de hacer

Public Shared Function validar(ByVal dni As String,
ByVal email As String) As Boolean
Dim cn As New OdbcConnection("dsn=sigcon")

cn.Open()
Dim sql As String = "select * from contactos
where dni ='" & dni & "' or email ='" & email & "'"
Dim cmd_select As New OdbcCommand(sql, cn)
Dim ds As New DataSet
Dim da As New OdbcDataAdapter(cmd_select)
da.Fill(ds, "datos_base")
Dim dsa = ds.Tables.Count()

If dsa > 0 Then
MsgBox(dsa)
Return False
Else
MsgBox(dsa)
Return True
End If
End Function