ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[求助] VB与VBA应该是一家,我在VB6中遇到了一个问题拿到这里请教高手

[复制链接]

TA的精华主题

TA的得分主题

发表于 2022-12-19 23:13 | 显示全部楼层 |阅读模式
因为一直在这里学习,也知道这里的高手们很热心,其他地方我也不知道该去哪里问,所以就跑来请求帮助,这是一个VB中关于子类的例子,因为使用子类可能会使用大量API,所以容易引起IDE崩溃,网上有为高手七八年前发了一个类模块,非常有效地解决了IDE崩溃的问题,但是后来我发现不知道为什么当执行msgbox的时候总失去焦点?我这里有个例子,是关于鼠标滚轮在VB中的实现,用了这个大神的类模块,用起来没问题的 实现鼠标滚轮.rar (3 KB, 下载次数: 15)

TA的精华主题

TA的得分主题

发表于 2022-12-20 09:24 | 显示全部楼层
你这个子类化里的代码我好像在哪见过,不过这个好像不太好。我在十几年前发过一个更完善的。另外,你发个没有问题的来问自己的问题,这让人很难帮你啊。
首先,使用Windows API函数不可能会导致IDE崩溃,如果有,那只是你不会用或是用错了;第二、除非是已知的系统BUG,或是Windows API函数本身导致的程序崩溃或系统蓝屏,否则你应该上传自己有问题的附件来查错,而不是上传没有问题的来查错,出错本身才是有问题,程序正常运行才应该是常态。

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-12-20 10:47 | 显示全部楼层
本帖最后由 renahu 于 2022-12-20 10:58 编辑
joforn 发表于 2022-12-20 09:24
你这个子类化里的代码我好像在哪见过,不过这个好像不太好。我在十几年前发过一个更完善的。另外,你发个没 ...

老师如果有更好的子类能否发出来共享,我最近正在研究这玩意儿。另外老师一定没看清我的问题,我发的这个子类使用没有问题的,解决了调试时IDE容易崩溃的问题,就是我发现 执行msgbox 时失去焦点 ,肯定与这个子类有关,去掉这个子类就好了,希望老师能够帮我看看,多谢

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-12-20 10:54 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
joforn 发表于 2022-12-20 09:24
你这个子类化里的代码我好像在哪见过,不过这个好像不太好。我在十几年前发过一个更完善的。另外,你发个没 ...

https://www.cnblogs.com/pctgl/p/ ... =true&!comments  这个是一个比较完整的版本,但是也存在 msgbox失去焦点的问题,我一楼发的可能是个精简的版本

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-12-20 11:03 | 显示全部楼层
joforn 发表于 2022-12-20 09:24
你这个子类化里的代码我好像在哪见过,不过这个好像不太好。我在十几年前发过一个更完善的。另外,你发个没 ...

QQ图片20221220110021.png

老师点击一下这个按钮看是否激活这个msgbox对话框?

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-12-20 11:09 | 显示全部楼层
joforn 发表于 2022-12-20 09:24
你这个子类化里的代码我好像在哪见过,不过这个好像不太好。我在十几年前发过一个更完善的。另外,你发个没 ...

如果把formload和formunload注释掉,即去掉子类,再点击按钮显示就是正常的,所以这个子类的使用影响了msgbox的显示

TA的精华主题

TA的得分主题

发表于 2022-12-20 12:12 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
renahu 发表于 2022-12-20 11:03
老师点击一下这个按钮看是否激活这个msgbox对话框?

我这里测试是正常的

TA的精华主题

TA的得分主题

发表于 2022-12-20 12:30 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
renahu 发表于 2022-12-20 10:54
https://www.cnblogs.com/pctgl/p/3150552.html#desc=true&!comments  这个是一个比较完整的版本,但是也 ...

我说的它不太好,指的不是它的代码,而是这个代码指向的回调函数必须是类模块中的第一个Public函数,这导致回调函数被暴露在类外可调用,但如果被在类外部调用回调函数,可能会导致不可预见的错误与问题。

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-12-20 12:33 | 显示全部楼层
本帖最后由 renahu 于 2022-12-20 12:34 编辑
joforn 发表于 2022-12-20 12:12
我这里测试是正常的

是什么环境?我是win7 64 VB6

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-12-20 12:38 | 显示全部楼层
joforn 发表于 2022-12-20 12:12
我这里测试是正常的

我生成exe文件就正常了,这啥情况?IDE里面msgbox就有问题,就怕这个,看来无解了
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2024-11-20 04:30 , Processed in 0.047178 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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