如何判断VB中Multimedia MCI 控件是否在播放

2024-12-18 12:49:08

推荐回答（3个）

回答1：

MMControl1.Position = MMControl1.Length 这个等于 True 就表示播放完毕了说明：MMControl1.Position 是正在播发的音频位置MMControl1.Length 是正在播发的音频总长度（单位：毫秒）

回答2：

在你让音乐开始的控件上加：Timer1.Enabled = True添加 timer控件，在timer1控件的属性设置为.Enabled =False Interval=120000在过程Private Sub Timer1_Timer()中
MsgBox "音乐已结束" '添加你要音乐结束的其他事件
End Sub

回答3：

你有用滚动条控制进度吧？if scroll1.max=scroll1.value then label1.caption = "播放已停止"

如何判断VB中Multimedia MCI 控件 是否在播放

如何判断VB中Multimedia MCI 控件是否在播放