Option Explicit Dim Obj Set Obj = WScript.CreateObject("sComSound.Play") Obj.PlaySync("C:\WINNT\Media\The Microsoft Sound.wav") Set Obj = Nothing |
Option Explicit Dim Obj Set Obj = WScript.CreateObject("sComSoundPro.Play") Obj.PlaySync("C:\WINNT\Media\The Microsoft Sound.wav") Set Obj = Nothing |
MCI32.OCX |
MCIJP.DLL |
VB6JP.DLL |
VB6 ランタイム |
SampleCUI.exe サウンドファイル(絶対パス または exe のある場所からの相対パス) |