标题:小鸟得问题
只看楼主
平民天子
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-2-21
 问题点数:0 回复次数:6 
小鸟得问题

大家好!我是一个VB初学者,前几天看书上有这么一个例子,就想自己试一试,可是怎么都不成功。大家帮忙看看谢谢~


Private Sub cmdExit_Click()
End
End Sub

Private Sub cmdOpen_Click()
Dim stFileName As String

cdlGetFile.Filter = "MP3 Files|*.MP3"
cdlGetFile.Flags = cdlOFNHideReadOnly
cdlGetFile.InitDir = "C:\Windows\Desktop\"
cdlGetFile.ShowOpen

stFileName = cdlGetFile.FileName

Player.Open stFileName

End Sub

Private Sub cmdPlay_Click()
Player.Play
End Sub

Private Sub cmdStop_Click()
Player.Stop
End Sub

搜索更多相关主题的帖子: 小鸟 
2006-03-06 15:00
平民天子
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-2-21
得分:0 
这是一个播放器
2006-03-06 15:03
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
请问你这Player是什么控件???

我的msn: myfend@
2006-03-06 18:27
平民天子
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-2-21
得分:0 

就是在工具箱里选Frame,在将4个命令键放到Frame上面。还有就是在部件里面选得CommonDialog。
我有很菜啊 ~~~可能说得不是很明白。见亮啊 !

2006-03-06 21:38
平民天子
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-2-21
得分:0 

就是在工具箱里选Frame,在将4个命令键放到Frame上面。还有就是在部件里面选得CommonDialog。
我有很菜啊 ~~~可能说得不是很明白。见谅啊 !

2006-03-06 21:39
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
你都没有添加这个多媒体控件..

我的msn: myfend@
2006-03-06 21:46
平民天子
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-2-21
得分:0 

我添加了一个Windos Media Player,你能说得细一点吗?谢谢

2006-03-06 22:49



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-48695-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.120039 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved