<DescriptionAttribute("Connect to a server asynchronously. The EndConnect event is raised when completed.")>
Public Overloads Function BeginConnect( _
   ByVal server As String, _
   ByVal serverPort As Integer _
) As IAsyncResult

Dim instance As Tcp
Dim server As String
Dim serverPort As Integer
Dim value As IAsyncResult
 
value = instance.BeginConnect(server, serverPort)

[DescriptionAttribute("Connect to a server asynchronously. The EndConnect event is raised when completed.")]
public IAsyncResult BeginConnect( 
   string server,
   int serverPort
)

[DescriptionAttribute("Connect to a server asynchronously. The EndConnect event is raised when completed.")]
public: IAsyncResult* BeginConnect( 
   string* server,
   int serverPort
) 

[DescriptionAttribute("Connect to a server asynchronously. The EndConnect event is raised when completed.")]
public:
IAsyncResult^ BeginConnect( 
   String^ server,
   int serverPort
) 

Private Sub Test()
   ' Begin to asynchronously connect to an echo port.
   Tcp1.BeginConnect("atropos", 7)
End Sub

Private Sub Tcp1_EndConnect(ByVal sender As Object, ByVal e As ExceptionEventArgs) Handles Tcp1.EndConnect
   ' Connect complete, check for any exceptions
   If e.Exception Is Nothing Then
      ' Now send some data.
      Tcp1.Send("hello")

      ' Receive the data back.
      Dim seg As Segment = Tcp1.Receive()
      Debug.WriteLine(seg.ToString())
   End If
End Sub

private void Test()
{
   // Begin to asynchronously connect to an echo port.
   tcp1.BeginConnect("atropos", 7);
}

private void tcp1_EndConnect(object sender, ExceptionEventArgs e)
{
   // Connect complete, check for any exceptions
   if(e.Exception == null)
   {
      // Now send some data.
      tcp1.Send("hello");

      // Receive the data back.
      Segment seg = tcp1.Receive();

      Debug.WriteLine(seg.ToString());
   }
}