InetReceiving Example for Visual Basic

Private Sub LEADNet1_InetReceiving (ByVal iComputer As Integer, ByVal lSize As Long)
   ' display data size as we get it
   Text1.Text = "Computer: " + CStr(iComputer) + " received " + CStr(iSize)
End Sub