problema con el findfirst

www
01 de Julio del 2005
tengo un problema con el findfirst.
se supone que el programa debe seleccionar por medio del rnd un numero al asar y luego buscar (en la base de datos) la fila correspondiente a la columna llamada "numerodefila".
el problema es que no lo busca, me pone la primera fila que encuentra (en este caso la del numero 1) cuando el valor de "numpregunta" es de 4 o 3 o 2 o 5.
porfavor ayudenme, gracias.


numpregunta = Rand(1, 5)
Data1.Recordset.FindFirst ("numerodefila" = numpregunta)
Data1.DatabaseName = "datos vb.xls"
Data1.RecordSource = "Hoja2$"
Public Function Rand(ByVal Low As Long, ByVal High As Long) As Long
Rand = Int((High - Low + 1) * Rnd) + Low
End Function

respondanme aqui o a mi e-mail: [email protected]

dradana2003
01 de Julio del 2005
Saludos, no entiendo bien tu pregunta pero recurda que el findfirt ira a buscar al primero semajante en la base de datos, aunque hayan mas el se situa en el primero, si quieres ver el resto debes utilizar el Movenext. Saludos
Espero haberte ayudado

Carlos Norb
01 de Julio del 2005
Prueba con esto:
Antes de Rnd(?,?) escribe Randomize para que saque un número distinto cada vez.

Randomize
numpregunta = Rand(1, 5)

Si entendi bien la pregunta, esto debería ayudarte.