VB能不能另主板的小喇叭响起或播放MID音乐!

Question

就像内存松了的那种效果，有谁能做到，请教高手了!!!

Answer 1

就是让PC喇叭发出不同频率的响声吧，用一个API就可以了'用于生成简单的声音
Declare Function Beep Lib "kernel32" Alias "Beep" (ByVal dwFreq As Long, _
                                             ByVal dwDuration As Long) As Long'返回值Long，TRUE（非零）表示成功，否则返回零。会设置GetLastError
'参数         类型及说明 
'dwFreq       Long，声音频率（从37Hz到32767Hz）。在windows95中忽略 
'dwDuration   Long，声音的持续时间，以毫秒为单位。如为-1，表示一直播放声音，直到
'             再次调用该函数为止。在windows95中会被忽略 

Answer 2

这些要求都能做到的,beep函数就可以让主板响声音,播放mid音乐就可以用vb中的控件就行了,

Answer 3

Private Declare Function APIBeep Lib "kernel32" Alias "Beep" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long东方热讯里面有个这方面的源码,你自己去找
http://www.easthot.net嘿嘿,我看成了:VB能不能另版主的小喇叭响起或播放MID音乐,,,,,,,晕了

Answer 4

你用过没有呀，要不就是你的硬件或系统有问题了,你试一下下面的语句
Beep 100, 500
我在一台有PC喇叭的台式机的WinXP系统测试通过，但在我的手提电脑不行
，我想可能是手提电脑没有PC喇叭吧所以在不行的。

Answer 5

对呀，Beep这个API是可以让PC喇叭发出声音没错呀，不是声卡，
是机箱上或主板上的小喇叭。我用了几台机子都没问题呀，2000
和XP也没问题呀。可能是你的机子问题吧，我不是说过了吗，我
只有在我的手提电脑没有试验成功，可能是因为电脑没有PC喇叭
吧,我在其他的台式电脑上都成功了。

Answer 6

Beep控制声音功能弱。其实喇叭可以发出65536种声音呢
 yinweihong(真名:尹伟红) 的应该不错。的确可以放mdi。这个和低层的东东有点关系。我也有代码可以控制喇叭发出不同声音，要的话发mail吧  [email protected]  估计和yinweihong介绍的是一个原理的

Answer 7

本来旧有函数可以调用控制那吧向的啊 
beep啊
你主要调用就行了啊

Answer 8

Public Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As LongPrivate Sub Form_Load()
' Syntax BEEP FREQUENCY, DURATION
Beep 1000, 300
Beep 1200, 300
Beep 1400, 300
Beep 1600, 300
Beep 1800, 300
Beep 2000, 600
Beep 1800, 300
Beep 1600, 300
Beep 1400, 300
Beep 1200, 300
Beep 1000, 300
End Sub