implemented SelectStatement

git-svn-id: svn://svn.sharpdevelop.net/sharpdevelop/branches/vbnet@5969 1ccf3a8d-04fe-1044-b7c0-cef0b8235c61
16 years ago · b9c8d77064
2 changed files with 494 additions and 399 deletions
--- a/src/Libraries/NRefactory/Project/Src/Parser/VBNet/Experimental/ExpressionFinder.atg
+++ b/src/Libraries/NRefactory/Project/Src/Parser/VBNet/Experimental/ExpressionFinder.atg
@ -516,6 +516,7 @@ Statement =
				@@ -516,6 +516,7 @@ Statement =
 	| AddOrRemoveHandlerStatement
 	| RaiseEventStatement
 	| IfStatement
+	| SelectStatement
 	| InvocationStatement
 .

@ -556,6 +557,15 @@ MultilineIfRest =
				@@ -556,6 +557,15 @@ MultilineIfRest =
    "End" "If"
 .

+SelectStatement =
+	"Select" [ "Case" ] Expression StatementTerminator
+	{
+		"Case" ( "Else" | [ "Is" ] Expression { "," [ "Is" ] Expression } )
+		StatementTerminatorAndBlock
+	}
+	"End" "Select"
+.
+
 InvocationStatement =
 	[ "Call" ] Expression
 .
--- a/src/Libraries/NRefactory/Project/Src/Parser/VBNet/Experimental/Parser.cs
+++ b/src/Libraries/NRefactory/Project/Src/Parser/VBNet/Experimental/Parser.cs