Pages

Kamis, 18 Juni 2009

Mengatur Letak Form Pada Tampilan Monitor

'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: