event Result (Body as String)
Occurs while the client gets any server's response.

TypeDescription
Body as String A string expression that indicates the response of the server to the client's command.
Use the Result event to monitor the responses from the server. Use the Command event  to notify your application about the commands that the client sends to the server. Use the Error event to monitor the errors on the server side.

The following sample displays the command that client sends, and the response from the server. The sample displays the name of the first news group available on the news server.

Dim WithEvents n As EXNNTPLibCtl.NNTP

Private Sub Form_Load()
    Dim g As EXNNTPLibCtl.Group
    Set n = New NNTP
    n.Connect "news.devx.com"
    Set g = n.Groups.Item(0)
    Debug.Print g.Name
    n.Disconnect
End Sub

Private Sub n_Command(ByVal Command As String)
    Debug.Print "Command: " & Command
End Sub

Private Sub n_Result(ByVal Body As String)
    Debug.Print "Result"
    Debug.Print Body
End Sub