在主窗体的Form_load()中的最前面加入下列代码:
DimX0Aslong
DimY0AsLong
让窗体居中
X0=Screen.Width
Y0=Screen.Height
X0=(X0-Me.Width)/2
Y0=(Y0-Me.Height)/2
Me.MoveX0,Y0->
在主窗体的Form_load()中的最前面加入下列代码:
DimX0Aslong
DimY0AsLong
让窗体居中
X0=Screen.Width
Y0=Screen.Height
X0=(X0-Me.Width)/2
Y0=(Y0-Me.Height)/2
Me.MoveX0,Y0->