js弹出模态对话框 VB中，点击命令按钮，怎么弹出对话框，用来选取文件路径？
VB中，点击命令按钮，怎么弹出对话框，用来选取文件路径？添加CommonDialog控件专用子命令1uClick（）commondialog1。显示打开文本1。文本=公共对话框1。文件名结束子使用常规
VB中，点击命令按钮，怎么弹出对话框，用来选取文件路径？
添加CommonDialog控件专用子命令1uClick（）commondialog1。显示打开文本1。文本=公共对话框1。文件名结束子使用常规对话框，代码参考
私有子命令1单击（）
如果trim（text1）=“”那么
msgbox “请输入XXX”，vbgraphic，“prompt”（弹出对话框）
text1=“（清除文本框内容）
text1.setfocus（文本框获取输入焦点）
end if
end[sub
注意：trim（）用于删除括号中对象内容两端的空格。”。最好不要忽略它，因为用户可以在对象中输入空格（例如示例中的文本框），然后单击命令按钮。此时，如果省略trim（），则将获得错误处理。