| 
	
		|  Autor | Tema: Trabajar con lista aleatoriamente  (Leído 3,016 veces) |  
	|  |  | 
			| 
					
						| cassiani 
								 
								
								 Desconectado 
								Mensajes: 978
								
								 
								« Anterior | Próximo »
								
								
								
								
								
								     | 
 
Usa vectores y la función RND para generar un numero entre 0 y el limite de elementos del mismo, luego seleccionas la cadena con el numero generado.
 ¡Saludos voy retrasado!
 
 
 |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  | 
			| 
					
						| zarq29 
								
								 Desconectado 
								Mensajes: 85
								
								   | 
 
si podrias ser un poco mas específico o dejarme algun ejemplo te agradeceria mucho   soy bastante novato en VB ................. xD perdon las molestias   saludos |  
						| 
								|  |  
								|  |  En línea | 
 
    "Si Hay un Derecho, Hay un Revez... Solo es Cuestion de Imaginarlo..." |  |  |  | 
			| 
					
						| naderST | 
 
Bueno... yo lo haria asi: Option Explicit
 Private Sub Command1_Click()
 Dim Equipos As Variant
 
 Equipos = Array("Barcelona", "Milan", "Chelsea", "Real Madrid")
 
 Randomize
 
 Label1.Caption = Equipos(Int(Rnd * (UBound(Equipos) + 1)))
 End Sub
 
 
 |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  | 
			| 
					
						| Lambda | 
 
Bueno... yo lo haria asi: Option Explicit
 Private Sub Command1_Click()
 Dim Equipos As Variant
 
 Equipos = Array("Barcelona", "Milan", "Chelsea", "Real Madrid")
 
 Randomize
 
 Label1.Caption = Equipos(Int(Rnd * (UBound(Equipos) + 1)))
 End Sub
 
 
Es Dim Equipos() As variant creo recordar o si queres un numero definido Dim Equipos(1 To 200) As Variant hace tiempo q no programo en VB asi q no estoy seguro XD |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  | 
			| 
					
						| naderST | 
 
Bueno... yo lo haria asi: Option Explicit
 Private Sub Command1_Click()
 Dim Equipos As Variant
 
 Equipos = Array("Barcelona", "Milan", "Chelsea", "Real Madrid")
 
 Randomize
 
 Label1.Caption = Equipos(Int(Rnd * (UBound(Equipos) + 1)))
 End Sub
 
 
Es Dim Equipos() As variant creo recordar o si queres un numero definido Dim Equipos(1 To 200) As Variant hace tiempo q no programo en VB asi q no estoy seguro XDEn este caso no es necesario poner () bueno creo yo... porque lo probe y funciono bien. |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  |  |  | 
			| 
					
						| naderST | 
 
usa IF ejemplo:
 if label1.caption = Label2.caption then
 'GENERA OTRO
 end if
 |  
						| 
								|  |  
								|  |  En línea | 
 
 |  |  |  |  |  
 
	
 
 
				
					
						| Mensajes similares |  
						|  | Asunto | Iniciado por | Respuestas | Vistas | Último mensaje |  
						|   |   | Seleccionar aleatoriamente una palabra de un array en C Programación C/C++
 | folostia | 1 | 7,530 |  21 Diciembre 2011, 17:19 pm por Eternal Idol
 |  
						|   |   | Copiar URL con una parte que cambia aleatoriamente Desarrollo Web
 | rolomo | 1 | 3,668 |  26 Febrero 2012, 22:32 pm por xeon_57
 |  
						|   |   | Contenido multimedia desaparece del SIII aleatoriamente Android
 | adgellida | 0 | 2,406 |  21 Octubre 2012, 18:42 pm por adgellida
 |  
						|   |   | Rellenar vector con 1 y -1 aleatoriamente Programación C/C++
 | kenonni | 4 | 3,278 |  9 Mayo 2014, 13:18 pm por kenonni
 |  
						|   |   | Cambiando posición de un control aleatoriamente ! .NET (C#, VB.NET, ASP)
 | TrashAmbishion | 2 | 2,621 |  29 Agosto 2016, 23:37 pm por TrashAmbishion
 |    |