Add handling for With blocks

Author: SSlinky

package.json

@@ -118,7 +118,7 @@
 		]
 	},
 	"scripts": {
-		"vscode:prepublish": "npm run antlr4ngPre && npm run antlr4ng && npm run textMate && npm run compile",
+		"vscode:prepublish": "npm run textMate && npm run antlr",
 		"compile": "tsc -b",
 		"watch": "tsc -b -w",
 		"lint": "eslint ./client/src ./server/src --ext .ts,.tsx",

server/src/antlr/vbafmt.g4

@@ -49,6 +49,7 @@ documentElement
     | ifElseBlock
     | selectCaseBlock
     | whileBlock
+    | withBlock
     | basicStatement
     | blankLine
 	;
@@ -105,6 +106,12 @@ methodClose
     : ws? END ws (SUB | FUNCTION | PROPERTY)
     ;
 
+withBlock
+    : ws? WITH ws expression endOfStatement
+        block?
+        END ws WITH endOfStatement
+    ;
+
 block
     : documentElement+
     ;
@@ -423,6 +430,10 @@ UNDERSCORE
     : '_'
     ;
 
+WITH
+    : 'WITH'
+    ;
+
 TAB
 	: '\t'+
 	;