Public Class AsyncExample
 ' Synchronous methods.
 Public Function Method1(ByVal param As String) As Integer
End Function

Public Sub Method2(ByVal param As Double)
 ' Asynchronous methods.
 End Sub

Public Overloads Sub Method1Async(ByVal param As String)
 End Sub

Public Overloads Sub Method1Async(ByVal param As String, ByVal userState As Object)
 End Sub

Public Event Method1Completed As Method1CompletedEventHandler
 Public Overloads Sub Method2Async(ByVal param As Double)
 End Sub

Public Overloads Sub Method2Async(ByVal param As Double, ByVal userState As Object)
 End Sub

Public Event Method2Completed As Method2CompletedEventHandler
 Public Sub CancelAsync(ByVal userState As Object)
 End Sub

Public ReadOnly Property IsBusy() As Boolean
Get
End Get
End Property
End Class