VB.Net Envoi d'un tableau d'octets du client au serveur

Question

Je suis nouveau à VB.net et j'ai du mal à sortir de la façon d'envoyer des données de VB6, je fais ceci pour envoyer un tableau d'octets de mon client au serveur, s'il vous plaît si c'est la bonne voie, grâce:

la partie envoi:

Private Sub Button1_Click(ByVal sender As System.Object, _ 
     ByVal e As System.EventArgs) Handles Button1.Click 

     Dim arrNo(3) As Integer 
     arrNo(0) = 1400 
     arrNo(1) = 1000 
     arrNo(2) = 1200 
     arrNo(3) = 1350 

     Dim i As Integer 
     For i = 0 To arrNo.Length - 1 
      Dim outStream() As Byte = BitConverter.GetBytes(arrNo(i)) 
      Debug.Print(arrNo(i)) 
      serverStream.Write(outStream, 0, outStream.Length) 
      serverStream.Flush() 
     Next 
    End Sub 

Answer 1

En VB6, un entier était de 2 octets. Utilisez Short dans VB.NET. Déplacez le Flush hors de la boucle For. Le reste a l'air correct.

Answer 2

Dans VB.NET, vous pouvez déclarer la variable dans le cadre de la syntaxe for loop.

For i As Integer = 0 To arrNo.Length - 1 
... 
Next 

Vous pouvez également fournir initialiseurs de tableau dans la déclaration (bien que cela ne s'applique probablement pas à votre code réel tant que votre exemple de code):

Dim arrNo As Integer() = {1400, 1000, 1200, 1350}