System BEEP using VB.NET

   Public Shared Function _
       aBeep(ByVal dwFreq As Integer, ByVal dwDuration As Integer)   As Boolean
        ' can leave body of the function empty.
    End Function

Use system dll for beep.

Now call aBeep(100,100), multiple time to make a rhythmic beep.