I used your code but it doesn't work.
As about the text, i would like to have every chat message in one single line with [ Time ] <username>: <message> in order to save space.
EDIT:
I have a question: what does the third parameter of the .Call method is for? Why 18 calls to Interop.Call?