VB提示MP3报警音
我想在command1里的内容执行完成后提示个报警音,表示已经执行完成,mp3play.ocx好象要有许可的,不是免费的控件,要花钱买,注册后才有全部的功能,还有,如何来用windowmediaplayer的控件来代替?
请高手用代码指点下!非常感谢了!
用wav呗,报警音又不长
是啊 怎么才能实现啊 alifriend(波导终结者)给个你做过的代码看看 我想在 command1里的内容执行完成后提示个报警音
'部件里添加MCI32.ocx,最简单
Private Sub Form_Load()
MMControl1.FileName = "E:\Music\bg.mp3"
MMControl1.Command = "open" '打开设备
MMControl1.Command = "Play"
End Sub
Private Sub Form_Unload(Cancel As Integer)
MMControl1.Command = "close" '退出时关闭MCI设备
End Sub
怎么与command1联系起呢 我是想在 command1里执行完成后提示个报警音,是不是这样就可以了:
VB code:
Private Sub Command1_Click()
......... '我的代码
MMControl1.FileName = "E:\Music\bg.mp3"
MMControl1.Command = "open" '打开设备
MMControl1.Command = "Play"
End Sub
Private Sub Form_Unload(Cancel As Integer)
MMControl1.Command = "close" '退出时关闭MCI设备
End Sub
另外MCI
相关问答:
我有厂家做的ASP的监控录像(DVR)的局域网播放的源程序与控件,想要用ASP.net做一个视频回放的程序(利用他的控件)但不知如下去做,望各位指点。
先搞清楚他们的控件是怎么用的,
然后就直接用好了.
不过,如 ......
我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好,用instance不是就可以了 ......
VB偶学得不错,现在大一,高三的时候就学VB了,现在学校里都是学C#和VB.NET的兄弟多。。。
偶要转行VB.NET了~当年学VB学了2年,对VB里面的常用函数都十分了解。
Select、If结构、For Next循环、等都了解。。。 ......
Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
DTP2.Enabled = True
Else
......