如何打开文件?
<P>如果已经知道了一个。DWG图形文件的路径,怎样用程序的方法打开它?</P><P>还有,如何用程序的方法去定义一个。WMF的图形文件?图形文件名自己在程序里给出。</P>
<P>(注意:两者都不用对话框显示!)</P> <PRE class=prog_in_0>Sub Ch3_OpenDrawing()</PRE><A name="" nid="3"></A><PRE class=prog_in_0> Dim dwgName As String</PRE><A name="" nid="4"></A><PRE class=prog_in_0> dwgName = "c:\Program Files\autocad 2002\sample\campus.dwg"</PRE><A name="" nid="5"></A><PRE class=prog_in_0> If Dir(dwgName) <> "" Then</PRE><A name="" nid="6"></A><PRE class=prog_in_0> ThisDrawing.Application.Documents.Open dwgName</PRE><A name="" nid="7"></A><PRE class=prog_in_0> Else</PRE><A name="" nid="8"></A><PRE class=prog_in_0> MsgBox "File " & dwgName & " does not exist."</PRE><A name="" nid="9"></A><PRE class=prog_in_0> End If</PRE><A name="" nid="10"></A><PRE class=prog_in_end_0>End Sub</PRE>
页:
[1]