PRB: Compiled In-Process Server Used Before IDE Server (149049)

WORKAROUND

Steps to reproduce problem

1. Start an instance of the 32-bit edition of Visual Basic 4.0 for Windows.
2. Click Class Module on the Insert menu to add a class module to the project.
3. Change the following properties on the new class module to the following:

         Instancing: 2 - Creatable Multiuse<BR/>
         Public:     True
   					

4. Add the following code to the class module:

         Public Sub Test()
            MsgBox "In DLL"
         End Sub
   					

5. Click Module on the Insert menu to insert a new code module.
6. Add the following code to the code module:

         Public Sub Main()
            'do nothing
         End Sub
   					

7. Click Options on the Tools menu to open the Options dialog box. Switch to the Project tab and change the following settings:

   Startup Form: Sub Main
   Project Name: DLLandIDE
   Startmode: OLE Server

8. Click "Make OLE DLL File..." on the File menu to create a compiled OLE DLL.
9. Click Options on the Tools menu to again open the Options dialog box. Switch to the Project tab and type in the name of the DLL generated in step 8 in the Compatible OLE Server text box.
10. Click "Make OLE DLL File..." to recompile the DLL.
11. Change the line of code in the Test subroutine contained in the class module from "In DLL" to "In IDE."
12. Press F5 or click Start on the Run menu to run the server in the IDE.
13. Start another instance of the 32-bit edition of Visual Basic for Windows, and add the following code in the Form_Click event to the default form, Form1:

           Private Sub Form_Click()
              Dim MyObj As Object
    
              Set MyObj = CreateObject("DLLandIDE.Class1")
              MyObj.Test
           End Sub
    					

14. Step through the code in the client program and see that the text of the message box displayed by the Test method contains "In DLL" and not "In IDE."