Winsock Array problem

[ Blue82 @ 09.10.2011. 11:10 ] @

Nikako da skontam kako se pravi jednostavan niz u VB.NET-u.

Pronasao sam jedan zgodan primer za Winsock kontrolu (zgodan zato sto je kratak :) ) ali i dalje imam problem.

Code:

Dim MySocketArray As New ArrayList
Dim MySocketControl As SocketControl 'Lets say it is called just like that for this example

'Adds the first one to the collection
MySocketControl = New SocketControl
MySocketArray.Add(MySocketControl)

'Adds the second one to the collection
MySocketControl = New SocketControl
MySocketArray.Add(MySocketControl)

'To Read the first item back to SocketControl type again
MySocketControl = CType(MySocketArray(0), SocketControl)

'To go through the entire collection to find a particular Socket Control

For Each TempSocketControl As SocketControl In MySocketArray
'Do your code in here
Next

Da li je potrebno uvesti neku referencu za SocketControl jer on ne prepoznaje taj tip?

[ Shadowed @ 09.10.2011. 13:19 ] @

Bolje koristi List(of SocketControl).

[ Blue82 @ 09.10.2011. 13:43 ] @

Imas neki blic primer?

[ Shadowed @ 09.10.2011. 15:54 ] @

Pa, isto je. Dodajes sa Add a dobijas navodeci index ili sa for each. Samo sto neces imati konverzije tipova.
Kada koristis ArrayList, svi elementi su tipa Object pa moras da kastujes, ovako imas upravo tip koji si naveo u deklaraciji liste.

[ Blue82 @ 09.10.2011. 16:28 ] @

Dzaba kad to nisam nikad koristio. Hajde prepravi mi onaj gore primer.

Code:

Dim list As New List(Of MSWinsockLib)
list.Add(2)

Sta staviti umesto ovoga MSWinsockLib? Nemam ideju.

I kada dodam sa .add kako ce mi onda posle glasiti npr linija

Code:

Private Sub AxWinsock1_DataArrival(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles AxWinsock1.DataArrival

End Sub

_{[Ovu poruku je menjao Blue82 dana 09.10.2011. u 17:38 GMT+1]}