[VB6 ] 關於音樂的疑問

看板Visual_Basic作者 (虎爛)時間18年前 (2006/11/04 13:25), 編輯推噓10(1001)
留言11則, 3人參與, 最新討論串1/2 (看更多)
Private Sub cmd7Bar_Click() '拉BAR按鈕 picLucky7.Visible = False '隱藏圖片 '產生亂數值 lblNo1.Caption = CStr(Int(Rnd * 10)) 'VB中的rnd函數可以產生0~1的亂數值 lblNo2.Caption = CStr(Int(Rnd * 10)) 'VB中的rnd函數可以產生0~1的亂數值 lblNo3.Caption = CStr(Int(Rnd * 10)) 'VB中的rnd函數可以產生0~1的亂數值 '判斷是否有7出現? If lblNo1.Caption = "7" Or lblNo2.Caption = "7" Or lblNo3.Caption = "7" Then picLucky7.Visible = True '顯示圖片 Beep '啟動音效檔 請問這裡要如何讓他撥放兩次? End If ---------- 爬了文看了關於API的 不過還是弄不出來= =" 所以 麻煩可以指導一下嗎? 謝謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.127.117.9 ※ 編輯: horain 來自: 59.127.117.9 (11/04 13:31) ※ 編輯: horain 來自: 59.127.117.9 (11/04 13:32)

11/04 13:51, , 1F
Beep 兩次就好了啊@@
11/04 13:51, 1F

11/04 13:56, , 2F
如果是撥放音樂 專案 設定使用元件 windows media player
11/04 13:56, 2F

11/04 13:59, , 3F
Beep兩次 會執行錯誤= ="
11/04 13:59, 3F

11/04 14:06, , 4F
那你系統有問題@@
11/04 14:06, 4F

11/04 14:07, , 5F
會跳出"必須是函數或變數"
11/04 14:07, 5F

11/04 14:13, , 6F
call beep: call beep 不會有問題啊
11/04 14:13, 6F

11/04 14:50, , 7F
還是只有"咚"一聲而已 有辦法弄成"咚咚”兩聲嗎?
11/04 14:50, 7F

11/04 18:51, , 8F
第一聲還沒完就要求第二聲 就只能聽到一聲...要delay一下
11/04 18:51, 8F

11/04 19:31, , 9F
請問要如何延遲了(跪求
11/04 19:31, 9F

11/04 19:57, , 10F
迴圈中檢查時間差
11/04 19:57, 10F

11/05 18:16, , 11F
卡個sleep(API)在中間就好了
11/05 18:16, 11F
文章代碼(AID): #15J2HW24 (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #15J2HW24 (Visual_Basic)