自由的窗体(附超值源码)

cgsilicone · 发表于 2014-6-14 18:38:38

本帖最后由 cgsilicone 于 2014-6-14 19:28 编辑

朋友要个调整窗口的代码，花了两天时间，完美解决。
您可以任意拉动窗体（最小化到最大化），控件完美跟随。

将类模块“窗口操作”，导入您的数据库，然后不用作任何修改（导入的代码和您原来的代码都不用修改），只需要加入固定的四行代码（和提供的例子一模一样）。
1：窗体代码开始出加入“Dim 调整窗口 As New 窗口操作“
2：Form_Open中加入“调整窗口.初始化 Me“和“调整窗口.按屏幕比例“
3： Form_Resize中加入“调整窗口.调整大小”
您数据库中的任何窗体都可以自由变化了。
按屏幕比例：固定窗体大小占屏幕的比例，参数是比例数，缺省是60%
按设计大小：让你的窗体无论在任何分辨率下都和设设计时一样大（物理上一样大），参数是设计时的分辨率，缺省是1024*768

中文写代码，没有注释也能轻松读懂。
其他的您一定可以懂，懂了您就可以任意修改。

结合http://www.office-cn.net/thread-51853-1-1.html，您的ACCESS应用就完全没有了ACCESS的影子。

游客，如果您要查看本帖隐藏内容请回复

jlslzhb · 发表于 2024-5-21 15:47:02

学习学习

人生好运 · 发表于 2024-5-8 11:17:47

谢谢分享,下来学习.

lgl7234 · 发表于 2024-4-10 16:57:23

111111

灰太郎 · 发表于 2021-2-3 21:35:32

1111

灰太郎 · 发表于 2021-2-3 21:34:23

1111

1828737@qq.com · 发表于 2021-1-29 13:32:06

学习

百舸争流 · 发表于 2021-1-24 10:24:05

灰太郎 · 发表于 2021-1-13 12:37:25

1111

ada1 · 发表于 2021-1-2 17:02:12

看看

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access经典源码培训群 (77130759)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

地区相关群[您还没设置居住地]

[窗体] 自由的窗体(附超值源码)

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)