Code:
' Error 1:
If TypeOf MyControl Is CommandButton Then Call ColorWordInBlue("TypeOf")

' Error 2:
Remove the problems with green coloring! In a Rem-keyword remark,
' there must be a space after "Rem" for it to be considered a remark.

' Error 3:
On Local Error Resume Next ' IsBlue("Local") = False, ShouldBeBlue("Local") = True

' Error 4:
SomeCodeGoesHere ' Something is wrong with remarks-after-code... Aren't these colors wrong?
' Well, it's working OK if it's not after code.

' Error 5:
MyString = "Well... If some of this Is colored blue, Then there's definitely a problem... Correct Me if I'm wrong."

' Error 6:
' The following line should be green, and the underline should be black. _
But they are not.
Administration? Are you there?
Get fixin'!