VBA_CAD获取用户输入的坐标点

Sub 获取用户输入的坐标点() Dim startPnt As Variant Dim endPnt As Variant Dim prompt1 As String Dim prompt2 As String prompt1 = vbCrLf & "Enter the start point of the line: "