Latihan_14_36110033

A.    Object-object dalam Latihan_14_36110033 :

1.    Object Label  

Terdapat delapan label (yang bertuliskan gaji orang tua lebih dari terdapat dua label, bukan kelas terdapat dua label, tanggal lahir sebelum terdapat dua label, dan nama memiliki unsur terdapat dua label juga).

2.    Object Textbox

Terdapat dua belas textbox (enam status input; delapan status read only dan hanya digunakan sebagai pengganti label). Status input digunakan untuk memasukkan gaji orang tua lebih dari, bukan kelas, dan nama memiliki unsur. Masing-masing 2 textbox. Status Read Only digunakan sebagai pengganti label yang bertuliskan gaji ortu>=6000000, gaji ortu>=5000000, gaji ortu>=4000000, gaji ortu>=3000000, gaji ortu>=2000000, selain itu.

3.    Object Button

Terdapat dua object button (Filter dan Atur Warna). Button filter digunakan untuk memfilter data tabel berdasarkan data yang telah diinput di textbox. Button atur warna digunakan untuk memberikan warna pada data yang ada dalam datagridview menurut besar gaji ortunya.

4.    Object DateTimePicker

Terdapat dua object datetimepicker yang digunakan dalam memfilter data tabel yang ada di datagridview.

5.    Object DataGridView

Terdapat satu objeck datagridview yang digunakan untuk menampilkan data tabel yang telah dibuat.

B.     Script Unique

Untuk button Filter:

filter_36110033_Click

Untuk button Atur Warna:

aturwarna_36110033_Click

C.     Even

stambuk_36110033_CheckedChanged

Kelasbesar_36110033_CheckedChanged

