"Beeps" con diferentes tonos en basic

[seba123neo]

como no pusiste que estabas trabajando con .NET asumi que era con visual basic 6...en .NET seria asi, no necesitas mas api's...

Código vb:

Public Class Form1
 
    Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Console.Beep(1000, 500)
    End Sub
 
End Class
 

y el otro:

Código vb:

Public Class Form1
    Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For Cnt As Integer = 0 To 700 Step 10
            Console.Beep(Cnt, 50)
            Me.Text = Cnt
            Application.DoEvents()
        Next Cnt
    End Sub
End Class
 

saludos.