11/12/2004, 06:20
|
| | | Fecha de Ingreso: diciembre-2004
Mensajes: 7
Antigüedad: 19 años, 11 meses Puntos: 0 | |
| como generar un aleatorio con nombres
hola muy buenas, tengo que generar aleatorios con nombres y que nose repitan, los nombres estan en fichero. ¿Como podria? he programado lo siguiente pero no se si esta bien y tampoco se seguir.
Private Sub Load()
Dim i as integer, a as integer
for i=1 to 10(hay 10 labels)
open app.path & "/primera.txt" for input as #1
label(i)= int (22*rnd)+1 (hay 22 nombres en el fichero de primera)
whike not eof (1)
line intput #1, a (lee los nombres y va poniendo de 1 en 1)
pero ya no se mas |