用API吧,比MCI控件舒服
另外,你如果就是想用控件,建议使用Media Player Control
那个控件功能很强大的
mediaplayer.PlayCount =0就可以循环播放
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As LongPrivate Const SND_ASYNC = &H1
Private Const SND_LOOP = &H8
Private Const SND_MEMORY = &H4
Private Const SND_NODEFAULT = &H2
Private Const SND_NOSTOP = &H10
Private Const SND_NOWAIT = &H2000
sndPlaySound filename, SND_ASYNC Or SND_LOOP
另外,你如果就是想用控件,建议使用Media Player Control
那个控件功能很强大的
mediaplayer.PlayCount =0就可以循环播放
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As LongPrivate Const SND_ASYNC = &H1
Private Const SND_LOOP = &H8
Private Const SND_MEMORY = &H4
Private Const SND_NODEFAULT = &H2
Private Const SND_NOSTOP = &H10
Private Const SND_NOWAIT = &H2000
sndPlaySound filename, SND_ASYNC Or SND_LOOP
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货