Kelaskecil_36110033_CheckedChanged(

gaji_36110033_CheckedChanged

gajiberdasarkan_36110033_TextChanged

bukanberdasarkan_36110033_TextChanged

tanggalberdasarkan_36110033_ValueChanged

namaberdasarkan_36110033_TextChanged

filter_36110033_Click

aturwarna_36110033_Click

D.    Property

Property TextBox ==> ReadOnly=True

Prosedur

1.    Klik Start lalu pilih Microsoft Visual Studio 2008

2.    Buka Ms. Visual Studio

3.    Lalu akan muncul jendela awal Microsoft Visual Studio

4.    Klik Add New Item dan akan muncul jendela add new item seperti berikut:

Setelah muncul pilih windos from, kemudian ganti nama sesuai dengan nama yang diinginkan dan selanjutnya klik tombol add. Langkah ini dilakukan karena kita sudah pernah membuat project sebelumnya. Akan muncul from untuk digunakan membuat project

5.    Buat group box sebanyak 4, buat 4 radio button dan buat text pada form dengan menggunakan label, sebanyak 8 label. Kemudian beri tex sesuai dengan design 14. Adapun nama lebelnya terserah anda namun diikuti stambuk setelahnya.

6.    Buat kolom sesuai dengan design pada latihan 14 dengan mengguanakan textbox, sebanyak 12 kolom, date time picker sebanyak 2 kolom. Nama textbox dan date time picker diisi dengan identitas apa saja yang kemudian diikuti nomor stambuk.6 textbox menggunakan readonly false dan selebihnya menggunakan readonly true.

7.    Buat 2 tombol sesuai dengan design pada latihan 14 dengan menggunakan button. Kemudian beri nama text filter dan atur warna. kemudian  beri nama apa saja yang anda inginkan kemudian ikuti dengan stambuk. Adapun posisi text, date time picker, Datagridview, radion button kolom lebel dan tombol button disesuai dengan design pada latihan 14 berikut:

8.      Untuk menuliskan rumus pada latihan 14, anda dapat menuliskan rumus seperti dibawah ini:

Public Class Latihan_14_36110033

    Dim TableILHA As New DataTable

    Dim TableILHAJIE As New DataView

    Private Sub Latihan_14_36110033_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

   TableILHA.Columns.Add(New DataColumn("Stambuk", GetType(String)))

   TableILHA.Columns.Add(New DataColumn("Nama", GetType(String)))

TableILHA.Columns.Add(New DataColumn("Jenis Kelamin", GetType(String)))

TableILHA.Columns.Add(New DataColumn("Tanggal Lahir", GetType(Date)))

TableILHA.Columns.Add(New DataColumn("Gaji Ortu", GetType(Double)))

   TableILHA.Columns.Add(New DataColumn("Kelas",GetType(String)))

TableILHA.Rows.Add("36112001", "Fitri", "P", "10/20/1994", 5000000, "1A-D3")

TableILHA.Rows.Add("36112003", "Fathin Ammar Asidik", "L", "06/29/1994", 6800000, "1A-D3")

        TableILHA.Rows.Add("36112004", "Endah Mariadi", "P", "11/07/1994", 7500000, "1A-D3")

        TableILHA.Rows.Add("36112005", "Mawar Aztanti", "P", "06/01/1993", 4000000, "1A-D3")

        TableILHA.Rows.Add("36112006", "Izmi Istiqamah", "P", "11/04/1994", 7000000, "1A-D3")

        TableILHA.Rows.Add("36112007", "Imran Novrin Ruslim", "L", "11/21/1994", 1000000, "1A-D3")

        TableILHA.Rows.Add("36112008", "Adbul Malik", "L", "11/09/1993", 1000000, "1A-D3")

        TableILHA.Rows.Add("36112009", "Rahmaniah", "P", "01/19/1994", 5000000, "1A-D3")

        TableILHA.Rows.Add("36112010", "Yulianti", "P", "09/28/1994", 650000, "1A-D3")

        TableILHA.Rows.Add("36112011", "Zulfitra Qadar Yasin", "L", "03/10/1994", 10000000, "1A-D3")

        TableILHA.Rows.Add("36112012", "Sri Aprianti", "P", "04/05/1994", 4000000, "1A-D3")

        TableILHA.Rows.Add("36112013", "Noviantri Paembonan", "P", "11/19/1994", 6000000, "1A-D3")

        TableILHA.Rows.Add("36112014", "A. Rahmawaty", "P", "04/04/1994", 5000000, "1A-D3")

        TableILHA.Rows.Add("36112015", "Danela Mangintek", "P", "11/06/1994", 3000000, "1A-D3")

        TableILHA.Rows.Add("36112016", "Andi Jusma Nilam Sari", "P", "09/02/1994", 10000000, "1A-D3")

        TableILHA.Rows.Add("36112017", "Dana Abrian", "L", "10/05/1994", 5000000, "1A-D3")

        TableILHA.Rows.Add("36112018", "Kurniawati", "P", "10/11/1994", 2000000, "1A-D3")

        TableILHA.Rows.Add("36112019", "Kharisma Yusuf", "P", "06/14/1994", 4000000, "1A-D3")

        TableILHA.Rows.Add("36112020", "Bernard Talebong", "P", "10/01/1994", 10000000, "1A-D3")

        TableILHA.Rows.Add("36112021", "Sulaipah", "P", "09/28/1994", 1000000, "1A-D3")

        TableILHA.Rows.Add("36112022", "Rismawati", "P", "09/07/1994", 900000, "1A-D3")

        TableILHA.Rows.Add("36112023", "Andi Arhami Hamzah", "P", "06/28/1994", 10000000, "1A-D3")

        TableILHA.Rows.Add("36112024", "Syahrul Kamal", "L", "10/18/1994", 10000000, "1A-D3")

        TableILHA.Rows.Add("36112025", "Ivana Olivia Aser", "P", "01/14/1993", 6000000, "1A-D3")

        TableILHA.Rows.Add("36112026", "Melinda Rizkawati", "P", "05/07/1994", 2000000, "1A-D3")

        TableILHA.Rows.Add("36112027", "Nurul Rezki Susanti", "P", "09/24/1994", 5000000, "1A-D3")

        TableILHA.Rows.Add("36112028", "Andi Anggi Fadliyah", "P", "08/15/1994", 1500000, "1B D-3")

        TableILHA.Rows.Add("36112029", "Trinayanti", "P", "06/03/1992", 3000000, "1B D-3")

        TableILHA.Rows.Add("36112030", "Sri Widya Ayu Wandini", "P", "06/01/1994", 5000000, "1B D-3")

        TableILHA.Rows.Add("36112031", "Nur Indahsari Idris", "P", "08/28/1994", 5000000, "1B D-3")

        TableILHA.Rows.Add("36112032", "Rosita Satri", "P", "12/06/1994", 3000000, "1B D-3")

        TableILHA.Rows.Add("36112033", "A. Syasya Annisa Ausan", "P", "08/08/1994", 7000000, "1B D-3")

        TableILHA.Rows.Add("36112034", "Rezky Arianti", "P", "01/27/1994", 3000000, "1B D-3")

        TableILHA.Rows.Add("36112035", "Tri Arismunandar", "L", "12/09/1993", 1000000, "1B D-3")

        TableILHA.Rows.Add("36112036", "Nurmilasari", "P", "07/06/1993", 200000, "1B D-3")

        TableILHA.Rows.Add("36112037", "Ismawati", "P", "08/01/1994", 900000, "1B D-3")

        TableILHA.Rows.Add("36112039", "Andi Syahril", "L", "10/02/1994", 2000000, "1B D-3")

        TableILHA.Rows.Add("36112041", "Musyarafah Asis", "L", "07/13/1994", 6000000, "1B D-3")

        TableILHA.Rows.Add("36112042", "Sukmawati Amir", "P", "04/13/1994", 6000000, "1B D-3")

        TableILHA.Rows.Add("36112043", "Mu'minat Nur", "P", "05/17/1995", 5000000, "1B D-3")

        TableILHA.Rows.Add("36112044", "Muhammad Fachri Sani", "L", "02/02/1994", 5000000, "1B D-3")

        TableILHA.Rows.Add("36112045", "Ibnu Affan Al-Mufar'id", "L", "08/05/1994", 8000000, "1B D-3")

        TableILHA.Rows.Add("36112046", "Sri Wahyuni Hafid", "P", "12/25/1994", 11000000, "1B D-3")

        TableILHA.Rows.Add("36112047", "A. Dian Pelita Waty", "P", "05/05/1994", 3000000, "1B D-3")

        TableILHA.Rows.Add("36112048", "Tri Wahyuni", "P", "11/11/1994", 800000, "1B D-3")

        TableILHA.Rows.Add("36112049", "Alfin Riani Bandaso", "P", "04/11/1994", 3000000, "1B D-3")

        TableILHA.Rows.Add("36112050", "andri prianto tukan", "L", "04/26/1994", 2000000, "1B D-3")

        TableILHA.Rows.Add("36112051", "Muhammad Adhe Anugrah", "L", "08/31/1993", 5000000, "1B D-3")

        TableILHA.Rows.Add("36112052", "Sabri", "L", "07/24/1993", 700000, "1B D-3")

        TableILHA.Rows.Add("36112053", "Resky Yonada Ahmad", "P", "03/22/1994", 1500000, "1B D-3")

        TableILHA.Rows.Add("36112054", "Ade Apriathis Rantelino", "L", "04/27/1994", 3000000, "1B D-3")

        TableILHA.Rows.Add("36112055", "Achmad Rezky Satria Perdana", "L", "12/17/1993", 3000000, "1B D-3")

        TableILHA.Rows.Add("36112056", "Fibra Yoseph P.", "P", "03/27/1995", 6000000, "1B D-3")

        TableILHA.Rows.Add("36112057", "Reenaldy Alchudri Azsagaf", "L", "05/03/1994", 10000000, "1B D-3")

        TableILHA.Rows.Add("36112058", "Artis Susan", "P", "10/29/1993", 5000000, "1B D-3")

        TableILHA.Rows.Add("36112058", "Dian Eka Puteri", "P", "11/11/1993", 1000000, "1B D-3")

        TableILHA.Rows.Add("36112059", "Ummul Hayyul Qayyum", "P", "12/01/1993", 3500000, "1A-D3")

        TableILHA.Rows.Add("36112060", "Nita", "P", "01/04/1995", 2500000, "1A-D3")

        TableILHA.Rows.Add("36112061", "Rahmat Adi Pratama", "L", "04/21/1994", 10000000, "1A-D3")

        TableILHA.Rows.Add("46110018", "Rose Anne Tarida Situmorang", "P", "12/14/1994", 5000000, "1AD4")

        TableILHA.Rows.Add("46112001", "Rizka Awalia Mustakim", "P", "10/07/1994", 3000000, "1AD4")

        TableILHA.Rows.Add("46112002", "Dewi Sartika", "P", "02/10/1994", 1000000, "1AD4")

        TableILHA.Rows.Add("46112003", "Nurawalia M.", "P", "12/04/1994", 3000000, "1AD4")

        TableILHA.Rows.Add("46112004", "Anita Rahmah Muhtadin", "P", "12/07/1994", 5000000, "1AD4")

        TableILHA.Rows.Add("46112004", "Siti Khaerunnisa", "P", "03/28/1994", 1000000, "1AD4")

        TableILHA.Rows.Add("46112005", "Mardhotillah", "P", "01/13/1994", 3000000, "1AD4")

        TableILHA.Rows.Add("46112006", "Rezky Tri Utami", "P", "07/03/1994", 3000000, "1AD4")

        TableILHA.Rows.Add("46112007", "Andi Rabiah", "L", "09/07/1994", 1000000, "1AD4")

        TableILHA.Rows.Add("46112008", "Nanda Ardilia Pratama", "L", "08/01/1994", 1000000, "1AD4")

        TableILHA.Rows.Add("46112009", "Eka Yuli Astuti", "P", "08/07/1994", 2000000, "1AD4")

        TableILHA.Rows.Add("46112010", "Nur Indah Purnamasari", "P", "07/22/1994", 2500000, "1AD4")

        TableILHA.Rows.Add("46112011", "Delsi Tifani Lan", "P", "12/24/1994", 2000000, "1AD4")

        TableILHA.Rows.Add("46112012", "Nurul Qadri Musra", "L", "08/24/1994", 3000000, "1AD4")

        TableILHA.Rows.Add("46112013", "A. Muh. Lutfi Ahmad", "L", "10/10/1993", 4000000, "1AD4")

        TableILHA.Rows.Add("46112014", "Mariana.", "P", "06/22/1994", 1000000, "1AD4")

        TableILHA.Rows.Add("46112015", "Irmayanti", "P", "09/23/1994", 1000000, "1AD4")

        TableILHA.Rows.Add("46112016", "Dyah Sukma Anggraini", "P", "05/10/1994", 3500000, "1AD4")

        TableILHA.Rows.Add("46112017", "Camelia Indulgenssya Gundung", "P", "09/14/1994", 2000000, "1AD4")

        TableILHA.Rows.Add("46112020", "Sukriani Karunia Rahma", "P", "12/01/1994", 3000000, "1AD4")

        TableILHA.Rows.Add("46112021", "Rafidah", "P", "06/05/1994", 500000, "1AD4")

        TableILHA.Rows.Add("46112022", "Liliani Paelongan", "P", "05/25/1994", 3000000, "1AD4")

        TableILHA.Rows.Add("46112025", "Fitri Amalia Islamiati", "P", "03/26/1995", 4000000, "1AD4")

        TableILHA.Rows.Add("46112026", "Muhammad Khaidir", "L", "12/26/1993", 3000000, "1AD4")

        TableILHA.Rows.Add("46112027", "Reny Rita Waty Djafar", "P", "07/26/1993", 3000000, "1AD4")

        TableILHA.Rows.Add("46112028", "Nur Salim Rusdi", "L", "04/12/1994", 1500000, "1AD4")

        TableILHA.Rows.Add("46112029", "Azwar Arfah", "L", "04/03/1994", 3000000, "1AD4")

        TableILHA.Rows.Add("46112032", "Abd. Rahman", "L", "10/08/1994", 1500000, "1B D4")

        TableILHA.Rows.Add("46112037", "Herianto", "L", "12/08/1993", 3000000, "1B D4")

        TableILHA.Rows.Add("46112042", "Faradhiba Zainal Putri", "P", "12/04/1993", 3000000, "1B D4")

        TableILHA.Rows.Add("46112043", "Remon Agit Rimang", "L", "01/06/1995", 3000000, "1B D4")

        TableILHA.Rows.Add("46112050", "Andi Akbar", "L", "11/26/1994", 2000000, "1B D4")

        TableILHA.Rows.Add("46112054", "Rahmi Ani", "P", "11/30/1994", 2000000, "1B D4")

        TableILHA.Rows.Add("46112055", "Reni Anggraeni", "P", "10/12/1994", 1500000, "1B D4")

        TableILHA.Rows.Add("46112057", "I Ketut Yuda Sadpwa", "L", "05/02/1993", 4500000, "1B D4")

        TableILHA.Rows.Add("46112058", "citra amalia ramadhani", "L", "02/16/1995", 3000000, "1B D4")

        TableILHA.Rows.Add("46120023", "Puspita Susilawati Ridjal", "P", "01/01/1994", 4000000, "1AD4")

        TableILHA.Rows.Add("46112031", "Irmayanti", "P", "05/02/1994", 1000000, "1B D4")

        TableILHA.Rows.Add("46112033", "Maulanan Ibrahim", "L", "04/10/1994", 1000000, "1B D4")

        TableILHA.Rows.Add("46112034", "Gamaliel Giovani Rafael Nong", "L", "08/06/1993", 3700000, "1B D4")

        TableILHA.Rows.Add("46112035", "Herpita Tohura", "P", "10/24/1993", 700000, "1B D4")

        TableILHA.Rows.Add("46112036", "Hasmiati Hajar", "P", "05/17/1994", 5000000, "1B D4")

        TableILHA.Rows.Add("46112038", "Viorensi S", "P", "10/13/1994", 2000000, "1B D4")

        TableILHA.Rows.Add("46112039", "Carissa Evan Anthen", "P", "10/23/1994", 6000000, "1B D4")

        TableILHA.Rows.Add("46112040", "Tommy Paunganan", "L", "02/22/1993", 2000000, "1B D4")

        TableILHA.Rows.Add("46112041", "Nida Hazimah Ulfah", "P", "09/24/1995", 5000000, "1B D4")

        TableILHA.Rows.Add("46112044", "Ulfah Nas", "P", "01/26/1994", 5000000, "1B D4")

        TableILHA.Rows.Add("46112045", "Abdul Qawwam Nurjaya", "L", "11/26/1994", 3500000, "1B D4")

        TableILHA.Rows.Add("46112046", "Andini Hayrunnisyah", "P", "06/27/1994", 1500000, "1B D4")

        TableILHA.Rows.Add("46112047", "Hasmawati", "P", "11/22/1994", 5000000, "1B D4")

        TableILHA.Rows.Add("46112048", "Udin Pranata", "L", "01/29/1993", 1000000, "1B D4")

        TableILHA.Rows.Add("46112049", "Muhammad Farid Syah", "L", "01/20/1995", 5000000, "1B D4")

        TableILHA.Rows.Add("46112051", "Afrisca Fraktiani Rante", "P", "04/13/1995", 5000000, "1B D4")

        TableILHA.Rows.Add("46112052", "Aprianto Sandy", "L", "04/11/1993", 3000000, "1B D4")

        TableILHA.Rows.Add("46112053", "Khusnul Khatimah A", "P", "08/27/1994", 3000000, "1B D4")

        TableILHA.Rows.Add("46112056", "Kartini Widyasita", "P", "04/21/1993", 4650000, "1B D4")

        TableILHAJIE = TableILHA.DefaultView

        DataGridView_36110033.DataSource = TableILHAJIE

        DataGridView_36110033.Columns("Stambuk").Width = 60

        DataGridView_36110033.Columns("Jenis Kelamin").Width = 50

        DataGridView_36110033.Columns("Tanggal Lahir").Width = 70

        DataGridView_36110033.Columns("Gaji Ortu").Width = 60

        DataGridView_36110033.Columns("Kelas").Width = 40

DataGridView_36110033.Columns("JenisKelamin").DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter

DataGridView_36110033.Columns("Kelas").DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter

      End Sub

    Private Sub stambuk_36110033_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles stambuk_36110033.CheckedChanged

        If stambuk_36110033.Checked = True Then

            TableILHAJIE.Sort = "Stambuk"

        End If

    End Sub

    Private Sub Kelasbesar_36110033_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Kelasbesar_36110033.CheckedChanged

        If Kelasbesar_36110033.Checked = True Then

            TableILHAJIE.Sort = "[Kelas] desc"

        End If

    End Sub

    Private Sub Kelaskecil_36110033_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Kelaskecil_36110033.CheckedChanged

        If Kelaskecil_36110033.Checked = True Then

            TableILHAJIE.Sort = "[Kelas], [Tanggal Lahir]"

        End If

    End Sub

    Private Sub gaji_36110033_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles gaji_36110033.CheckedChanged

        If gaji_36110033.Checked = True Then

            TableILHAJIE.Sort = "[Gaji Ortu] desc"

        End If

    End Sub

    Private Sub gajiberdasarkan_36110033_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles gajiberdasarkan_36110033.TextChanged

        TableILHAJIE.RowFilter = "[Gaji Ortu] > " & Val(gajiberdasarkan_36110033.Text)

    End Sub

    Private Sub bukanberdasarkan_36110033_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bukanberdasarkan_36110033.TextChanged

        TableILHAJIE.RowFilter = "[Kelas] <> '" & bukanberdasarkan_36110033.Text & "'"

    End Sub

    Private Sub tanggalberdasarkan_36110033_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tanggalberdasarkan_36110033.ValueChanged

TableILHAJIE.RowFilter = "[Tanggal Lahir] < #" &   

tanggalberdasarkan_36110033.Value.Month & "/" & 

tanggalberdasarkan_36110033.Value.Day & "/" & 

tanggalberdasarkan_36110033.Value.Year & "#"

    End Sub

    Private Sub namaberdasarkan_36110033_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles namaberdasarkan_36110033.TextChanged

        TableILHAJIE.RowFilter = "[Nama] like '%" & namaberdasarkan_36110033.Text & "%'"

    End Sub

    Private Sub filter_36110033_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles filter_36110033.Click

TableILHAJIE.RowFilter ="[Gaji Ortu] >"&Val (gajimenggabungkan _ 36110033.Text)& _" and [Kelas] <> '" & bukanmenggabungkan_36110033. Text & "'" & _" and [Tanggal Lahir] < #" &

tanggalmenggabungkan_36110033.Value.Month & "/" & tanggalmenggabungkan_36110033.Value.Day & "/" & tanggalmenggabungkan_36110033.Value.Year & "#" & _" and [Nama] like '%" & namamenggabungkan_36110033.Text & "%'"

    End Sub

     Private Sub aturwarna_36110033_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles aturwarna_36110033.Click

        For Each X As DataGridViewRow In DataGridView_36110033.Rows

            If X.Cells("Gaji Ortu").Value > 6000000 Then

                X.DefaultCellStyle.BackColor = Color.DarkBlue

            ElseIf X.Cells("Gaji Ortu").Value > 5000000 Then

                X.DefaultCellStyle.BackColor = Color.Aquamarine

            ElseIf X.Cells("Gaji Ortu").Value > 4000000 Then

                X.DefaultCellStyle.BackColor = Color.BlanchedAlmond

            ElseIf X.Cells("Gaji Ortu").Value > 3000000 Then

                X.DefaultCellStyle.BackColor = Color.DarkRed

            ElseIf X.Cells("Gaji Ortu").Value > 2000000 Then

                X.DefaultCellStyle.BackColor = Color.AliceBlue

            Else

                X.DefaultCellStyle.BackColor = Color.DarkGoldenrod

            End If

        Next

    End Sub

End Class

9.      Kemudian di Start Debbuging, maka kita akan tahu, betul atau tidaknya rumus yang kita gunakan serta coba jalankan perintah yang ingin kita ketahui dari latihan tersebut untuk mengetahui hasilnya yang lebih jelas lagi.

10.  Jika program berjalan simpan dengan menekan tombol ctrl+s  untuk menyimpan data dan prosedur latihan 14 selesai.