public event SmtpMessageMXLookupDoneEventHandler MessageMXLookupDone

Public Event MessageMXLookupDone As SmtpMessageMXLookupDoneEventHandler

using System;
using System.Collections;
using MailBee;
using MailBee.SmtpMail;

class Sample
{
    // MessageMXLookupDone event handler.
    private static void OnMessageMXLookupDone(object sender,
        SmtpMessageMXLookupDoneEventArgs e)
    {
        // Create and display comma-separated list of domains for which 
        // SMTP MX servers have been found.
        string domains = string.Join(", ",
            (string[])ArrayList.Adapter(e.SuccessfulDomains).ToArray(typeof(string)));

        Console.WriteLine("Will send to MX servers of the following domains: " + domains);
    }

    // The actual code.
    static void Main(string[] args)
    {
        Smtp mailer = new Smtp();

        // Get DNS servers from config file/OS settings.
        mailer.DnsServers.Autodetect();

        // Subscribe to the MessageMXLookupDone event.
        mailer.MessageMXLookupDone +=
            new SmtpMessageMXLookupDoneEventHandler(OnMessageMXLookupDone);

        // Send a message to 3 recipients on 2 domains.
        mailer.To.AsString = "user1@domain1.com, user2@domain1.com, user2@domain2.com";
        mailer.From.Email = "sender@domain.com";
        mailer.Subject = "Test message";
        mailer.Send();

        Console.WriteLine("Sent to: " + mailer.GetAcceptedRecipients().ToString());
    }
}

Imports System
Imports System.Collections
Imports MailBee
Imports MailBee.SmtpMail

Class Sample
    ' MessageMXLookupDone event handler.
    Private Shared Sub OnMessageMXLookupDone(ByVal sender As Object, _
        ByVal e As SmtpMessageMXLookupDoneEventArgs)
        ' Create and display comma-separated list of domains for which 
        ' SMTP MX servers have been found.
        Dim domains As String
        domains = String.Join(", ", ArrayList.Adapter(e.SuccessfulDomains).ToArray())

        Console.WriteLine("Will send to MX servers of the following domains: " & domains)
    End Sub

    ' The actual code.
    Shared Sub Main(ByVal args As String())
        Dim mailer As New Smtp

        ' Get DNS servers from config file/OS settings.
        mailer.DnsServers.Autodetect()

        ' Subscribe to the MessageMXLookupDone event.
        AddHandler mailer.MessageMXLookupDone, AddressOf OnMessageMXLookupDone

        ' Send a message to 3 recipients on 2 domains.
        mailer.To.AsString = "user1@domain1.com, user2@domain1.com, user2@domain2.com"
        mailer.From.Email = "sender@domain.com"
        mailer.Subject = "Test message"
        mailer.Send()

        Console.WriteLine("Sent to: " & mailer.GetAcceptedRecipients().ToString())
    End Sub
End Class