vb find specific face and axis of a hole

I want to build a macro in vb, to insert an udf in my parts.

The inputs for that udf are:

1-axis of a hole

2-one of the faces of the cylinder counterbore hole. counterbore hole has 2 cylinder faces.

My aim, is to select the hole feature, and the app, finds the axis of the hole, and the cylinder face.

How can I do this?