首页
学习
活动
专区
工具
TVP
发布
精选内容/技术社群/优惠产品,尽在小程序
立即前往
您找到你想要的搜索结果了吗?
是的
没有找到

创建可调大小的用户窗体——使用VBA

标签:VBA 在上篇文章:创建可调大小的用户窗体——使用Windows API中,我们使用Windows API实现了允许用户可以调整用户窗体大小。本文仅使用VBA来实现同样的效果。...VBA解决方案:用户窗体包含一个对象,单击该对象时会记录鼠标的位置;随着鼠标的移动,用户窗体及其对象将根据新的鼠标位置重新定位或调整大小;当释放鼠标按钮时,停止移动以调整大小。...示例用户窗体 在VBE中,插入一个用户窗体,如下图1所示。...标签lblResizer的设置如下图2所示,标题为字符“y”并设置Wingdings 3字体,使之以小三角的形式显示在窗体右下角,让用户在此单击以调整窗体大小。...If resizeEnabled = True And allowResize = True Then '根据单击后的鼠标移动调整/移动对象 '调整用户窗体大小 Me.Width

40630

创建可调大小的用户窗体——使用Windows API

标签:VBA,Windows API 在使用VBA创建用户窗体时,通常会将其设置为特定的大小。然而,通过一些编码技巧,可以为其实现类似的调整大小效果。...本文代码能够实现:允许调整用户窗体大小;调整窗体大小时用户窗体的Resize事件能捕获;每次Resize事件后,对象的大小或位置都会发生变化。...如果想要能够调整用户窗体大小,使用: Call ResizeWindowSettings(myUserForm, True) 关闭调整用户窗体大小,使用: Call ResizeWindowSettings...(myUserForm, False) 其中,myUserForm是要调整大小的用户窗体的名称。...当该用户窗体调整大小时,这两个元素都应该作出相应更改。lstListBox的大小应更改,但位置不应更改,而cmdClose的位置将更改,但大小不应更改。

28630
领券