BUG: Run-time Error "This Array is Fixed or Temporarily Locked"

• Microsoft Visual Basic Learning, Professional, and Enterprise Editions for Windows, version 5.0

SYMPTOMS

With an EXE made from a Visual Basic project, you receive the following error:

   Run-time error 10:
   "This Array is fixed or temporarily locked"

CAUSE

This error occurs when your project uses the Microsoft Data-bound Grid control and you pass an element of a variant array to a procedure in a class module. This problem only occurs in Visual Basic 5.0 if the Visual Basic 5.0 Service Pack 2 is installed.

RESOLUTION

There are several possible workarounds for this problem:

- Dimension the array as a type other than Variant. For example, dimension

  the array as type String.

  -or-

  -or -

  element. For example, this code uses a variable "temp" to store and
  retrieve the value of the first element of "myarray":

     temp = myarray(1)
     MyObject.MyMethod temp
     myarray(1) = temp

STATUS

Microsoft has confirmed this to be a bug in the Microsoft products listed at the beginning of this article. We are researching this bug and will post new information here in the Microsoft Knowledge Base as it becomes available.

MORE INFORMATION

Steps to Reproduce Behavior

1. Start a new Standard EXE project.

2. Click Components on the Project menu, and then check "Microsoft Databound Grid Control."

3. Draw a dbGrid control and CommandButton on Form1.

4. Add the following code to Form1:

         Dim o As Object
   

         Private Sub Command1_Click()
            test
         End Sub
   
         Private Sub test()
            Set o = New Class1
            ReDim myarray(1) As Variant
            o.MyMethod myarray(1)
         End Sub
   
   

5. Click Add Class Module on the Project menu.

6. Add the following code to Class1:

         Public Sub MyMethod(x As Variant)
   

         End Sub
   

7. Make the EXE and then run the EXE. Click Command1 and note that you receive the run-time error #10 and the application will quit.

Keywords          : vb5all VBKBEnv kberrmsg VS97FixlistSP2
Version           : WINDOWS:5.0
Platform          : WINDOWS
Issue type        : kbbug