Imports System
Imports System.Messaging
Public Class MyNewQueue
Public Shared Sub Main()
' Create a new instance of the class.
Dim myNewQueue As New MyNewQueue()
' Output the count of Lowest priority messages.
myNewQueue.CountLowestPriority()
Return
End Sub 'Main
No comments:
Post a Comment