Autor
|
Tema: Otra de las mias jejje traspasar datos condicionados de una variable a otras (Leído 6,712 veces)
|
Eleкtro
Ex-Staff
Desconectado
Mensajes: 9.817
|
todavía no he logrado hacer lo que en principio quería hacer, que era dividir la colección principal en variables con cuatro números cada una ¿Cómo que no?: Dim parts As Integer = 4 Dim splittedCols As IEnumerable(Of IEnumerable(Of Integer)) = From index As Integer In Enumerable.Range(0, CInt(Math.Ceiling(mainCol.Count() / parts))) Select mainCol.Skip(index * parts).Take(parts)
para yo después con cada variable con los números asignados poder concatenar las que yo quiera entre ellas y mostrar ese resultado en un listbox dim combination as ienumerable(of integer) = splittedCols(Índice).Concat(splittedCols(Índice)) ¿eso? Saludos EDITO:Te pondré el primer problema más fácil con esta función genérica (lee el ejemplo de uso): ''' <remarks> ''' ***************************************************************** ''' Snippet Title: Split Collection Into Parts ''' Code's Author: Elektro ''' Date Modified: 08-March-2015 ''' Usage Example: ''' Dim mainCol As IEnumerable(Of Integer) = {1, 2, 3, 4, 5, 6, 7, 8, 9} ''' Dim splittedCols As IEnumerable(Of IEnumerable(Of Integer)) = SplitColIntoParts(mainCol, amount:=4) ''' splittedCols.ToList.ForEach(Sub(col As IEnumerable(Of Integer)) ''' Debug.WriteLine(String.Join(", ", col)) ''' End Sub) ''' ***************************************************************** ''' </remarks> ''' <summary> ''' Splits an <see cref="IEnumerable(Of T)"/> into the specified amount of parts. ''' </summary> ''' <typeparam name="T"></typeparam> ''' <param name="collection">The collection to split.</param> ''' <param name="amount">The parts amount.</param> ''' <returns>IEnumerable(Of IEnumerable(Of T)).</returns> Public Shared Function SplitColIntoParts (Of T )(ByVal collection As IEnumerable (Of T ), ByVal amount As Integer) As IEnumerable(Of IEnumerable(Of T)) Return From index As Integer In Enumerable. Range(0, CInt(Math. Ceiling(collection. Count() / amount ))) Select collection. Skip(index * amount ). Take(amount ) End Function
|
|
« Última modificación: 8 Marzo 2015, 13:55 pm por Eleкtro »
|
En línea
|
|
|
|
luis456
Desconectado
Mensajes: 548
|
Jo cada ves me vuelvo mas loco , te paso lo que estoy tratando de hacer de una forma que me sea mas facil Dim numbers() As Integer = {0, 1, 2, 3, 4, 5, 6, 10, 15, 20, 25, 30, 35, 45} <---estos numeros cambian o son mas o son menos cantidad quiero poner esos numeros en estas variables ?? a= 1 2 3 4 b= 3 5 10 15 c= 20 25 30 35 Dim Result As IEnumerable(Of Integer) = (a.Concat(b.Concat(c))). <---------------para concatenar a +b c+a etc cada ves que quiera Distinct. ListBox4.Items.AddRange(Resul.Cast(Of Object).ToArray)
Gracias Luis
|
|
|
En línea
|
Que tu sabiduria no sea motivo de Humillacion para los demas
|
|
|
Eleкtro
Ex-Staff
Desconectado
Mensajes: 9.817
|
ahá, ¿y que relacion hay entre el patrón que sigue "a", y el que sigue "b"?.
|
|
|
En línea
|
|
|
|
luis456
Desconectado
Mensajes: 548
|
ahá, ¿y que relacion hay entre el patrón que sigue "a", y el que sigue "b"?.
Ninguno puse eso sin tomar en cuenta que era correlativo jejje se supone que es a+c y como son muchos numeros que da la funcion son muchas las variables y lo puse corto y seria como esto A + C A + D B + C B + D C + D o mas cuando lo termine (no pongo todos ) 1 .- ( A + C + D ) 2 .- ( A + B + D ) 3 .- ( A + B + E ) 4 .- ( A + B + F ) 5 .- ( A + B + G ) 6 .- ( A + B + H ) 7 .- ( A + C + D ) 8 .- ( A + C + E ) 9 .- ( A + C + F ) 10 .- ( A + C + G ) 11 .- ( A + C + H ) 12 .- ( A + D + E ) 13 .- ( A + D + F ) 14 .- ( A + D + G ) 15 .- ( A + D + H ) 16 .- ( A + E + F ) 17 .- ( A + E + G ) 18 .- ( A + E + H ) 19 .- ( A + F + G ) 20 .- ( A + F + H ) 21 .- ( A + G + H ) 22 .- ( B + C + D ) 23 .- ( B + C + E ) 24 .- ( B + C + F ) 25 .- ( B + C + G ) 26 .- ( B + C + H ) 27 .- ( B + D + E ) 28 .- ( B + D + F ) 29 .- ( B + D + G ) 30 .- ( B + D + H ) 31 .- ( B + E + F ) 32 .- ( B + E + G ) 33 .- ( B + E + H ) 34 .- ( B + F + G ) 35 .- ( B + F + H ) 36 .- ( B + G + H ) 37 .- ( C + D + E ) 38 .- ( C + D + F ) 39 .- ( C + D + G ) 40 .- ( C + D + H ) 41 .- ( C + E + F ) 42 .- ( C + E + G ) 43 .- ( C + E + H ) 44 .- ( C + F + G ) 45 .- ( C + F + H ) 46 .- ( C + G + H ) 47 .- ( D + E + F ) 48 .- ( D + E + G ) 49 .- ( D + E + H ) 50 .- ( D + F + G ) 51 .- ( D + F + H ) 52 .- ( D + G + H ) 53 .- ( E + F + G ) 54 .- ( E + F + H ) 55 .- ( E + G + H ) 56 .- ( F + G + H ) etec etec etec Luis
|
|
|
En línea
|
Que tu sabiduria no sea motivo de Humillacion para los demas
|
|
|
|
Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
Guardar salida de funcion en otra variable
Programación C/C++
|
dennis094
|
2
|
2,355
|
27 Noviembre 2013, 18:04 pm
por dennis094
|
|
|
Ayuda p listar datos de base de datos y usar el valor para enviar a otra pagina
PHP
|
daciocco
|
1
|
2,698
|
31 Diciembre 2013, 16:26 pm
por #!drvy
|
|
|
Como puedo mostrar resultados de un array en un listbox condicionados a 4
.NET (C#, VB.NET, ASP)
|
luis456
|
2
|
4,833
|
16 Enero 2014, 18:37 pm
por luis456
|
|
|
De regreso con mis temas jejje ,saltar un espacio en arreglo
« 1 2 »
.NET (C#, VB.NET, ASP)
|
luis456
|
10
|
6,407
|
28 Mayo 2015, 17:42 pm
por luis456
|
|
|
pasar datos de una variable a otra ???
.NET (C#, VB.NET, ASP)
|
luis456
|
0
|
2,707
|
1 Marzo 2020, 14:18 pm
por luis456
|
|