建一个按钮弹出文件选择框

我要建立一个按钮
点了按钮后会弹出选择文件的对话框让我选择
就是像上传文件那种,点上传，弹出个对话框让我选文件。
要怎么编码啊？？？
--------------------编程问答-------------------- 求大神帮忙啊急 --------------------编程问答-------------------- 我是小菜鸟啊大神帮帮你我吧 --------------------编程问答-------------------- 有木有人帮忙啊 555555555555 --------------------编程问答--------------------



Option Explicit

'添加CommonDialog控件的引用

Private Sub Command1_Click()

    Dim strFile As String

    CommonDialog1.ShowOpen

    strFile = CommonDialog1.FileName

End Sub

--------------------编程问答-------------------- 那个控件怎么添加啊添加不上啊 --------------------编程问答-------------------- 大神那个控件怎么添加啊弄不上啊

引用 4 楼的回复:

VB code

Option Explicit
'添加CommonDialog控件的引用
Private Sub Command1_Click()
    Dim strFile As String
    CommonDialog1.ShowOpen
    strFile = CommonDialog1.FileName
End Sub

--------------------编程问答-------------------- 那个控件怎么添加啊？不会啊

引用 4 楼的回复:

VB code

Option Explicit
'添加CommonDialog控件的引用
Private Sub Command1_Click()
    Dim strFile As String
    CommonDialog1.ShowOpen
    strFile = CommonDialog1.FileName
End Sub

--------------------编程问答-------------------- 无语，我是人，不是神，更不是大神
--------------------编程问答-------------------- 好难呀，说的是不是漫游大师5.0软件设置的按钮呀？ --------------------编程问答-------------------- 怎么添加Ａ？？？？？知道一下啊　　　　　　

引用 8 楼的回复:

无语，我是人，不是神，更不是大神

--------------------编程问答-------------------- 工程－》部件－》Microsoft Common Dialog Control 6.0 --------------------编程问答-------------------- 大哥你的QQ多少啊我的331571792 小弟想好好请教下您

引用 11 楼的回复:

工程－》部件－》Microsoft Common Dialog Control 6.0

--------------------编程问答-------------------- 大哥你Q多少啊小弟想好好请教下您啊我的331571792

引用 11 楼的回复:

工程－》部件－》Microsoft Common Dialog Control 6.0

--------------------编程问答-------------------- 插入ACTIVE 控件？我找到那个了点了提示不能使用

引用 11 楼的回复:

工程－》部件－》Microsoft Common Dialog Control 6.0

--------------------编程问答-------------------- CommonDialog控件，右键点击工具箱弹出菜单中点击部件，弹出部件对话框，里面有一个miscrosoft common dialog control 6.0 点击选中后按确定，这样工具箱里就有了

补充：VB ,  数据库(包含打印，安装，报表)

建一个按钮 弹出文件选择框

建一个按钮弹出文件选择框