BUG: Order of Evaluation Change Between Native Code and P- Code

MORE INFORMATION

Steps to Reproduce Behavior

1. Create a new Standard EXE project in Microsoft Visual Basic. Form1 is created by default.
2. Select Add Module from the Project menu to add a standard code module (Module1) to the project.
3. Copy and Paste the following code into Module1:

         Dim Sample As String
   
         Public Sub Main()
   
            Dim Temp1 As String
   
            While (get_String) And Not (Sample Like "*/*/*")
               MsgBox "In loop --> " & Sample & " " & Not _
               (Sample Like "*/*/*")
            Wend
            MsgBox "after --> " & Sample
         End Sub
   
         Function get_String() As Boolean
            Sample = "09/19/97"
            get_String = True
         End Function
   
   						

4. Select Project Properties from the Project menu. Change the Startup Object to "Sub Main."
5. Select the Compile tab and ensure the project is set to compile to Native Code.
6. Create the EXE by selecting Make Project1.EXE from the File menu.
7. Run the EXE and note the results.
8. Recompile the EXE by changing the project compile properties so that it compiles to P-Code.
9. Run the EXE again and note the different results. When compiled to P- Code, the expression 'While (get_String) And Not (Sample Like "*/*/*")' is evaluated as expected. However, when compiled to Native Code with optimizations, the (Sample Like "*/*/*") will be evaluated first.