Project a point perpendicular from line

Dear All,
I need to project a point(Blue colored) from a line(Majenta Color) to another line(Yellow Color) and the projected point should be perpendicular from a line(Majenta Color).
The required output was represented(in attachment) as green colored line. Is there any options available in Microstation_VBA to achieve this?