Microsoft KB Archive/95525

= FIX: GPF When Erase User-Defined Array of Variable Strings =

Article ID: 95525

Article Last Modified on 1/8/2003

-

APPLIES TO


 * Microsoft Visual Basic 2.0 Standard Edition

-



This article was previously published under Q95525



SYMPTOMS
If you try to erase an user-defined type array of a variable-length strings, you may encounter a general protection (GP) fault or unrecoverable application error (UAE).



WORKAROUND
This problem doesn't occur if you use an array of fixed-length strings or an array of type Variant in place of the array of variable-length strings. Therefore, you can work around the problem by using an array such as the following with a user-defined type and fixed-length strings. Type mytype mystrings(1) As String * 10  'array of fixed length string End Type

Global test As mytype You can also work around the problem by using an array of variants instead of an array of strings, as this example shows: Type mytype mystrings(1) As Variant     'array of variant type End Type

Global test As mytype A third alternative is to erase the elements in the variable-length string array manually instead of using the Erase statement, as follows: Form_Click For i% = 0 to UBound(test.mystrings) test.mystrings(i%) = &quot;&quot; Next i%  End Sub



STATUS
Microsoft has confirmed this to be a problem in Microsoft Visual Basic version 2.0 for Windows. This problem was corrected in Microsoft Visual Basic version 3.0 for Windows.



Steps to Reproduce Problem
 Run Visual Basic, or if Visual Basic is already running choose New Project from the File menu (ALT, F, N). Form1 is created by default. From the File menu, choose New Module (ALT, F, M). Module1 will be created.  Add the following code to the general declarations section of Module1: Type mytype mystrings(1) As String End Type

Global test As mytype   Next add the following code to the Form_Click event procedure of Form1: Form_Click Erase test.mystrings(1) End Sub  Press the F5 key and click Form1.</ol>

At this point, you will encounter a GP fault or UAE.

Additional query words: buglist2.00 fixlist3.00 2.00 3.00

Keywords: kbbug kbfix KB95525

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.