Dim bytArray() As Byte = New Byte() {}
        Dim iVar1 As Int32
        Dim fVar1 As Single
        Dim memstream As New MemoryStream
        Dim pRet As Integer
        Dim Binwriter As New BinaryWriter(memstream)
        memstream.Position = 0
'ich habe insgesamt 150 Werte von txtboxen die ich als UDP sende 
iVar1 = CInt(TxtSsendvalue145.Text)
                Binwriter.Write(iVar1)
            Else
                fVar1 = CSng(TxtSsendvalue145.Text)
                Binwriter.Write(fVar1)
            End If
 
            If Me.CBSset146.Text = "int" Then
                iVar1 = CInt(TxtSsendvalue146.Text)
                Binwriter.Write(iVar1)
 
 
 bytCommand = memstream.ToArray()
            'MsgBox("bytCommand=" + bytCommand.Length.ToString())
 
 
            'Try
 
                GLOIP = IPAddress.Parse(Me.TxtIPAddress.Text)
                GLOINTPORT1 = CType(Me.TxtSpdpn.Text, Single)
                udpClient.Connect(GLOIP, GLOINTPORT1)           
 
            pRet = udpClient.Send(bytCommand, bytCommand.Length)
 
        Catch Ex As Exception
            MsgBox("" & Ex.Message)
 
        End Try

hallo ich lerne gerade visual donet und m?chte gern an den Foren teilnehmen