Como se usa Rnd?

[jdc]

Hola necesito un numero random entre 1 y 10... si mal no recuerdo seria algo asi como:

Text1.Text = Rnd * 10

o (Rnd * 10) pero el problema es que text1 me tira numeros decimales, en random claro xD pero en decimales ¬¬

Yo necesito como dije hacer que me de un numero entre 1 y 10, por cierto recuerdo que lo hice una vez en la escuela cuando hicimos este programa a modo de juego pero perdi el source xD no ocupabamos ni variables ni constantes era algo como lo que expuse

http://www.sendspace.com/file/a1byul este es el programa era un juego... veanlo los 3 numeros que estan salen en los text del medio estan con la funcion Rnd

Saludos y gracias de antemano

[Novlucker]

Lo que necesitas es algo como ...

Código (vb) [Seleccionar] Expandir

Randomize()
Text1.text = Int((10 - 1 + 1) * Rnd + 1)

Para que se entienda mejor ...

Código (vb) [Seleccionar] Expandir

Randomize()
Int((mayor - menor + 1) * Rnd + menor)

Saludos

[jdc]

Gracias, funciona sin el randomize() te lo agradezco

[Novlucker]

Y sin el randomize() no te sale siempre lo mismo?
Cierra la aplicación, abrela, y volverá a salir lo mismo 

[jdc]

Tira error con el randomize es extraño también lo vi así en msdn pero no funciona en vb6 fíjate en msdn habla de visual estudio 2005 xD

[rob1104]

Si no le pones Randomize, siempre van a salir los mismos numeros "aleatorios", el problema es que no debe llevar los parentesis ya que no es un procedimiento ni una funcion, es una instruccion; prueba con: Randomize en vez de Randomize()

Saludos

[Novlucker]

Es verdad lo que dice rob1104 sobre los parentesis, tengo la costumbre de ponerlos, pero en realidad no van 

[‭‭‭‭jackl007]

Toma aqui lo tienes:

Código [Seleccionar] Expandir

Public Function GenerarRndNumber(Upper As Integer, Lower As Integer) As Integer
Randomize
GenerarRndNumber = Int((Upper - Lower + 1) * Rnd + Lower)
End Function