pansq 发表于 2005-11-30 10:51:00

[VBA]vba for cad 如何获取文本文件中的数据？

请教高手，我正在学习vba for cad，请指教vba for cad如何获取文本文件中的数据？谢谢

王咣生 发表于 2005-11-30 20:48:00

reply

<P>同vb读文本文件的方法:</P>
<P>Sub test()<BR>&nbsp;&nbsp;&nbsp; Dim fi As String<BR>&nbsp;&nbsp;&nbsp; fi = "f:\1.txt"<BR>&nbsp;&nbsp;&nbsp; Dim li As String<BR>&nbsp;&nbsp;&nbsp; Open fi For Input As #1<BR>&nbsp;&nbsp;&nbsp; Do While Not EOF(1)<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Input #1, li<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MsgBox li<BR>&nbsp;&nbsp;&nbsp; Loop<BR>&nbsp;&nbsp;&nbsp; Close #1<BR>End Sub</P>

pansq 发表于 2005-12-1 16:52:00

<P>十分感谢，不好意思，可能以后还会请教的</P>
页: [1]
查看完整版本: [VBA]vba for cad 如何获取文本文件中的数据？