【转帖】vba 对话框上按钮不起作用
 

vba 对话框上按钮不起作用
www.dimcax.com
vba 对话框上按钮不起作用
private sub commandbutton1_click()
on error resume next
with comdlg
.dialogtitle = "选择文本文件"
.filter = "文本文件(*.txt)|*.txt|所有文件(*.*)|*.*"
.initdir = "c:\"
.showopen
end with
'dim aaa
'aaa = "button1 finish bbb"
'debug.print aaa
end sub
这样的程序中，单击按钮不能达到预期目的啊？？
progress every day!!!

好像没什么问题
你先把错误捕获的那句去掉，看运行提示会有什么错误

这块的错误捕捉不能用resume next
要跳转处理的，这里如果按取消键是要产生一个错误的