求VB程序【注释】!在窗体上画一个通用对话框,其名称为CommonDialog1,然后画一个命令按钮。。
展开全部
Private Sub Command1_Click()
'不用解释了吧
CommonDialog1.Filter = "All Files (*.*)|*.*|Text File(*.txt)|x.txt| batch
Files(*.bat)|*.bat"
'上面这两行其实是同一行(但有个问题:x.txt应改成*.txt)、用于设置对话框能打开的文件类型(这里有:1所有文件、2文本文件、3批处理文件)
CommonDialog1.FilterIndex = 2
'上面这句设置对话框中默认能打开的第一个文件类型是第2个类型(即上述给你排的第2个就是文本文件)
CommonDialog1.ShowOpen
'上面这句是当用户选择了对应文件类型相应的文件后采用“打开”的方式获取这个文件名称
MsgBox CommonDialog1.FileName
'这句显示上述打开的文件的文件名称及完整路径
End Sub
'不用解释了吧
明白了吧。
'不用解释了吧
CommonDialog1.Filter = "All Files (*.*)|*.*|Text File(*.txt)|x.txt| batch
Files(*.bat)|*.bat"
'上面这两行其实是同一行(但有个问题:x.txt应改成*.txt)、用于设置对话框能打开的文件类型(这里有:1所有文件、2文本文件、3批处理文件)
CommonDialog1.FilterIndex = 2
'上面这句设置对话框中默认能打开的第一个文件类型是第2个类型(即上述给你排的第2个就是文本文件)
CommonDialog1.ShowOpen
'上面这句是当用户选择了对应文件类型相应的文件后采用“打开”的方式获取这个文件名称
MsgBox CommonDialog1.FileName
'这句显示上述打开的文件的文件名称及完整路径
End Sub
'不用解释了吧
明白了吧。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询