在vb裡,我呼叫beep函式,為什麼發不出聲音啊,我是希望當文字框的輸出的數值大於某個數時就發出聲音

時間 2021-10-14 21:55:59

1樓:

vb裡,不能寫成call beep(2000, 3000),直接寫beep即可。

if temptext.text > "13" thenbeep

end if

如果嫌聲音不好,想改變聲音,就得使用api了。

private declare function beep lib "kernel32" (byval dwfreq as long, byval dwduration as long) as long

private sub command1_click()if temptext.text > "13" thenbeep 2000,3000 '2000是聲音的高低,3000是延長的時間(ms)

end if

end sub

2樓:

這是api……前提要宣告........ 要用語句用,不是函式。

private declare function beep lib "kernel32" alias "beep" (byval dwfreq as long, byval dwduration as long) as long

***************************if temptext.text > "13" thenbeep 2000, 3000

end if

end sub

3樓:長孫華黎

f=get(handles.gongshi,'string');

f = char(f);

x = sym('x');

f2 =['diff(' f ')'];

tryeq_expect = eval(f2);

catch exception

msgbox('please input the function in the right way!');

return

endf3 = char(f2);

set(handles.jieguo,'string',f3);

vb beep 函式問題,呼叫beep函式後沒有聲音。 30

4樓:匿名使用者

private declare function beep lib "kernel32" (byval dwfreq as long, byval dwduration as long) as long

private sub command1_click()beep 800, 2000 ' 以bai80hz的頻

du率zhi

響dao

專2秒鐘

屬end sub

private sub command2_click()endend sub

5樓:匿名使用者

不用api:

private sub command1_click()beep

end sub

6樓:匿名使用者

程式沒問題,檢視你的系統音量控制,是否調到最大,或選了靜音

為什麼執行beep()函式時聽不到聲音啊?

7樓:匿名使用者

beep函式的確是發給beep裝置的,這個裝置物理在主機板上,但windows通過hal接管了計算機所有的裝置,這個裝置也在beep.sys的驅動程式的控制下。

在沒有安裝音效卡驅動或者windows audio服務沒啟動的時候,beep.sys用主機板的蜂鳴器發聲,反之則重定向到聲音服務的警告訊息設定的聲音並通過音效卡發聲

vb編實現順序查詢的函式過程 呼叫此過程在有元素的陣列中

private sub form load dim b 15 as string b 3 a b 9 b b 11 c msgbox searchvalinarray b,b end sub private function searchvalinarray byref a as string,by...

c的類中在建構函式中呼叫析構函式會發生什麼

就跟呼叫成員函式一樣,在語法上是可行的 但是由於析構函式的功能,在語義上可能會有無法預料的結果因為在物件銷毀時會隱式呼叫一次,可能會出問題同時考慮這個 偽 class a a 這個屬於合法不合理的事,除非你析構設計的就是想隨時呼叫都沒事。 無論是在基類還是在子類,類的析構函式都是不允許被顯式呼叫的,...

在excel函式中,絕對引用時要加f4,為什麼我的加了f4卻

酸菜魚的娛樂 excel中絕對引用不是加f4,而是按f4。1 電腦開啟excel 2 開啟excel 後,輸入公式,要絕對引用c1。3 輸入c1後,直接按f4鍵,即可絕對引用c1。4 輸入公式後,按回車鍵即可。 灰機灰過 f4是用來切換相對引用和絕對引用的,用不了是因為按鍵衝突,因為有時候qq在執行...