InetError Example for Visual Basic

Private Sub LEADNet1_InetError (ByVal iComputer As Integer, ByVal iMessage As Integer, ByVal iError As Integer)
   MsgBox "Computer: " + CStr(iComputer) + " had Error: " + CStr(iError) + " at: " + CStr(iMessage)
End Sub