ねえ、私はこのコードでこのエラーを受け取ります:
Private Sub Request_Stuff_button_Click()
Call Main.createObjects
Call My_Control.requestStuff
End Sub
「Call My_Control.requestStuff」行で。「メイン」モジュールは次のようになります。
Public My_Control As ControlObject
Public Sub createObjects()
If My_Control Is Nothing Then
Set My_Control = New ControlObject
End If
End Sub
最も奇妙なことは、私が追加するときです
Dim x As Integer
x = My_Control.dummyInt
エラーが発生する行の直前に、 x はエラーが発生する直前に正しい値を取得します。これは、 My_Control が間違いなくオブジェクトであり、間違いなく何もないことを意味します。
このエラーは私を殺しています、事前に感謝します。