一个简单的控件问题,各位请进! http://www.csdn.net/expert/topic/560/560709.xml?temp=.2971918自定义打开对话框。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 On error resume nextwith CommonDialog1 .CancelError=True .... .ShowOpenEnd WithIf Err <> 32755 Then msgbox "点击确定"else msgbox "点击取消"end if 求救啊!!为什么我的连接不能关闭,只要执行将提示错误Debug Assertion Failed! file:sockcore.cpp line:226 怎么样才能让ACESS中主键自动增1呢? 你知道吗??这才叫牛 请教个问题 请大家帮忙解决下 ME 到底指的哪个对象? 求助!! 请问在VB中有没现成的存储文件对话框...急 如何改变菜单字体的大小? 如何使用SQL语句往数据库中添加一条空记录! 关于IME 请大家谈谈自己搞VB经历以及主要搞那方面的 请问API的什么函数可以用来写INI文件!谢谢了!
with CommonDialog1
.CancelError=True
....
.ShowOpen
End With
If Err <> 32755 Then
msgbox "点击确定"
else
msgbox "点击取消"
end if