Visual Basic - ayuda con select

hola a todos
tengo un problema cuando realiso un select a la base de datos acces y la tabla esta basia me sale error datos eliminados
como puedo controlar esto, hacer una consulta cuando la tabla esta bacia para poder cargar los datos
asta ahora he solucionado ingresando direcctamente el primer registro directamente desde acces pero quisiera aserlo desde visual
estoy usando codigo ADO
muchas gracias de antemano por su ayuda

lo tienes que trabajar de la siguiente manera

rs.open "select * from tabla", cn

if rs.eof=false

else
msgbox "tabla VACIA"
end if