vb计算机扬声器发出声响

1、运行“Microsoft Visual Studio 2010”。

2、”vs“的窗口弹出后，找到菜单栏，鼠标左键单击标题为”文件（f）“的选项。

3、在弹出的列表中鼠标左键单击标题为”新建项目（p）“的项。

4、在弹出的标题为”新建项目“，鼠标左键选择标题为”Visual Basic“项，在选择标题为”WIndows“的项。再在右边的列表中选择标题为”Windows 窗体应用程序“。再鼠标左键单击标题为”确定“的按钮。

5、在一个背景为”白色"的窗口，且标题为“ForM1”的窗口中的空白处鼠标左键双击。

6、在新切换到的“代码编辑页面”的 “Public Class Form1”下写代码：Public Declare Function _哔哔的声音 Lib "稆糨孝汶;kernel32" Alias "Beep" (ByVal dwFreq As Integer, ByVal dwDuration As Integer) As Boolean

7、再在“ Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub”下写代码： Private Sub 发声(ByVal a As Integer, ByVal b As Integer) _哔哔的声音(a, b) End Sub

8、最后在“Private Sub Form1_Load(ByVal sender As System.Object, ByVal 髫潋啜缅e As System.EventArgs) Handles MyBase.Load”下代码：----------------------------发声 （600,500）----------------------------最后测试一下就OK喽~~！ O(∩_∩)O~

9、如果您成功是计算机扬声器发声了，就投个票票吧~~！嘿嘿！