Here is the piece of code which is running inside thread, not sure where to put thread.sleep(), how can it save CPU time. Thanks
Public Sub start()
Dim stream As NetworkStream
Dim st As Boolean
Dim cmd, parm As String
Dim len, index As Integer
Dim s As String = Nothing
stream = Client.GetStream()
Do
st = stream.DataAvailable
If (st = True) Then
Dim bytes(Client.ReceiveBufferSize) As Byte
stream.Read(bytes, 0, CInt(Client.ReceiveBufferSize))
s = Encoding.ASCII.GetString(bytes)
len = s.Length
index = s.IndexOf(":")
If index < 0 Then
Exit Sub
End If
'example CARD:1234567$
cmd = s.Remove(index, len - index) 'keep CARD as cmd
parm = s.Remove(0, index + 1) 'remove CARD:
index = parm.IndexOf("$")
Try
parm = parm.Remove(index, parm.Length - index)
Catch ex As Exception
End Try
stn.ProcRXCmd(cmd, parm)
End If
Loop
End Sub