VB6.0软件--控件居中代码

ID:194133 发表于 2017-4-27 11:30 | 显示全部楼层 |阅读模式

Private Sub Form_Resize()
Command1.Top = (Me.Height - Command1.Height) \ 2
Command1.Left = (Me.Width - Command1.Width) \ 2
End Sub

注释：Command1换成你想要控件

使用道具举报

返回列表

小黑屋|51黑电子论坛 | 管理员QQ:125739409;技术交流QQ群281945664

帐号		自动登录	找回密码
密码			立即注册