| |
|
181
|
Programación / .NET (C#, VB.NET, ASP) / Re: Como puedo mostar 60 listbox en uno solo :)
|
en: 18 Abril 2015, 21:27 pm
|
Supuse que los items de esos listboxes ya eran series de números horizontales cómo en el ejemplo que pusiste, ya veo que no, pero me decepciona que a estas alturas necesites ayuda para hacer estas cosas, lo has visto hacer cientos de veces ya, jeje: Dim lbs As ListBox() = {ListBox2, ListBox3, ... ListBox60} For Each lb As ListBox In lbs ListBox1.Items.Add(String.Join(" "c, lb.Items.Cast(Of String))) Next lb
Saludos! Muachas gracias pero tenias un error  claro lo pude resolver no faltaba mas jejej con tus enseñanzas  Dim lbs As ListBox() = {ListBox2, ListBox3, ... ListBox60} For Each lb As ListBox In lbs ListBox1.Items.Add(String.Join(" "c, lb.Items.Cast(Of String))) <----aca Next lb
error no se puede blablabala solucion Dim lbs As ListBox() = {ListBox2, ListBox3} For Each lb As ListBox In lbs ListBox67.Items.Add(String.Join(" "c, lb.Items.Cast(Of Integer))) <----yo solito lo repare Next lb
es broma pero no me aguante para vengarme de tus regaños jejejej gracias Elektro  Luis |
|
|
|
|
182
|
Programación / .NET (C#, VB.NET, ASP) / Re: Como puedo mostar 60 listbox en uno solo :)
|
en: 18 Abril 2015, 16:39 pm
|
Lo que he entendido es que tienes 60 listboxes y quieres añadir los items de esos 60 listboxes en otro listbox, pues: Dim lbs As ListBox() = {ListBox2, ListBox3, ... ListBox60} For Each lb As ListBox In lbs ListBox1.Items.AddRange(lb.Items) Next lb
saludos Gracias elektro pero el codigo me muestra los resultados en vertical seguidos y no puedo saber donde enpieza y donde termina y los nesecito con un salto entre ellos y en orizontal como puse arriba... jo que pesao soy a si me los muestra ahora con lo que me diste 1 2 4 5 6 7 8 10 11 12 13 etc... yo los nesecito de esta forma 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 ya que despues los guardo en un txt ( codigo tuyo como siempre jejej ) para despues imprimirlos Luis |
|
|
|
|
183
|
Programación / .NET (C#, VB.NET, ASP) / Como puedo mostar 60 listbox en uno solo :)
|
en: 18 Abril 2015, 13:18 pm
|
Hola de nuevo por aca, ya espacio el tiempo en entrar por preguntas tontas jejej gracias a mi amigo elektro que por miedo a sus regaños no mentira , es gracias a el que me dio la pista como trabajar en este lenguaje pero me falta un monton por aprender jejeje ahora la temida pregunta tengo 60 listbox y por supuesto las consabidas variables de cada uno de estos listbox donde muestro resultados numericos ahora se me ocurre meter en un solo lisbotx todas estas variables pero separadas por resultados algo como esto listbox1 01 02 03 04 05 06 07 08 09 10 <---------variable 1 11 12 13 14 15 16 17 18 19 20 <---------variable 2 21 22 23 24 25 26 27 28 29 30 <---------variable 3 ....Etc estaba concatenando ;( pero ***** desastre jejej saludos Luis |
|
|
|
|
184
|
Programación / .NET (C#, VB.NET, ASP) / Re: rellenar con rand variable ya cargada de datos
|
en: 10 Abril 2015, 10:56 am
|
No hay manera, he, luis?. En el siguiente ejemplo, tengo una colección del 1 al 5, y relleno la colección con números aleatorios del 1 al 10 sin que estos se repitan entre ellos ni entre los números que ya hay en la colección, hasta incrementar la cantidad de elementos de la colección a 10. Dicho de otra forma, tengo una lista del 1 al 5, genero una secuencia aleatoria del 1 al 10 y relleno la lista del 1 al 5 con los 5 números restantes del 5 al 10. Puedes modificar los valores para tus necesidades... Dim col As IEnumerable(Of Integer) = {1, 2, 3, 4, 5} Dim minColCount As Integer = 10 Dim minRandValue As Integer = 1 Dim maxRandValue As Integer = 10 Dim rand As Random = New Random If col.Count < minColCount Then Dim randCol As IEnumerable(Of Integer) = From value As Integer In Enumerable.Range(minRandValue, maxRandValue) Order By rand.Next Where Not col.Contains(value) Take (minColCount - col.Count) col = Enumerable.Concat(col, randCol.ToArray) End If Debug. WriteLine(String. Join("; ", col ))
Saludos Perfecto me lees la mente jejejje Gracias otrar ves mas Luis |
|
|
|
|
185
|
Programación / .NET (C#, VB.NET, ASP) / Re: rellenar con rand variable ya cargada de datos
|
en: 9 Abril 2015, 16:03 pm
|
Si entendí bien, digamos que en resultado tienes una serie de números como "resultado" de algo, y quieres con la función rand, llegar a 30 números sin que se repita ninguno de los anteriores!
¿Que cosa es la variable resultado?
Hola si la variable se llena con una funcion que tengo, esta funcion genera numeros que van desde 00 al 99 pero a veces esta funcion genera menos de 30 numeros y como utilizo otras particiones para formar claves numericas si no llega a este minimo el programa me da error Y me imagino que preguntas por esto de la variable y es la debe de tener mas de 30 registros Dim Resultados As IEnumerable(Of Integer)
Luis |
|
|
|
|
186
|
Programación / .NET (C#, VB.NET, ASP) / Re: rellenar con rand variable ya cargada de datos
|
en: 9 Abril 2015, 15:06 pm
|
Si quieres insertar sin repetición 30 números del 0 al 99, puedes cargar un vector con las 100 posibilidades, y luego ir eligiendo al azar, e insertando. Al insertar, lo borras del vector para evitar duplicados.
No es meter o insertar 30 numeros es completar explico, si hay 25 numeros la funcion rand debera de llegar a completar la diferencia sin repetir los numeros porque si no lo que podria hacer es sumar otra variable cargada fija a la otra y utlizar " distint" para eliminar repetidos Gracias por responder Luis |
|
|
|
|
187
|
Programación / .NET (C#, VB.NET, ASP) / rellenar con rand variable ya cargada de datos
|
en: 9 Abril 2015, 14:35 pm
|
Otro de mis inventos quiero rellenar con numeros aleatorios cuando la cuenta de la variable este por debajo de 30, el rango de estos numeros es 00 al 99, pero no deberian de repetir en la variable. tengo esto que rellena pero con ceros If Resultados.Count < 30 Then Resultados = Resultados.Concat(Enumerable.Repeat(Of Integer)(0, (30 - Resultados.Count))) End If
entonces se me ocurrio esto pero nunca me da la seguridad de tener como minimo 30 datos en la variable  a veces el programa entero no llega a esa cantidad y FALLO If Resultados.Count < 30 Then Resultados = numerosFaltantesdelRango End If
Luis |
|
|
|
|
189
|
Seguridad Informática / Análisis y Diseño de Malware / Re: alguien sabe como eliminar New Zombie
|
en: 5 Abril 2015, 16:21 pm
|
Hasta la fecha ya no me ha molestado el dichoso Virus desde que lo desistale con el programa que os dije Ahora me ha picado la mosca de ver como hacer un programilla para que automaticamente ir blokeando paginas de publiciad que se instalan en el navegador,no un antivirus ya que esos no son virus como tales pero dan la lata como ninguno. Luis |
|
|
|
|
190
|
Programación / .NET (C#, VB.NET, ASP) / Re: Rellenar con rand no me funciona
|
en: 2 Abril 2015, 05:33 am
|
Para cerrar eseto , aca esta con lo que lo solucione  gracias a nuestro amigo elektro ' aca esta para relleñar con ceros----------- If Resultss.Count <35 Then Resultss = Resultss.Concat(Enumerable.Repeat(Of Integer)(0, (35 - Resultss.Count))) MsgBox(li.Count) '35 End If
Luis |
|
|
|
|
|
| |
|
Mostrar Mensajes