OBJEK KONTROL
Label, TextBox dan Button
Label merupakan objek control yang dapat
menampilkan output tetapi tidak dapat memberikan input pada saat dijalankan.
TextBox Merupakan objek control yang dapat diberikan input pada saat program dijalankan.
TextBox Merupakan objek control yang dapat diberikan input pada saat program dijalankan.
Button merupakan objek control yang dapat
mengeksekusi perintah-perintah yang telah diberikan.
CheckBox dan RadioButton
CheckBox merupakan objek control yang berfungsi
untuk memilih beberapa item data. Dengan objek ini anda dapat lebih dari satu
pilihan dan bahkan memilih semua pilihan tersedia.
RadioButton fungsi hampir sama dengan checkbox, tetapi hanya dapat memilih satu pilihan yang tersedia.
RadioButton fungsi hampir sama dengan checkbox, tetapi hanya dapat memilih satu pilihan yang tersedia.
ComboBox dan ListBox
ComboBox merupakan objek control yang dapat
digunakan untuk menampilkan daftar item dengan pilihan dropdown.
ListBox merupakan objek control yang jauh berbeda dengan ComboBox hanya saja pada listbox menu daftar pilihan ditampilkan secara kesuluruhan.
ListBox merupakan objek control yang jauh berbeda dengan ComboBox hanya saja pada listbox menu daftar pilihan ditampilkan secara kesuluruhan.
Timer dan DateTimerPicker
Timer merupakan objek control yang berfungsi
untuk mengatur dan menampilkan waktu yang diperlukan.
DateTimerPicker objek control yang berfungsi untuk menampilkan tanggal dengan menu DropDown.
DateTimerPicker objek control yang berfungsi untuk menampilkan tanggal dengan menu DropDown.
A.
PRAKTIKUM
CheckBox dan
RadioButton
1.
Buat
project baru, dengan nama Prak2.
2.
Desain
Tampilan form seperti gambar berikut ini :
3. Tambahkan
kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel
berikut:
Object
|
Properties
|
Nilai
|
Form1
|
Name
Text
|
Form1
CheckBox dan
RadioButton
|
Label1
|
Name
|
Lbl_Font
|
Autosize
BorderStyle
Font
TextAlign
Text
|
False
Fixed3D
Microsoft Sans
Serif, 16
Center
CheckBox dan
RadioButton
|
|
GroupBox1
|
Text
|
Efek
|
GroupBox2
|
Text
|
Font Style
|
CheckBox1
|
Text
|
StrikeOut
|
CheckBox2
|
Text
|
Underline
|
RadioButton1
|
Text
|
Regular
|
RadioButton2
|
Text
|
Italic
|
RadioButton3
|
Text
|
Bold
|
RadioButton4
|
Text
|
BoldItalic
|
4.
Klik
ganda pada CheckBox1, kemudian ketikkan kode program berikut ini :
Private Sub CheckBox1_CheckedChanged(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles
CheckBox1.CheckedChanged
Lbl_Font.Font = New
Font("Microsoft sans Serif",
Lbl_Font.Font.Size, _
Lbl_Font.Font.Style Xor
FontStyle.Strikeout)
End Sub
5.
Klik
ganda pada CheckBox2, kemudian ketikkan kode program berikut ini :
Private Sub CheckBox2_CheckedChanged(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles
CheckBox2.CheckedChanged
Lbl_Font.Font = New Font("Microsoft sans
Serif", Lbl_Font.Font.Size, _
Lbl_Font.Font.Style
Xor FontStyle.Underline)
End Sub
6.
Klik
ganda pada RadioButton1, kemudian ketikkan kode program berikut ini :
Private Sub RadioButton1_CheckedChanged(ByVal sender As
System.Object, ByVal e As
System.EventArgs) Handles
RadioButton1.CheckedChanged
Lbl_Font.Font = New Font("Microsoft sans
Serif", Lbl_Font.Font.Size, _
Lbl_Font.Font.Style
Xor FontStyle.Regular)
End Sub
7.
Klik
ganda pada RadioButton2, kemudian ketikkan kode program berikut ini :
Private Sub RadioButton2_CheckedChanged(ByVal sender As
System.Object, ByVal e As
System.EventArgs) Handles
RadioButton2.CheckedChanged
Lbl_Font.Font = New Font("Microsoft sans
Serif", Lbl_Font.Font.Size, _
Lbl_Font.Font.Style
Xor FontStyle.Italic)
End Sub
8.
Klik
ganda pada RadioButton3, kemudian ketikkan kode program berikut ini :
Private Sub RadioButton3_CheckedChanged(ByVal sender As
System.Object, ByVal e As
System.EventArgs) Handles
RadioButton3.CheckedChanged
Lbl_Font.Font = New Font("Microsoft sans Serif", _
Lbl_Font.Font.Size, Lbl_Font.Font.Style Xor FontStyle.Bold)
End Sub
9.
Klik
ganda pada RadioButton4, kemudian ketikkan kode program berikut ini :
Private Sub RadioButton4_CheckedChanged(ByVal sender As
System.Object, ByVal e As
System.EventArgs) Handles
RadioButton4.CheckedChanged
Lbl_Font.Font = New
Font("Microsoft sans Serif", _
Lbl_Font.Font.Size, Lbl_Font.Font.Style Xor FontStyle.Bold Xor
FontStyle.Italic)
End Sub
10. Jalankan
aplikasi dengan menekan tombol F5
(di keyboard), atau melalui ikon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging.
Simpan aplikasi Anda.