Manejo de RND y Randomize en VB 2008

[domanion]

hola necesito saber como puedo hacer una funcion que regrese un numero aleatorio, pero de esos que siempre son iguales cuando se vuelve a ejecuatar el programa. por ejempo 9, 500, 156 , 654 etc
pero que este numero sea el mismo por todo ese dia

me explico si hoy 1 de enero lo ejecuto me da 99 y si lo vuelvo a ejecutar me sigue dando 99
pero si lo ejecuto mañana 2 de enero me da 155 y si lo vuelvo a ejecutar me sigue dando 155
y si lo ejecuto el 3 de enro me de 12

ayuda de antemano gracias