Visual Basic - necesito ayuda

quisier saber como progamar con keyascii el rut de una persona para
buscarla en un sistema de biblioteca por ej y que la vez si este rut no existe el sistema me arroje un mensaje diciendo el rut ingresado no existe.

ocupa el sgte codigo:
set Base=opendatabase("TuBase.mdb")
set tabla=Base.openrecordset("TuTabla")

'despues

tabla.index="Rut"
tabla.seek"=",TextodelRut
if tabla.nomatch then
msgbox"No Esta"
else
msgbox"Esta"
text1=tabla!nombre
etc
endif