Angle between two lines

I have two lines AB, BC with known coordinates. they both have a common coordinate at point B.
How to find angle between AB and BC wrt VB6.

any Help for formula for finding angle at B.

http://www.acts.tinet.ie/cosinerule_673.html