¿te refieres a los 3 ejemplos que dí?... no, son 3 ejemplos distintos para conseguir practicamente lo mismo, siendo el primer ejemplo el más elaborado.
saludos.
saludos.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCita de: _Enko en 22 Octubre 2014, 17:21 PM
asp es Server Side Script. Tendrías que tener acceso al FTP para poder descargar la fuente, de lo contrario sería imposible.
Namespace LuisLibrary
Friend NotInheritable Class Group
Protected Friend Property First As Integer = 0I
Protected Friend Property Second As Integer = 0I
End Class
End Namespace
Dim values As New List(Of Integer) From
{
2, 8, 9, 10, 11, 15, 21, 22, 28, 50, 55, 58
}
Dim groupedValues As List(Of LuisLibrary.Group) =
(From i As Integer In values
Group By i.ToString("00").First
Into items = Group Select New LuisLibrary.Group With {
.First = items(0),
.Second = items(1)
}).ToList
For Each g As LuisLibrary.Group In groupedValues
Dim str As String = String.Format("{0:00}, {1:00}",
g.First,
g.Second)
MessageBox.Show(str)
Next g
' Type anónimo
Dim groupedValues =
From i As Integer In values
Group By i.ToString("00").First
Into items = Group Select New With {
Key .First = items(0),
Key .Second = items(1)
}
Dim groupedValues As List(Of List(Of Integer)) =
(From i As Integer In values
Group By i.ToString("00").First Into items = Group
Select New List(Of Integer) From {items(0), items(1)}
).ToList
Cita de: ivancea96 en 22 Octubre 2014, 15:40 PM¿qué impide al objeto superar la velocidad de la luz?
Cita de: http://www.visualstudio.com/en-us/products/visual-studio-2013-compatibility-vs.aspxVisual Studio supports the listed platforms when used with the latest available service pack for that platform.
Cita de: 1quark1 en 22 Octubre 2014, 10:12 AM
Muchas gracias Elektro.
¿Soy el único al que le funcionan los links de mediafire y el resto no (elektrostudios.tk*)?
Cita de: MSDNCrea un objeto List(Of T) a partir de un objeto IEnumerable(Of T).
Cita de: luis456 en 21 Octubre 2014, 19:37 PMAAA lo que quiero es saber donde ir
Cita de: luis456 en 21 Octubre 2014, 19:37 PMconvertir de integer a lo que sea
Dim str As String = "1"
Dim num As Integer
Integer.TryParse(str, num)
Dim str As String = "1"
Dim num As Integer
num = CInt(str)
Dim str As String = "1"
Dim num As Integer
num = Convert.ToInt32(str, 10I)
Dim str As String = "1"
Dim num As Integer
num = CType(str, Integer)
Imports System.ComponentModel
Dim str As String = "1"
Dim num As Integer
Dim converter As TypeConverter = TypeDescriptor.GetConverter(num.GetType)
With converter
If .CanConvertFrom(str.GetType) Then
num = .ConvertFrom(str)
End If
End With