设置窗体显示位置

mycad

今天试了VBA 设置窗体显示位置的程序如下
Private Sub UserForm_Activate()
    Me.Move (ThisDrawing.width - Me.width) / 2 + 26, (ThisDrawing.height - Me.height) / 2 + 10
End Sub
在UserForm_Activate事件中设置窗体的显示位置是成功的
但在 UserForm_Initialize()事件中无法实现设置窗体位置的设置

crazylsp

谢谢收下了。也许初始化是系统自己设置的参数。