Question

怎样用VBA读取文本文件中的坐标数据，在CAD中创建点 求救

我要做的是利用VBA编程在CAD中建立TIN网，数据是GPS观测的数据，刚开始就不会了，在CAD展点都没有实现，求高手

若以下回答无法解决问题，邀请你更新回答

Answer 1

分好少啊

我用vba读取txt文档中的坐标绘制过直线

追问

呵呵 一共15分。。

追答

呵呵, 画线的代码如下:
txt文档中每行数据格式如下:
0.1,1.2,1.0,2.3

Sub DrawingLines()

Dim F As Integer, ps(2) As Double, pe(2) As Double, data(3) As Double
F = FreeFile()
Open "e:\1.txt" For Input As F

Do Until EOF(F)
Input #F, data(0), data(1), data(2), data(3)
ps(0) = data(0)
ps(1) = data(1)
pe(0) = data(2)
pe(1) = data(3)

Set lineObj = ThisDrawing.ModelSpace.AddLine(ps, pe)
Loop

Close F

End Sub

Answer 2

如要源码请加我：1731543677