While you can completely turn off reformatting, I'm sure this is not the solution you had in mind.
Personally, in this code, I put my comments related to the case under it.
Select Case E.Type Case EventType.General_StartServer ' The server has started, so we need to do blah. Case EventType.ServerAlert_Chat ' A chat has sent a server alert, so do blah. End Select
source share