MsgBox a
如果你安裝了聲卡的話，還能發出聲音。
好東西不敢獨享。
uj5u.com熱心網友回復：
謝謝，這個代碼正需要。uj5u.com熱心網友回復：
還要確保你音響開著，并且接通了電源，電源要有電，而且是220V交流電。ps：并且要看了zx099x的神貼，才會響哦
uj5u.com熱心網友回復：
聲卡還需要正確驅動uj5u.com熱心網友回復：
我的電腦喵的一聲uj5u.com熱心網友回復：
我的電腦'duang'的一聲...
uj5u.com熱心網友回復：
首先要是一個好聲卡uj5u.com熱心網友回復：
筆記本電腦如果電池有電也可以響
uj5u.com熱心網友回復：
好像在不同電腦上還可以發不同的聲音呢我電腦上是“嘟”的一聲
朋友電腦上竟然是“叮”的一聲
LZ真牛
uj5u.com熱心網友回復：
他不用筆記本，暴露了uj5u.com熱心網友回復：
拿把錘子敲一下，包響。uj5u.com熱心網友回復：
我的靜音了....uj5u.com熱心網友回復：
沒死機就好uj5u.com熱心網友回復：
LZ真牛
uj5u.com熱心網友回復：
能不能讓他“汪，汪”地叫？uj5u.com熱心網友回復：
理論上講是可以的，望樓主給出代碼
uj5u.com熱心網友回復：
如果你將WINDOWS檔案夾下的WAV檔案都刪掉的話,就會聽到一個放屁的聲音了. 口味重的朋友可以試試uj5u.com熱心網友回復：
完全可以uj5u.com熱心網友回復：
LZ 太強了uj5u.com熱心網友回復：
期待中......
uj5u.com熱心網友回復：
Private Sub Command1_Click()
'從網上下載一個狗叫聲，WAV格式的，如果不是的話自己找工具轉換
'把檔案 狗叫聲.wav拷貝到"C:\WINDOWS\Media\"
If Dir("C:\WINDOWS\Media\Windows XP 叮當聲.wav") <> "" Then Name "C:\WINDOWS\Media\Windows XP 叮當聲.wav" As "C:\WINDOWS\Media\Windows XP 叮當聲2.wav"
If Dir("C:\WINDOWS\Media\狗叫聲.wav") <> "" Then Name "C:\WINDOWS\Media\狗叫聲.wav" As "C:\WINDOWS\Media\Windows XP 叮當聲.wav"
MsgBox a
If Dir("C:\WINDOWS\Media\Windows XP 叮當聲.wav") <> "" Then Name "C:\WINDOWS\Media\Windows XP 叮當聲.wav" As "C:\WINDOWS\Media\狗叫聲.wav"
If Dir("C:\WINDOWS\Media\Windows XP 叮當聲2.wav") <> "" Then Name "C:\WINDOWS\Media\Windows XP 叮當聲2.wav" As "C:\WINDOWS\Media\Windows XP 叮當聲.wav"
End Sub
uj5u.com熱心網友回復：
uj5u.com熱心網友回復：
遲鈍的人，拿啥敲也就這樣了。
uj5u.com熱心網友回復：
msgbox "sb"uj5u.com熱心網友回復：
Beep
uj5u.com熱心網友回復：
咳咳,話說WINDOWS有聲音組件的,可以呼叫他,讓他發生,至于你的計算機是男是女,需要呼叫驗證...uj5u.com熱心網友回復：
發聲...uj5u.com熱心網友回復：
是男是女，摸摸才知道……
uj5u.com熱心網友回復：
這年頭，也不能完全保證。
uj5u.com熱心網友回復：
+1
uj5u.com熱心網友回復：
靜靜的電腦uj5u.com熱心網友回復：
果然是真的uj5u.com熱心網友回復：
話說
Beep;Beep
uj5u.com熱心網友回復：
就是想看看uj5u.com熱心網友回復：
旺旺，uj5u.com熱心網友回復：
正需要找這方面的東西。。學習中。。uj5u.com熱心網友回復：
uj5u.com熱心網友回復：
死企鵝什么時候當扮豬了……uj5u.com熱心網友回復：
我怎么看不到下載地址
uj5u.com熱心網友回復：
謝謝，這個代碼正需要。uj5u.com熱心網友回復：
樓上練得一手挖墳的好功夫
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/132443.html
標籤：多媒體
上一篇：（求助）視頻播放的問題