应该写在过程中的代码写到了过程外。
在过程外无效
该语句必须发生在子过程、函数过程或属性过程(Property Get、Property Let 和
Property Set)内部。这个错误的起因与解决方法如下所示:
一个可执行的语句,如 Static 或 ReDim,出现在模块级别中。
在模块级中 Static 是不需要的,因为所有的模块级变量都是静态的。在模块级中用 Dim 来代替
ReDim。想要在模块级中创建动态数组,请用
Dim 加空括弧来声明它。
注意 在模块级只能使用注释与声明性语句,例如
Const、Declare、Deftype、Dim、Option Base、Option
Compare、Option Explicit、Option
Private、Private、Public 和
Type。子过程、函数过程和属性过程语句发生在它们的过程体之外,但在过程内声明。
例在窗体的通用部分写了Print a就会出现错误提示对话框。且错误代码高亮。
比如下面的简单程序
---------------------------------
Dim a As Integer
Private Sub Command1_Click()
a = 3
b = 4
End Sub
----------------------------------
一般的语句如 a=3 要写在 Private Sub 里面,才可用
如果写成
-----------------------------------
Dim a As Integer
a = 3
Private Sub Command1_Click()
a = 3
b = 4
End Sub
------------------------------------
上面的a=3就是无效的外部过程
你把光标移动到代码窗口的最上方,就是定义全局变量的地方,
那应该是注释把