走近VB.Net(十) 播放声音文件(8)

2008-04-10 03:08:11来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折

End Sub

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs)

AxMMControl1.From = 0 ''''从 0毫秒开始

AxMMControl1.To = 8815 ''''从3000毫秒结束

AxMMControl1.Command = "play" ''''播放

End Sub

Protected Sub AxMMControl1_OLEDragDrop(ByVal sender As Object, ByVal e As AxMCI.DmciEvents_OLEDragDropEvent)

End Sub

Public Sub me_load()

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:走近VB.Net(八) 常用语法

下一篇:走近VB.Net(十一) 随心所欲窗体外观(skin精彩源码)