Simplificar codigo

[matiasramos]

hola alguien sabe como podria hacer para no usar tantas lineas:

    Shared client As UdpClient
    Shared client2 As UdpClient
    Shared client3 As UdpClient
    Shared client4 As UdpClient
    Shared client5 As UdpClient
    Shared client6 As UdpClient
    Shared client7 As UdpClient
    Shared client8 As UdpClient
    Shared client9 As UdpClient
    Shared client10 As UdpClient

asi hasta el 500 tengo, hay alguna forma con algun for para que sea menos codigo?

[XresH]

Con for no pero podés simplificar así mira:

Código [Seleccionar] Expandir

Shared client, Client2, Cliente3 As UdpClient


Y asi todas las variables que tengas y/o las líneas que quieras.

Saludos.

[Eleкtro]

Más fácil:

Código (vbnet) [Seleccionar] Expandir

Public Class Form1

   Shared Clients(500) As System.Net.Sockets.UdpClient

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       For X As Int64 = 0 To Clients.Count - 1 : Clients(X) = New System.Net.Sockets.UdpClient : Next
   End Sub

End Class

Saludos!

[XresH]

Más fácil:

Código (vbnet) [Seleccionar] Expandir

Public Class Form1

   Shared Clients(500) As System.Net.Sockets.UdpClient

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       For X As Int64 = 0 To Clients.Count - 1 : Clients(X) = New System.Net.Sockets.UdpClient : Next
   End Sub

End Class

Saludos!

Que suerte que hay gente que esta mas atenta, una variable seguida de un numero y todas iguales, lo haces array.

Mas que fácil, re sencilllo

Gracias elektro, sorry por la distracción (La triste vida de un noob )

Saludos.

[Eleкtro]

Que suerte que hay gente que esta mas atenta, una variable seguida de un numero y todas iguales, lo haces array.

Cuantas más soluciones mejor, aunque sean largas o cortas, así hay más donde elegir,
Lo de concatenar las declaraciones lo hemos hecho todos alguna vez... así que yo también soy noob xD.

Saludos!

[ABDERRAMAH]

a mi me gusta usar una lista gestionada, mejor que un array que sería la solución de toda la vida. La diferencia es que se redimensiona automáticamente así que no hay que indicar ni cambiar los límites.

Código (vbnet) [Seleccionar] Expandir

Public Class Form1

   Shared Clients As new list(of string)

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       For X As Int64 = 0 To 499 : Clients.add(New System.Net.Sockets.UdpClient) : Next
   End Sub

End Class

funciona igual, y se puede transformar a array con list.toarray y viceversa con array.tolist .

[birik]

a mi me gusta usar una lista gestionada, mejor que un array que sería la solución de toda la vida. La diferencia es que se redimensiona automáticamente así que no hay que indicar ni cambiar los límites.

Código (vbnet) [Seleccionar] Expandir

Public Class Form1

   Shared Clients As new list(of string)

   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       For X As Int64 = 0 To 499 : Clients.add(New System.Net.Sockets.UdpClient) : Next
   End Sub

End Class

funciona igual, y se puede transformar a array con list.toarray y viceversa con array.tolist .

Yo me decantaría por esta solución por el simple hecho de la lista, ya que si queremos añadir mas quitar o lo que sea no nos tenemos que comer la cabeza

Saludos

[Crazy.sx]

No se rían, pero ¿para qué sirven esos : (dos puntos) en el código?

¿Ese sería lo que se ejecuta dentro del For, tan solo eso?

[Eleкtro]

¿para qué sirven esos : (dos puntos) en el código?

¿Ese sería lo que se ejecuta dentro del For, tan solo eso?

No, es la forma para concatenar secuencias de "comandos" en VBNET.

...Igual que en Batch puedes hacer esto:

Código (dos) [Seleccionar] Expandir

Echo 1 & echo 2

...O en Python puedes hacer esto otro:

Código (python) [Seleccionar] Expandir

print "1"; print "2"

...Pues en VBNET se hace así:

Código (vbnet) [Seleccionar] Expandir

msgbox("1") : msgbox("2")

Saludos!

[Crazy.sx]

No, es la forma para concatenar secuencias de "comandos" en VBNET.

...Igual que en Batch puedes hacer esto:

Código (dos) [Seleccionar] Expandir

Echo 1 & echo 2

...O en Python puedes hacer esto otro:

Código (python) [Seleccionar] Expandir

print "1"; print "2"

...Pues en VBNET se hace así:

Código (vbnet) [Seleccionar] Expandir

msgbox("1") : msgbox("2")

Saludos!

Gracias, la verdad que no tenía idea de esto.

Saludos che.