Visual Basic - Ayuda urgente

Life is soft - evento anual de software empresarial
 
Vista:

Ayuda urgente

Publicado por German Martinez (1 intervención) el 27/05/2002 02:50:36
Deseo informacion:

Estoy desarrollando un sistema para una clase de la prepa y mi duda es como puedo hacer esto:

tengo una tabla donde tengo que guardar todos los datos de los alumnos indexado por un campo llamado "NumeroControl" y deseo que al tratar de agregar a otro alumno a esta base de datos poder teclear el "NumeroControl" y al quitar el enfoque a otro objeto busque en la tabla correspondiente si ya existe esa clave y no me deje continuar capturando datos e informandome de esta situacion y en caso contrario me permita capturar los datos siguientes
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda urgente

Publicado por JOSEP (60 intervenciones) el 27/05/2002 12:30:03
hola, en el codigo del evento lost_focus del text box debes poner algo así:

sub text1_lost_focus()
dim db as database
dim tabla as recordset
dim num_control as integer
num_control=text1.text 'recuperamos el nº de control que hemos introducido
set db=opendatabase("nombre base de datos",....)
set tabla=db.openrecordset("nombre de la tabla",dbopentable)
tabla.index="PrimaryKey" 'establecemos el índice de la tabla
tabla.seek "=",num_control 'buscamos el valor num_control en la tabla
if tabla.nomatch then
'no econtrado
else
if tabla("NumeroControl")=num_control then
'elemento encontrado
else
'elemento no encontrad
end if
end if
end sub

perdona si hay errores de sintaxi, si necesitas más ayuda ta sabes..
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar