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
Lo que necesitas es algo como ...
Randomize()
Text1.text = Int((10 - 1 + 1) * Rnd + 1)
Para que se entienda mejor ...
Randomize()
Int((mayor - menor + 1) * Rnd + menor)
Saludos
Gracias, funciona sin el randomize() te lo agradezco ;)
Y sin el randomize() no te sale siempre lo mismo?
Cierra la aplicación, abrela, y volverá a salir lo mismo :-\
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
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
Es verdad lo que dice rob1104 sobre los parentesis, tengo la costumbre de ponerlos, pero en realidad no van :xD
Toma aqui lo tienes:
Public Function GenerarRndNumber(Upper As Integer, Lower As Integer) As Integer
Randomize
GenerarRndNumber = Int((Upper - Lower + 1) * Rnd + Lower)
End Function