'sub [any]' and'function [any]' cannot be colored

[laoqiuqiu]

Sub [any](Parameter)
End Sub

function [any](Parameter)
End function

[Serpen]

duplicate of #39