P003 手続きの宣言は制御ブロックの内部でなければいけません

次のいずれかのブロックステートメント内に Function、Property Get、Property Set、または Sub ステートメントを含めようとしました。Do 、For、ForAll、If...Then...Else...EndIf、Select、While。これは許可されません。 以下に例を示します。

If 1 = 1 Then
   Sub MySub      ' Illegal
      ' ...
   End Sub
End If

Function、Property Get、Property Set、Sub ステートメントをブロックの外側に移動してください。