Visual Basic - Ayuda con un proyecto

Hola, me dirijo a este foro con un problema:
Resulta que un maestro me dejo un proyecto para entregar el viernes, que consiste en realizar un examen de 50 preguntas, pero tiene que tomarlas aleatoriamente de una base de datos de 200 preguntas.
Y eso no es todo, aparte debe de generar 50 examenes diferentes con todo y clave de respuestas.
Empeze generando la base de datos, pero me atore cuando toma los numeros al azar, debido a que no recuerdo como hacer que el numero aleatorio sea decimal.
Espero que me pueda ayudar alguien, y de antemano gracias.

Hola Fernando :
Intenta con esta funcion....

Sub pAleatorio()
Dim Sup As Integer, Inf As Integer, NumAletario As Integer

Inf = 1
Sup = 50
Randomize
NumAletario = Int((Sup - Inf + 1) * Rnd + Inf)

End Sub

Saludos desde Peru