Private Sub Form_Resize()
Command1.Top = (Me.Height - Command1.Height) \ 2
Command1.Left = (Me.Width - Command1.Width) \ 2
End Sub
把Command1换成你想要居中的控件名就可以了。
设置控件的style
例如Label1.Style("align") = "center"
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024