ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 8439|回复: 4

[求助] 求教VBE窗体导入VB的方法和导入后的使用方法

[复制链接]

TA的精华主题

TA的得分主题

发表于 2009-11-19 18:00 | 显示全部楼层 |阅读模式
有网友发过这样的贴子:http://club.excelhome.net/viewth ... 0%CC%E5%B5%BC%C8%EB

我也碰到了相同的问题,导入后不是窗体了,而是在设计器里。是导入方法错了,还是使用上有问题?

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-11-20 18:32 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
已解决,从来都是VB或VBA下写程序,从没试过两者之间导入或导入,也没试过把VBA窗体封装在DLL中。

附导入方法和调用方法:

1、VBA中在窗体上点击右键,选择导出,得到一个后缀为frm的窗体文件;
2、在VB工程资源管理器中点右键,选择添加,再选择添加文件,选中上述导出的frm文件,点击打开按键,窗体会被加至VB工程资源管理器的设计器中(窗体中的代码被同步复制),你可以双击打开查看对象,右键选择查看代码;
3、假设工程名为:TestSystem,已导入的窗体名为UserForm1,新建一个类:Test,在Test类中写入代码如下:
  1.    Sub Wahaha()
  2.       Dim Ts As New  TestSystem.UserForm1
  3.    Ts.Show vbModal
  4.      Set Ts= Nothing
  5.      End Sub
复制代码
4、存盘,生成TestSystem.dll;
5、在VBA工程中Show窗体的方法:当然先引用TestSystem后,代码如下:
  1.    Private Sub CommandButton1_Click()
  2.       Dim ABC As New TestSystem.Test
  3.       ABC.Wahaha
  4.       Set ABC = Nothing
  5.      End Sub
复制代码
6、完工!点击CommandButton1后即可Show出封装在DLL文件的窗体。

[ 本帖最后由 ctincob 于 2009-11-20 18:46 编辑 ]
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-3-28 19:58 , Processed in 0.039185 second(s), 10 queries , Gzip On, Redis On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表