4个回答
展开全部
在工具箱中右键-->部件,在弹出的窗口中找到microsoft common dialog control 6.0 选中。确定
另附:
常用方法:
showopen---打开
showsave--保存
showcolor--颜色
属性:
filename--返回选中的文件路径
filter--文件过滤
简单实例:按钮一个,commondialog控件一个
Private Sub Command1_Click()
CommonDialog1.ShowOpen
FileName = CommonDialog1.FileName
If Dir(FileName) = "" Then
'填写的路径不存在就退出
Exit Sub
End If
MsgBox "您选的路径是:" & vbCrLf & FileName
End Sub
Private Sub Form_Load()
CommonDialog1.Filter = "文本文件|*.txt|"
End Sub
另附:
常用方法:
showopen---打开
showsave--保存
showcolor--颜色
属性:
filename--返回选中的文件路径
filter--文件过滤
简单实例:按钮一个,commondialog控件一个
Private Sub Command1_Click()
CommonDialog1.ShowOpen
FileName = CommonDialog1.FileName
If Dir(FileName) = "" Then
'填写的路径不存在就退出
Exit Sub
End If
MsgBox "您选的路径是:" & vbCrLf & FileName
End Sub
Private Sub Form_Load()
CommonDialog1.Filter = "文本文件|*.txt|"
End Sub
展开全部
在VB左侧的工具栏内空白处,点击右键,选择“部件”,在控件列表里面勾选“Microsft Command Dialog Contrl 6.0”,然后确定
回到form1,点新添加的部件,在form1中添加
回到form1,点新添加的部件,在form1中添加
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
在VB左侧的工具栏内空白处,点击右键,选择“部件”,在控件列表里面勾选“Microsft Command Dialog Contrl 6.0”,然后确定即可!
注意:绿色版的VB可能没有这个组件,需要另外去下载!
注意:绿色版的VB可能没有这个组件,需要另外去下载!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用记事本打开 vbp 文件 在 Startup= 上加一行 保存后重新打开工程
Object={F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0; comdlg32.ocx
Object={F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0; comdlg32.ocx
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询