wg″

　　OLE1．ActionΚole1—activate；清空CAD—OLE的方

法是让

　　；它显示

　　OLE1．ActionΚolel1—close；空白文件，引号中内

容因人而异

　　EndSub；关闭OLE连接，以节约内存占用

　　上述程序在编制及运行时的注意事项：

　　1．Windows环境下要安装有AutoCADforWindows；

　　2．运行本程序前要先运行AutoCAD，并缩小成图标在

后台运行以免阻挡程序界面，妨碍对图形的观看；

　　3．文件列表框的pattern属性应设置为＊．dwg，以

使列表框仅显示CAD图形文件的文件名；

　　4．界面下半部的显示窗口—OLE控件的Class属性应

设置为AutoCAD；

　　5．OLE控件的Sizemode属性应设置为3－Zoom，以使A

utoCAD图形自动充满OLE控件框；

　　6．在设计界面时，拉出OLE控件VB会自动弹出insert

object对话框为了避免出现不可预见的错误，这时先别忙

于从中选择AutoCAD对象，应选择Cancle退出。而在OLE控

件的Class属性下拉菜单中选择AutoCAD对象。

　　看到这里，细心的读者也许发现只要改变OLE控件的C

lass属性，就可以用本程序编译成类似功能的其它文件管

理程序。例如：将Class属性设置成Photoshop或CorelDRA

W，便可利用它们强大的文件转换功能，显示和管理几十

种图形文件。其它如WORD、EXCEL、轻松表格等等总之凡是

支持OLE功能的应用程序所创建的文件都能用本程序稍加

变动后加以显示和管理。希望广大读者能从中得到启发和

享受VB轻松编程的乐趣！