当前位置：首页 - 正文

一个VB小程序

发布网友发布时间：2022-04-25 00:03

共3个回答

热心网友时间：2023-10-16 13:01

'要先单击“工程－部件”，显示“部件”对话框，将“Microsoft Common Dialog control 6.0(SP6)”选中，在工具栏就多出了一个CommonDialog控件图标，将其添加到窗体上
Private Sub Command1_Click()
CommonDialog1.Flags = cdlOFNReadOnly
'建立对话框时，只读复选框初始化为选定。该标志也指示对话框关闭时只读复选框的状态
CommonDialog1.Filter = "All Files(*.*)|*.*|Text Files(*.Txt)|*.txt"
'过滤器，只让需要的文件显示出来
CommonDialog1.FilterIndex = 1
'优先显示过滤器中第一选项（本例中就是All Files(*.*)|*.*|）
CommonDialog1.ShowOpen
'显示打开对话框
MsgBox CommonDialog1.FileName
'显示选定文件的路径及文件名
End Sub

热心网友时间：2023-10-16 13:02

弹出“打开文件”对话框
文件类型有两个选项：*.*所有文件，*.txt文本文件
hidereadonly 隐藏只读复选框
msgbox显示选中的文件名

热心网友时间：2023-10-16 13:02

就是用VB打开文本文件了，楼上详解。

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:11247931@qq.com

焦点

一个VB小程序

最新推荐

猜你喜欢

热门推荐