Article ID: 192653
Article Last Modified on 3/3/2005
Option Explicit
Public Sub DoNothing()
End Sub
Option Explicit
Private Sub Command1_Click()
Dim o(8) As Object
Dim i As Integer
Dim strProgID As String
For i = 1 To 8
strProgID = "Project" & i & ".Class1"
Set o(i) = CreateObject(strProgID)
o(i).donothing
Set o(i) = Nothing
Next
MsgBox "Done"
End Sub
The instruction at "0x6602c2c5 referenced memory at "0x010b008c". The Memory could not be "written".
Additional query words: COM ActiveX InProc
Keywords: kbbug kbfix kbide kbvs600sp1fix kbdll kbvs600sp2fix kbvs600sp3fix KB192653