【求助】如何在选择两点时象窗体选择那样，并返回选择的两点的坐标？

StartMe

即选完第一点后、选择第二点前，鼠标经过区域有类似窗体选择框出现，点选完毕第二点后，返回选完两点的坐标值。

zdfwyh

'第一个点的获得
Dim Pt1, Pt2
Pt1 = ThisDrawing.Utility.GetPoint(, "请选择第一个点.")

'第二个点的获得

Pt2 = ThisDrawing.Utility.GetCorner(Pt1, "请选择第二个点")

Debug.Print Pt2(0); Pt2(1); Pt2(2)

StartMe

首先谢谢！不过我现在就这样做的。

我想实现是第一点选完后、第二点未选前，出现跟随鼠标移动的窗体效果，就象AutoCAD打印时窗口选择打印角点时的效果一样。

选完第二点后，能返回选择的两点的坐标值。

zdfwyh

打印时的窗口选择就是上面代码的效果呀

StartMe

哦，谢谢了，我再试试。再次感谢zdfwyh。