Question

VB如何让控件在窗体居中？

Answer 1

如下：

Private Sub Form_Resize()
Command1.Top = (Me.Height - Command1.Height) \ 2
Command1.Left = (Me.Width - Command1.Width) \ 2
End Sub
把Command1换成你想要居中的控件名就可以了（正确排版就是上面那样的）

VB：

Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言，为结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。是一种可用于微软自家产品开发的语言。 [1] 

“Visual” 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic  Instruction Code) 语言，是一种在计算技术发展历史上应用得最为广泛的语言。

Visual Basic源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建Active X控件，用于高效生成类型安全和面向对象的应用程序 [2]  。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。

Answer 2

Public Class Form1
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
PictureBox1.Width = PictureBox1.Width / TextBox1.Text
PictureBox1.Height = PictureBox1.Height / TextBox1.Text
PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage
End Sub
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
If (PictureBox1.Width + 50) < Me.Width And (PictureBox1.Height + 50) < Me.Height Then
～防止图像超出屏幕～
PictureBox1.Width = PictureBox1.Width * TextBox1.Text
PictureBox1.Height = PictureBox1.Height * TextBox1.Text
PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage
Else
PictureBox1.Width = PictureBox1.Width
PictureBox1.Height = PictureBox1.Height
End If
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
PictureBox1.Left = (Me.Width - PictureBox1.Width) / 2
PictureBox1.Top = (Me.Height - PictureBox1.Height) / 2
~Me等于窗体即Form1~
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
PictureBox1.Left = 12～12只是默认值～
PictureBox1.Top = 12
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
End
End Sub
End Class
以上关于放大、缩小、居中、还原
textbox. text是缩放比例