VisualBasic에서는 폼을 처음부터 화면 중앙에 표시할 수 있습니다(작업 표시줄 제외).

다음 프로그램은 계산 시 작업 표시줄이 차지하는 높이(또는 너비)를 공제합니다. Microsoft Office를 시작하는 바로가기 바가 있으면 바로가기 바가 차지하는 높이(또는 너비)도 공제됩니다.

PublicConstSM_CXFULLSCREEN=16

PublicConstSM_CYFULLSCREEN=17

#IfWin32Then

DeclareFunctionGetSystemMetricsLib"user32"(ByValnIndexAsLong)AsLong

#또 다른

DeclareFunctionGetSystemMetricsLib"사용자"(ByValnIndexAsInteger)AsInteger

#EndIf

PublicSubCenterForm(frmAsForm)

frm.Left=Screen.TwipsPerPixelX*GetSystemMetrics(SM_CXFULLSCREEN)/2-frm.Width/2

frm.Top=Screen.TwipsPerPixelY*GetSystemMetrics(SM_CYFULLSCREEN)/2-frm.Height/2

EndSub

Form_Load에서 CenterFormMe를 사용하세요 ->