Bug 7646 - Resume xxx not supported with Mono
Summary: Resume xxx not supported with Mono
Status: RESOLVED FIXED
Alias: None
Product: Compilers
Classification: Mono
Component: VisualBasic ()
Version: unspecified
Hardware: PC Linux
: --- normal
Target Milestone: ---
Assignee: Rolf Bjarne Kvinge [MSFT]
URL:
Depends on:
Blocks:
 
Reported: 2012-10-04 10:58 UTC by Julien HENRY
Modified: 2012-10-05 07:18 UTC (History)
2 users (show)

Tags:
Is this bug a regression?: ---
Last known good build:

Notice (2018-05-24): bugzilla.xamarin.com is now in read-only mode.

Please join us on Visual Studio Developer Community and in the Xamarin and Mono organizations on GitHub to continue tracking issues. Bugzilla will remain available for reference in read-only mode. We will continue to work on open Bugzilla bugs, copy them to the new locations as needed for follow-up, and add the new items under Related Links.

Our sincere thanks to everyone who has contributed on this bug tracker over the years. Thanks also for your understanding as we make these adjustments and improvements for the future.


Please create a new report on GitHub or Developer Community with your current version information, steps to reproduce, and relevant error messages or log files if you are hitting an issue that looks similar to this resolved bug and you do not yet see a matching new report.

Related Links:
Status:
RESOLVED FIXED

Description Julien HENRY 2012-10-04 10:58:12 UTC
I tried to compile sample code from MSDN (legacy VB6 style): http://msdn.microsoft.com/en-us/library/ms973849.aspx (Listing 1)

The code compiles in Visual Studio but not with Mono.

Resume ExitHere produces the following error:
Error VBNC30205: Expected end of statement. (VBNC30205)

Module Module1
	Sub TestVB6()
	    On Error GoTo HandleErrors
	    
	    ' Do something in here that
	    ' might raise an error.
	    
	ExitHere:
	    ' Perform cleanup code here.
	    ' Disregard errors in this
	    ' cleanup code.
	    On Error Resume Next
	    ' Perform cleanup code.
	    Exit Sub
	    
	HandleErrors:
	    Select Case Err.Number
	        ' Add cases for each
	        ' error number you want to trap.
	        Case Else
	            ' Add "last-ditch" error handler.
	            Console.WriteLine("Error: " & Err.Description)
	    End Select
	    Resume ExitHere
	End Sub
End Module
Comment 1 Rolf Bjarne Kvinge [MSFT] 2012-10-05 07:18:54 UTC
Fixed.

master: 4af7649ad8284204c757f5f826bfe00ef96fc36d.