![Kontrol Properties Pada Form - Mengatur Posisi Form Dengan Control Top & Left Pada Form VB NET Kontrol Properties Pada Form - Mengatur Posisi Form Dengan Control Top & Left Pada Form VB NET](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjP6g8h9D46PrbilfjS_QSzCRaZvqQCo5yKK5SL8XNbWC0C2oxh2QbKYniZ0QsmgCoUJp0G2mH71nUVU9WzBXhS_TViFgbnlqmxV_9hWxkLGqhT5THZeTrikBC0ypzHtRWcRz2FTeMaNw/s600/Kontrol+Properties+Pada+Form+-+Mengatur+Posisi+Form+Dengan+Control+Top+%2526+Left+Pada+Form+VB+NET.jpg)
Mengubah Nilai Top & Left Pada Form
Untuk mengubah Top & Left pada form cukup mudah, ikutilah cara-cara dibawah1. Mengubah Nilai Start Position Pada Form Melalui Jendela Properties
Untuk mengubahnya dengan cara melalui jendela Properties:- klik Form
- Jendela Properties
- Ubah dahulu nilai StartPosition Menjadi manual. Caranya baca Kontrol Properties Pada Form - Control Start Position pada Form VB NET
- Lalu cari kontrol Location
- Isi koordinat X dan Y pada control location. X merupakan nilai dari atas, Y merupakan nilai koordinat dari kiri.
- Contohnya X diisi 500; Y diisi 700
2. Mengubah Nilai Start Position Pada Form Dengan Coding
Untuk mengubahnya dengan baris kode, cara penulisannya adalah sebagai berikut: Me.Top = Nilai untuk mengatur posisi form dari atas
Me.Left = Nilai untuk mengatur posisi form dari kiri
Contohnya kita ingin mengubah Nilai/Value dari Top & Left dengan 200;700 maka
Me.Top = 200
Me.Left = 700
Anda bisa menyimpan kode diatas pada even form_load() sehingga menjadi
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Me.Top = 200
Me.Left = 700
End Sub
Beberapa kode untuk mengubah/mengatur Top & Left pada form
1. Mengatur Form menjadi ditengah
Me.Top = (Screen.PrimaryScreen.WorkingArea.Height - Me.Height) / 2
Me.Left = (Screen.PrimaryScreen.WorkingArea.Width - Me.Width) / 2
2. Mengatur Form menjadi berada disudut kanan bawah
Me.Top = (Screen.PrimaryScreen.WorkingArea.Height - Me.Height)
Me.Left = (Screen.PrimaryScreen.WorkingArea.Width - Me.Width)
3. Mengatur Form menjadi berada disudut kanan atas
Me.Top = 0
Me.Left = (Screen.PrimaryScreen.WorkingArea.Width - Me.Width)
4. Mengatur Form menjadi berada disudut kiri atas
Me.Top = 0
Me.Left = 0
5. Mengatur Form menjadi berada disudut kiri bawah
Me.Top = (Screen.PrimaryScreen.WorkingArea.Height - Me.Height)
Me.Left = 0
6. Mengatur Form menjadi berada disudut kiri tengah
Me.Top = (Screen.PrimaryScreen.WorkingArea.Height - Me.Height) / 2
Me.Left = 0
7. Mengatur Form menjadi berada disudut kanan tengah
Me.Top = (Screen.PrimaryScreen.WorkingArea.Height - Me.Height) / 2
Me.Left = (Screen.PrimaryScreen.WorkingArea.Width - Me.Width)
Keterangan:
- Screen.PrimaryScreen.WorkingArea.Height Adalah untuk mendapatkan nilai tinggi dari layar monitor
- Screen.PrimaryScreen.WorkingArea.Width Adalah untuk mendapatkan nilai lebar dari layar monitor
- Me.Width Adalah untuk mendapatkan nilai lebar dari form
- Me.Height Adalah untuk mendapatkan nilai tinggi dari form
Subscribe Our Newsletter
0 Comment
Posting Komentar