查看單個文章
舊 2006-09-25, 05:29 PM   #3 (permalink)
cruise70
註冊會員
榮譽勳章
UID - 37757
在線等級: 級別:22 | 在線時長:585小時 | 升級還需:36小時級別:22 | 在線時長:585小時 | 升級還需:36小時級別:22 | 在線時長:585小時 | 升級還需:36小時級別:22 | 在線時長:585小時 | 升級還需:36小時級別:22 | 在線時長:585小時 | 升級還需:36小時級別:22 | 在線時長:585小時 | 升級還需:36小時級別:22 | 在線時長:585小時 | 升級還需:36小時
註冊日期: 2003-02-13
VIP期限: 2007-05
文章: 222
精華: 0
現金: 266 金幣
資產: 266 金幣
預設

引用:
作者: mini
vbs 因為沒有 Form 可以用
所以無法模擬鍵盤畫面

除非使用 VBA (也就是在MS 的應用程式上使用的 vbscript)
才可以宣告API

就算不是要 鍵盤畫面
或只是 直接寫譜方式 來模擬
.vbs 也沒有多媒體演奏函式可以使用

這裡有個利用網頁的vbscri...
不能作Form的話,真的有點可惜
能不能請教大大
完整的播放一個聲音檔是下面這樣而已嗎?
dim MCIOBJ
set MCIOBJ = CreateObject("WScript.Shell")
MCIOBJ.run "mplay32.exe /play /close c:\piano.wav"

還是說我需要再叫出"windows多媒體裝置控制台"才可以執行?
MCIOBJ.run "Rundll32.exe Shell32.dll, Control_RunDLL mmsys.cpl,,0"

只能退而求其次準備多個鋼琴按鍵音的檔,沒有Form直接用鍵盤彈,也是不錯
如果要這麼做的話,第三行可不可以直接去掉 /close 寫成
MCIOBJ.run "mplay32.exe /play c:\piano.wav"

印象中好像有個程式叫API-Guide
好像可以查出API的功能,不過好像只有英文版(大概)
另外FoxAPIv15好像也可以,不過是簡體版,所以使用上會有亂碼
cruise70 目前離線  
送花文章: 8, 收花文章: 2 篇, 收花: 3 次
回覆時引用此帖