Visual Basic - Numeros aleatorios

Podria alguien ayudarme y darme el algoritmo para poder crear numeros aleatorios

utiliza la funcion Rnd

necesito un algoritmo para crear numeros aleatorios sin utilizar la función Rnd

Creo que esto te sirva

Label1.caption = Int (Rnd * #)
# es el maximo numero por el cual al multiplicar Rnd, se genera el Numero aleatorio, por ejemplo si quieres que el numero generado sea siempre de cuatro cifras utiliza el 9999 si quieres mas alto le agregas otro 9 y asi sucesivamente

Suerte