Autor
|
Tema: Limitar resultados (Leído 2,500 veces)
|
luis456
Desconectado
Mensajes: 551
|
Por acá de nuevo con mis chapuzas en el codigo de abajo yo concateno tres variables y las muestro en el listbox1 pero yo nesecito que el total de lo mostrado tenga una cantidad especifica de números, esto por ejemplo la variable " Result1 " aporta cuatro números , la variable " Result2 " aporta 7 numeros y la "Result3 " aporta otros 4 sumando 15 números ,lo que quiero hacer es forzar a la variable Resultss a mostrar la cantidad de números que yo quiera, sean solo cuatro seis o 15 Dim Resultss As IEnumerable(Of Integer) = ( From Value As Integer In (Result1.Concat(Result2).Concat(Result3)).Distinct) Where Value <= MAX ) ListBox1.Items.AddRange(Resultss.Cast(Of Object).ToArray) ListBox1.Sorted = True
Luis
|
|
« Última modificación: 1 Marzo 2015, 05:47 am por luis456 »
|
En línea
|
Que tu sabiduria no sea motivo de Humillacion para los demas
|
|
|
Eleкtro
Ex-Staff
Desconectado
Mensajes: 9.878
|
No se entiende bien lo que pretendes hacer, ¿te refieres a que cuando la lista tenga por ejemplo 15 elementos, puedas tomar los 4 o 6 primeros elementos de la colección?: Dim resultss As IEnumerable(Of Integer) = { 1, 2, 3, 4, 5, 6, 7, 8, 9, 0 } Dim selectedValues As IEnumerable(Of Integer) = resultss.Take(4) Me.ListBox1.Items.AddRange(selectedValues.Cast(Of Object).ToArray)
Saludos
|
|
|
En línea
|
|
|
|
luis456
Desconectado
Mensajes: 551
|
No cuando la lista tenga lo que yo predefino, es que la muestra
por ejemplo yo quiero que esta muestre solo 10 numeros tomaria de la primera variable los numeros que tiene si faltan algunos los tomaria de la segunda y sumaria hasta llegar a los 10 si falta completaria con la tercera variable pero sin pasar de 10 números
gracias por responder
luis
|
|
|
En línea
|
Que tu sabiduria no sea motivo de Humillacion para los demas
|
|
|
luis456
Desconectado
Mensajes: 551
|
No se entiende bien lo que pretendes hacer, ¿te refieres a que cuando la lista tenga por ejemplo 15 elementos, puedas tomar los 4 o 6 primeros elementos de la colección?: Dim resultss As IEnumerable(Of Integer) = { 1, 2, 3, 4, 5, 6, 7, 8, 9, 0 } Dim selectedValues As IEnumerable(Of Integer) = resultss.Take(4) Me.ListBox1.Items.AddRange(selectedValues.Cast(Of Object).ToArray)
Saludos Si me sirve tu codigo no lo habia mirado bien gracias Luis
|
|
|
En línea
|
Que tu sabiduria no sea motivo de Humillacion para los demas
|
|
|
|
|