7,765
社区成员
发帖
与我相关
我的任务
分享这简直是白送分数了！！
两个问题：
1. MMcontrol 控件 中如何得到播放结束的事件？如何响应？
2. MMcontrol 控件 中通过什么来调整音量???
别建议我用Media Play控件!!!
1. MMcontrol 控件 中如何得到播放结束的事件？如何响应？
2. MMcontrol 控件 中通过什么来调整音量???
别建议我用Media Play控件!!!
...全文
请发表友善的回复…
发表回复
lanren_me 2001-08-17
- 打赏
- 举报
Private Sub Form_Load()
With MMControl1
.Notify = False
.hWnd = Me.hWnd
.FileName = Path
.Command = "paly"
End With
End Sub
Private Sub MMControl1_Done(NotifyCode As Integer)
If MMControl1.Notify = True Then
MMControl1.Command = "play"
End Sub
调整音量好像没有。只能通过api调整系统
With MMControl1
.Notify = False
.hWnd = Me.hWnd
.FileName = Path
.Command = "paly"
End With
End Sub
Private Sub MMControl1_Done(NotifyCode As Integer)
If MMControl1.Notify = True Then
MMControl1.Command = "play"
End Sub
调整音量好像没有。只能通过api调整系统
