如何实现vb与excel的无缝连接

在通用对象的声明过程中定义EXCEL 对象： Dim xlApp As Excel. Application Dim xlBook As Excel. WorkBook Dim xlSheet As Excel. Worksheet 3、 在程序中 *** 作EXCEL 表常用命令： Set xlApp = CreateObj ect("Excel. Application") #9创建EXCEL 对象 Set xlBook = xlApp. Workbooks. Open("文件名") #9打开已经存在的 EXCEL 工件簿文件 xlApp. Visible = True #9设置EXCEL 对象可见（或不可见） Set xlSheet = xlBook. Worksheets("表名") #9设置活动工作表 xlSheet. Cells(row, col) =值 #9给单元格（row, col） 赋值 xlSheet. PrintOut #9打印工作表 xlBook. Close (True) #9关闭工作簿 xlApp. Quit #9结束EXCEL 对象 Set xlApp = Nothing #9释放xlApp 对象 xlBook. RunAutoMacros (xlAutoOpen) #9运行EXCEL 启动宏 xlBook. RunAutoMacros (xlAutoClose) #9运行EXCEL 关闭宏 4、 在运用以上VB 命令 *** 作EXCEL 表时， 除非设置EXCEL 对象不可见， 否则VB 程序可继续执行其它 *** 作， 也能够关闭 EXCEL， 同时也可对EXCEL 进行 *** 作。

所谓无缝连接，最通俗的理解是：在充分掌握系统的底层协议和接口规范的基础上，开发出与之完全兼容的产品。

作为无缝连接的一个特例，不妨考查一下Windows95/98和NT的“快捷菜单”（Shortcut Menu）， 当我们对某一目标单击鼠标右键时，系统会根据目标不同而d出与上下文关联的快捷菜单，帮助我们迅速启动某软件（或某项功能）。

设计精良的软件应该能够自动将有关功能加入到相关的快捷菜单中去，这点对于反病毒软件也具有相当启发意义-试想： 在资源管理器中对某一文件夹或文件单击鼠标右键，在d出的快捷菜单中直接选择“病毒扫描”之类的功能。

扩展资料：

无缝连接包括方方面面，首先必须解决与Windows98的FAT32的无缝连接。虽然业界对FAT32褒贬不一，但FAT32取代FATI6成为今后文件管理的标准已是不容争辩的事实。FAT32能够有效节省硬盘空间，管理超过2GB的硬盘。 

仅此两点足矣。有什么理由在32位环境中仍旧使用16位二进制数据管理硬盘唯一的理由就是现存应用程序可能不与 FAT32兼容，特别是反病毒软件。

当应用软件与 *** 作系统不兼容时，是应该修改应用软件，还是 *** 作系统考虑到 *** 作系统已成为事实上的行业标准，答案当然不言自明。

1、开始-->程序-->ANSYS 9.0-->Utilities-->ANS_ADMIN。

2、d出以下对话框，点OK。

3、d出以下对话框，点“Congigue Connection for Pro/E”选项，再点OK。

4、d出以下对话框，选择所需模块，再点OK。

5、d出以下对话框，点“确定”。

6、d出以下对话框，在“ProEngineer installation path:”一栏输入对应与本机ProE安装路径，然后点OK。比如C:\ptc\proeWildfire 3.0

7、d出以下对话框，点“确定”。

8、返回ANS_ADMIN 9.0对话框，点Exit。

9、打开Pro/E，可以看到“ANSYS 9.0” 菜单项，其两个子菜单选项“ANSConconfig”和“ANSYS Geom”。

10、ProE与ANSYS9.0已成功建立连接。

---