Shell
"explorer.exe
"
&
Chr(34)
&
app.Path
&
Chr(34),
vbNormalFocus
这个可以打开任意路径的文件夹
Shell
"explorer.exe
"
&
Chr(34)
&
"你要打开的文件夹路径"
&
Chr(34),
_
vbNormalFocus
1、点击对话框下菜单,点击打开文件对话框。
2、点击FileName控件,设置FileName文件名。
3、然后在这里设置对象可见性的级别。
4、点击Title选项,设置标题的名称。
5、毕孝按F8开始单步调试代码,点击Command2,者乱进入单步调试功能。
6、多次按下F8或直接按下F5运首数档行完成,就完成了读取文本文件内容并输出到立即窗口。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)