不知楼主到底是要实现什么样的功能?难道那个ActiveForm窗口不是你写的吗? 如果一个窗口在某一个变量有不存在的可能,除非如此: (1)假定下面的这个就是你所谓的ActiveForm窗口(假定窗口的名称为xxxform)中的代码: if Mycz=true then '如果mycz是真的,就定义一个变量 public xxx as integer end if(2)判断时,可以用下面的代码进行判断 on error resume next '进行错误处理 dim xxxok as integer xxxok=xxxform.xxx if err.Number=0 then msgbox("变量xxxx已经存在") else msgbox("变量xxx不存在) end if
看楼主使用ActiveForm,我想这一定是个后期绑定对象,编译时的确不会报错。可以理解楼主的想法!想判断也简单呀,用On Error就行了,如: On Error Resume Next s=ActiveForm.PubVarName if err<>0 then exit sub
如果一个窗口在某一个变量有不存在的可能,除非如此:
(1)假定下面的这个就是你所谓的ActiveForm窗口(假定窗口的名称为xxxform)中的代码:
if Mycz=true then '如果mycz是真的,就定义一个变量
public xxx as integer
end if(2)判断时,可以用下面的代码进行判断
on error resume next '进行错误处理
dim xxxok as integer
xxxok=xxxform.xxx
if err.Number=0 then
msgbox("变量xxxx已经存在")
else
msgbox("变量xxx不存在)
end if
On Error Resume Next
s=ActiveForm.PubVarName
if err<>0 then exit sub
俺就是不想用出錯來判斷,看看有什麼好得辦法
*******************************俺就是不想用计算机和代码来实现,看看有什么办法。
俺还有个想法,如何能编一个程序,当计算机拆掉了CPU之后还能运行呢?请指教!
真是晕了!那你就好好想想罢,想它个十年八年,我可帮不了你呀,对不起!