主题：[问题已解决]UserCode错误

此主题相关图片如下：无标题.png

这个错误是什么情况？？？？

自定义函数有问题？？

请大神们帮忙啊。。

问题补充：

这个问题是在内部函数中增加了一个名为ToolFormOpen的自定义函数后产生的。

函数代码

Forms("信息提示").Open()
Forms("信息提示").Controls("提示信息").Text = Args(0)
Forms("信息提示").BaseForm.Width = Forms("信息提示").Controls("提示信息").Width + 90
Return Nothing

这个有问题么？

测试了下项目中其他只要有引用内部函数的地方都会报错，不引用内部函数的就不报错。。。

郁闷啊。

删除Catch文件，删除刚写的这个内部函数，还是报错。。。。。

怎么回事啊。。

你窗口中的LfterLoad事件中的代码有错.把代码或者文件发上来.

不是的。只要窗口中的代码不引用任何内部函数就不报错。

一旦引用内部函数的窗口、按钮等等全都报错。。。。。

文件发出来.

郁闷死了。昨天晚上00：32写好代码睡觉还好好的。。今天刚准备继续写代码，写了一个内部函数就来问题了。。。。

例子文件发出来.这样便于帮助你找出问题.

我都不知道该怎么写这个例子了。。

问题已解决。

也说下自己的错误吧。

全局代码中直接定义了

Public xx As WinForm.Form("XX") = Forms("XX")

这样定义的话，系统运行中就要报错，就算你不去使用定义的这个控件，系统也会报错。

感谢庞工。

发错地方了