VBA中用户窗体位置的问题
我想在vba中将用户窗体显示位置靠屏幕右侧，使用如下代码：Private Sub UserForm_Initialize()
Me.StartUpPosition = 0
Me.Left = Application.Width - Me.Width
End Sub
这样则窗体无法显示，请问原因在哪里？
我屏幕分辨率为1920*1080,试了只要me.left>(1440-me.width)就无法显示（好像跑到屏幕右侧看不到的地方去了），小于这个尺寸则可以显示，我不理解的是用户窗体的右边界为什么不能超过1440，而不是1920，为什么和屏幕分辨率不一致？整个网上似乎都找不到答案
本帖最后由 wylong 于 2014-7-15 10:29 编辑
Application.Width属性返回值的单位为像素，vba窗体的Width属性返回值的单位为磅。
二者的单位不统一，需要换算：1像素=72/96=0.75磅
Private Sub UserForm_Initialize()
Me.StartUpPosition = 0
Me.Left = Application.Width*0.75 - Me.Width
End Sub
1920*0.75=1440，这就是为什么不能超过1440的原因。 wylong 发表于 2014-7-15 10:13 static/image/common/back.gif
Application.Width属性返回值的单位为像素，vba窗体的Width属性返回值的单位为磅。
二者的单位不统一，需要 ...
非常感谢,thanks very much
页:
[1]