I need help with the code of chat for faceBook in VB

Hello. I have a website with a chat function that I would like to integrate with Facebook. Can someone teach me the code of chat for Facebook in VB? I am on Windows Vista and Microsoft Visual Basic 6. Thanks in advance.
