'Deskripsi: Mengatur letak form menjadi ke sebelah kiri, tengah
' (pusat) atau kanan dari layar monitor Anda.
'Pembuat : Masino Sinaga (admin@masinosinaga.com)
'Diupload : Jumat, 10 Mei 2002
'Persiapan: 1. Buat 1 Project baru dengan 1 Form dan 3 Commandbutton.
' 2. Copy-kan coding berikut ke dalam editor form yang bertalian.
'-------------------------------------------------------------------------------
Private Sub Command1_Click() 'Kiri
Me.Left = 0
Me.Top = Screen.Height / 2 - Me.Height / 2
End Sub
Private Sub Command2_Click() 'Tengah
Me.Left = Screen.Width / 2 - Me.Width / 2
Me.Top = Screen.Height / 2 - Me.Height / 2
End Sub
Private Sub Command3_Click() 'Kanan
Me.Left = Screen.Width - Me.Width
Me.Top = Screen.Height / 2 - Me.Height / 2
End Sub
0 comments:
Posting Komentar