'XSIFAQ: How to get distance between two objects

'gs distance between two objects vbs:

set oObj0globalTrans = selection(0).Kinematics.Global.Transform

set oObj1globalTrans = selection(1).Kinematics.Global.Transform

set v0 = XSIMath.CreateVector3

set v1 = XSIMath.CreateVector3

set v2 = XSIMath.CreateVector3

oObj0globalTrans.GetTranslation v0

oObj1globalTrans.GetTranslation v1

v2.Sub v0,v1

logmessage v2.Length