| 楼主 ldy |
Q：如何用 API实现 VBA标准窗体 最大化按钮 无边框？ A：LDY整理简化如下： 用API设置窗体格式，本例经过简化仅需要 两个API函数，省略了常数和GetWindowLong函数 注意：SetWindowLong 的最后一个参数，在窗体显示时 和 在窗体加载时（UserForm_Initialize事件） 调用，其值有差异，但有规律可循， 下面语句是在窗体已经显示后调用的 其最后一个参数为 &H16040000 是一个16进制数值。如果要在窗体加载时调用则需要去掉首位的1， 为&H6040000 加载后调用 作用为显示标准窗体 SetWindowLong FindWindow(vbNullString, Me.Caption), -16, &H16040000 加载时调用（UserForm_Initialize事件） SetWindowLong FindWindow(vbNullString, Me.Caption), -16, &H6040000 EXCEL2003 调试通过， 用2007 的网友帮忙测试一下。   窗体三态互换.rar |
| 2楼 gvntw |
2007测试通过，谢谢 ldy 给出这么精简的代码。 |
| 3楼 caijiuhua |
能不能把公式求值对话框也弄成这样的功能，有时看公式求值是很不方便特别是在看数组公式时特别烦人希望高手给解决一下 |
| 4楼 tongliaozyr |
谢谢 ldy 给出这么精简的代码。 |
| 5楼 omnw |
非常好,很实用. |
| 6楼 bill165 |
vb |
| 7楼 迅岐同心 |
精彩的奉献，绝对是精品！ |
| 8楼 落雪绽菊 |
感谢，正在找这个呢 |
| 9楼 VVVGLIN |
精品 |
| 10楼 xiaofan630 |
很不错! |
| 11楼 haoc11 |
收藏学习了 |
| 12楼 水星钓鱼 |
学习下 |
| 13楼 yf_home |
2010测试也通过，精品！ |
| 14楼 icenotcool |
 |
| 15楼 wumin88838 |
学习多研究下 |
| 16楼 wenshaoshan00 |
好强大 |
| 17楼 335081548 |
大家翻出来了，就多看几眼 |
| 18楼 335081548 |
感谢分享，学习 |
| 19楼 335081548 |
2013打开也正常 |