Menempatkan Form di Tengah Layar–VB6

Ketika kita memulai sebuah aplikasi rasanya kurang pas apabila form muncul di sembarang posisi, untuk itu kita akan membuatnya terletak ditengah-tengah. Ada 2 cara yang akan kita bahas:

• Cara Pertama

Dengan mengatur pada properties:

StartUpPosition = 2-CenterScreen

• Cara Kedua

- Masukan Sintak berikut di form dengan event load:

Private Sub Form_Load()
  Dim TopCorner As Integer
  Dim LeftCorner As Integer
   
  If Form1.WindowState <> 0 Then Exit Sub
   
  TopCorner = (Screen.Height - Form1.Height) \ 2
  LeftCorner = (Screen.Width - Form1.Width) \ 2
  Form1.Move LeftCorner, TopCorner
End Sub

- Setelah itu jalankan maka letak form akan berada di tengah layar.

Sekian tutorialnya semoga bermanfaat.