Get current position in VB.net

RobotStudio
1

How do i get the current TCP position i VB.net like the function CRobt() in rapid code

2

Hi
Something like this
Example just writes the x value to the logg window

'VB

Public Sub Macro_CRobt()

Dim stn As Station = Project.ActiveProject

If stn Is Nothing Then Exit Sub

Dim tool As RsToolData = stn.ActiveTask.ActiveTool

Logger.AddMessage(New LogMessage(tool.Frame.GlobalMatrix.t.x.ToString()))

End Sub

//C#

public void Macro_CRobT()

{

Station stn = Project.ActiveProject as Station;

if (stn == null) return;

RsToolData tool = stn.ActiveTask.ActiveTool;

Logger.AddMessage(new LogMessage(tool.Frame.GlobalMatrix.t.x.ToString()));

}