vb.net 怎么通过频率时长发声

不是调用api midi发音 是通过时长和频率发音 -。- 
求达人解惑啊 不甚感谢 --------------------编程问答-------------------- 没人啊 自己顶一下吧。。 --------------------编程问答--------------------  ''' <summary>
        ''' 计算机扬声器发声
        ''' beep(频率,时长)单位ms
        ''' </summary>
        ''' <param name="dwFreq"></param>
        ''' <param name="dwDuration"></param>
        ''' <returns></returns>
        ''' <remarks></remarks>
        Public Declare Function Beep Lib "kernel32" Alias "Beep" (ByVal dwFreq As Integer, ByVal dwDuration As Integer) As Integer

--------------------编程问答-------------------- 好像不需要用到api函数 --------------------编程问答--------------------

引用 2 楼 hezhilin 的回复:

''' <summary>
        ''' 计算机扬声器发声
        ''' beep(频率,时长)单位ms
        ''' </summary>
        ''' <param name="dwFreq"> </param>
        ''' <param name="dwDuration"> </param>
        ''' <returns> </returns>
        ''' <remarks> </remarks>
        Public Declare Function Beep Lib "kernel32" Alias "Beep" (ByVal dwFreq As Integer, ByVal dwDuration As Integer) As Integer

这个可以，不用api的方法不知道，呵呵

补充：.NET技术 ,  VB.NET