Me gustaria tener una lista:
-carne
-fruta
-huevos
-lacteos
Y cuando apriete el button salga una de esas palabras al azar en textBox.
Tambien me gustaria que cada vez que se apriete el boton y salga una pala-
bra se borre la anterior.
Por favor ayudarme no quiero recurrir a yahoo answers xDD ;D
Hola, tienes muchas formas de hacerlo, prueba esta
Option Explicit
Dim strArray() As String
Private Sub Command1_Click()
Randomize
Text1.Text = strArray(Int(Rnd * (UBound(strArray) + 1)))
End Sub
Private Sub Form_Load()
ReDim strArray(3)
strArray(0) = "carne"
strArray(1) = "fruta"
strArray(2) = "huevos"
strArray(3) = "lacteos"
End Sub
Crea una rutina para seguir agregando elementos al array (redimensionalo en el intento).
saludos!!
O un número random en un text oculto y dependiendo del número muestras una palabra con select case...
Así agregas las palabras que quieras sólo agrandando el rango random y case(s).
Saludos espero que te sirva :D
Una manera sería dandole un valor numerico del 1 al 4 a cada palabra (conun switch)... y con un random (un sistema que te da un numero aleatorio) que "elija" alguno de lso 4 valores...