The Format Document command (EditorCommands.FormatDocument) in a "VB .NET Language add-on" document has a problem with the following code:
If a > 3 Then Select Case b Case 1 Case 2 Case Else End Select End If
The End If will be indented to the same level at the End Select.
If you comment out the Case Else, the formatting works fine.
It also works if you take out the If and End If.