vb 打开文件对话框

Question

我添加了common dialog控件，打开了显示某个文件夹的对话框，但我不知道如何执行里面选中的文件（rmvb），请问大侠们该如何编写？
如何我想用暴风的插件呢？

Answer 1

选择了commondialog控件中的某个文件后，则其filename属性即代表此文件名，例如用下面的语句即可用windowsmediaplayer控件播放选择的媒体文件（包括rmvb）：

WindowsMediaPlayer1.URL = CommonDialog1.FileName

Answer 2

w = Shell("程序文件路径\文件名 要打开的文件路径\文件名", 1)
比如，假定你C盘根目录下有一个名为“1.txt”的文件，可以用记事本打开：
w = Shell("notepad.exe c:\1.txt", 1)
用暴风影音播放Mp3：
x = Shell("C:\Program Files\StormII\storm.exe F:\wxm\二胡\二泉映月.mp3", 1)

Answer 3

CommonDialog1.InitDir = "c:/abc" '默认打开目录
CommonDialog1.Filter = "视频媒体(*.rmvb)|*.rmvb|流媒体(*.rm)|*.rm" '文件过滤器
CommonDialog1.ShowOpen '打开对话框

Answer 4

打开RMVB这个多媒体文件你要添加另外一个可插入对象windowsmediaplayer，然后WindowsMediaPlayer1.URL = CommonDialog1.FileName

你只要插入一个暴风影音对象就可以了

Answer 5

common dialog控件的作用仅仅是返回选中文件的路径，接下来怎么做需要用别的代码来实现的

Answer 6

学习下··