UI设计自制日历窗体（无需注册MSCOMCTL.OCX）

prome3 · 发表于 2023-10-4 18:40

cidanji 发表于 2023-10-4 14:09
试了下WPS，调用日历时有时会卡死有时会弹窗报错，电脑是 Windows 10 64位，WPS是当前版，ms Excel正常的。 ...

首先，感谢您的鼓励和肯定！

也感谢您的使用反馈！
弹出“DLL调用约定错误”这个提示框的原因是在MonthCalendarFrame.frm模块的CreateCalendarControl函数所调用的第二个SetWindowPos函数的第二个参数写错了，多了一个“^”符号：

DLL调用约定错误原因.png

针对上述问题，示例代码已做更新，请见此楼附件。
刚才我又下载了一次WPS，配置了VBA环境来测试，已能成功运行：
更新的代码在WPS内运行效果.png

再次感谢您的反馈！

morpheus126 · 发表于 2023-10-4 19:00

prome3 发表于 2023-10-4 18:13
感谢评论！
这个例子的总代码行数不过300余行，其实也算是个微型的项目了。
原先的版本总代码行数大约 ...

不知可否分享一下完整版本，谢谢啦

prome3 · 发表于 2023-10-4 22:27

lujkhua 发表于 2023-10-4 18:25
不知道是不是哪个API的问题？

感谢您的反馈！

确实是某个API调用的问题！这个和6楼的弹窗都是出自同一个原因。您发这条评论的时候，我对6楼的回复正好在审核中，所以没能及时看到更新后的代码。

但，我在6楼的回复里面好像忘了选附件上传，正好在此一并回复了……
请见11楼对6楼的回复，以及此楼的附件。

祝好！

hisokou · 发表于 2023-10-5 00:06

不错，值得参考

ggmmlol · 发表于 2023-10-5 00:41

13楼的附件，用EXCEL2010测试时通过，但用Excel 2007测试时出现错误。现予以修正，见附件：

日历窗口示例_20231005.rar (39.88 KB, 下载次数: 41)

lujkhua · 发表于 2023-10-5 07:51

prome3 发表于 2023-10-4 22:27
感谢您的反馈！

现在的附件正常，我在出错的时候就改了0^这个参数，我当时也认为这是你的笔误，但改了也是没能解决“DLL调用约定”这个错误，所以才回贴，感谢深夜回复！

cidanji · 发表于 2023-10-5 10:12

prome3 发表于 2023-10-4 18:40
首先，感谢您的鼓励和肯定！

也感谢您的使用反馈！

感谢分享，刚试了可以正常运行，没有异常

HANERBABA · 发表于 2023-10-5 13:44

谢谢分享。。。。。。。。

micch · 发表于 2023-10-5 13:49

电脑右下角日期点击弹出的日历是这样的。

这个内置日历能调用吗

prome3 · 发表于 2023-10-5 16:20

morpheus126 发表于 2023-10-4 19:00
不知可否分享一下完整版本，谢谢啦

感谢您的肯定！

其实一开始我所写的版本有很多自定义功能，且一直在修改，不停测试，在自己的配置环境下已能稳定运行。这些自定义功能是在我自己可控的环境内运行的，后来决定分享到ExcelHome论坛的时候，考虑到别人的运行环境可能和我的不一样（实在不明白这年头还有人用Excel 2003-.-，最低也该用上Excel 2007了吧……），就把这些自定义的功能都删了才发布。这也留给别人更多的自定义空间。

然后要说的一点是，因为我自己用的版本还在不停修改完善，所以没有什么完整版、最终版的说法。最初的版本其实是个DateTimePicker控件，后来改用目前这个MonthCalendar控件（日期由原先在用户窗体上输入改为直接在工作表内输入，需求变了）。

现将带有鼠标移动和回车隐藏两个自定义功能的版本发给您，仅供参考！

最后再次感谢您的评论和肯定，祝好！

		自动登录	找回密码
密码			免费注册

[分享] UI设计自制日历窗体（无需注册MSCOMCTL.OCX）

评分

评分