2010-06-15 71 views
0

我是VB.net的新手,努力摆脱VB6的发送数据的方式,我这样做是从我的客户端发送一个字节数组到服务器,请咨询如果这是正确的方式,得益于:VB.Net从客户端发送字节数组到服务器

发送部:

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 
+0

什么是客户端 - 服务器通信机制您正在使用? – 2010-06-15 08:49:57

+0

嗨,我不太了解你的问题,但我使用System.Net.Sockets,如果这就是你想问的问题。谢谢。 – k80sg 2010-06-15 09:10:52

回答

2

在VB6中,一个整数是2个字节。在VB.NET中使用Short。将Flush移出For循环。其余的看起来没问题。

1

在VB.NET中,您可以将变量声明为for循环语法的一部分。

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

您还可以提供数组的初始化的声明(尽管这可能并不适用于你的实际代码这么多,因为你的示例代码):

Dim arrNo As Integer() = {1400, 1000, 1200, 1350} 
相关问题