Re: [VB6 ] 關於音樂的疑問
※ 引述《horain (虎爛)》之銘言:
Private Sub sleep Lib"kerne132"(ByVal dwMilliseconds AS Long)
: 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的
: 不過還是弄不出來= ="
: 所以 麻煩可以指導一下嗎?
: 謝謝
加上這行
然後再用sleep終於解決了
感謝大家的提示了
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.127.117.9
討論串 (同標題文章)
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章