Problem porting C# to VB

[Paul Johnson]

Hi,

I have a bit of code which is causing me a few problems to port from C# to VB.NET

The C# looks like this

    		byte[] serverbuff = new Byte[1024];
    		int count = 0;
    		while (true)
    		{
        		byte[] buff = new Byte[2];
        		int bytes = stream.Read(buff, 0, 1 );
        		if (bytes == 1)
        		{
            		serverbuff[count] = buff[0];
            		count++;

            		if (buff[0] == '\n')
            		{
                		break;
            		}
        		}
        		else
        		{
           			break;
        		};
    		};

I've ported it, but the final if is causing a problem as I can't use ControlChars.Lf - the new code looks like this

            Dim serverbuff As Byte() = New [Byte](1023) {}
            Dim count As Integer = 0
            While (True)
                Dim buff As Byte() = New [Byte](1) {}
                Dim bytes As Integer = stream.Read(buff, 0, 1)
                If (bytes = 1) Then
                    serverbuff(count) = buff(0)
                    count += 1
'The line below fails
                    If (buff(0) = ControlChars.Lf) Then
                        Exit While
                    End If
                Else
                    Exit While
                End If

            End While

Any idea on how to go about fixing this? It's the only part that fails

Paul

[horace1]

you are attempting to compare a Byte with a Char, try converting the Byte to a Char, e.g.

       If (Chr(buff(0)) = ControlChars.Lf) Then