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
要跳转处理的,这里如果按取消键是要产生一个错误的