^_^大家好，我们每天基本都会用到手机中的电话功能，当你给对方打电话时，默认的等待声音是嘟嘟嘟的声音（开通彩铃的用户除外）。
那么，你有想过这种声音如何用VB编程实现吗？
今天，我们就共同来看一下如何用VB编程来实现电话声音的诞生吧！
VB实现电话声音
程序分析：
VB程序默认的控件是不会发声的，我们需要引用API方法来实现本功能。
引用了上面的方法后，程序实现其实就很简单了，只需要建立一个模块，在里面写上声明的方法，新建一个窗体，在其上添加一个时钟控件、标签显示信息即可。
在窗体的时钟控件中写相应的调用方法事件即可。
程序代码如下：
模块中代码：
DeclaeFunctionBeepLib"kenel32"(ByValdwFeqAsLong,ByValdwDuationAsLong)AsLong
窗体中代码：
PivateSubTime1_Time()
CallBeep(,)
EndSub
程序运行视频链接
大家可以直接复制链接，在浏览器中打开即可观看