Deskripsi dan Prosedur Latihan_04_36110039

     Deskripsi Form Latihan_04_36110039 

Terdapat empat object yaitu Label, Textbox, Button, dan DateTimePicker:
1.    Object Label
Terdapat enam label (yang bertuliskan nama saya; tanggal lahir; tanggal kelahiran; bulan kelahiran; tahun kelahiran; hari kelahiran)

2.    Object TextBox
Terdapat lima textbox (status input). Status input digunakan untuk memasukkan nama saya; tanggal kelahiran; bulan kelahiran; tahun kelahiran; hari kelahiran).
3.    Object Button
Terdapat satu object button (Analisa). Tombol Analisa digunakan untuk menampilkan hasil analisa DateTimepicker.

4.    Object DateTimePicker
Terdapat satu object DateTimePicker yang digunakan untuk menampilkan date.

     Script Unique
Menganalisa DateTimePicker yang hasilnya akan ditampilkan pada TextBox tertentu.
If DTP1_36110039.Value.DayOfWeek Then
            TK_36110039.Text = DTP1_36110039.Value.Day
            BK_36110039.Text = DTP1_36110039.Value.Month
            THNK_36110039.Text = DTP1_36110039.Value.Year
            HK_36110039.Text = WeekdayName(Weekday(DTP1_36110039.Value.Date, 1), False, FirstDayOfWeek.Sunday)
End If

     Even
ANALISA_36110039_Click

     Property
Property Textbox => ReadOnly =  True

Prosedur menjalankan Latihan 04:

1.    Klik icon Add New Item.
       

2.    Pada kolom Categories dan Templates pilih Windows Form, isi kolom name dengan
       Latihan_04_36110039.vb, kemudian klik add.
      

3.    Kemudian pilih object Label dan buat sebanyak 6. Pada properti text masing-masing label, isilah kalimat berikut:
a.    Nama Saya
b.    Tanggal Lahir
c.    Tanggal Kelahiran
d.    Bulan Kelahiran
e.    Tahun Kelahiran
f.    Hari Kelahiran

4.    Kemudian pilih object Button. Isi properti text menjadi Analisa dan properti name menjadi nama yang anda inginkan dan nomor stambuk pada akhir nama tersebut. Letakkan Object Button tersebut diantara label Tanggal Lahir dan Tanggal Kelahiran.

5.    Kemudian pilih object Textbox dan buat sebanyak 5, masing-masing disejajarkan dengan label Nama saya, Tanggal Kelahiran, Bulan Kelahiran, Tahun kelahiran, dan Hari kelahiran. Ketik properti name menjadi nama yang anda inginkan dan nomor stambuk pada akhir nama tersebut.

6.    Kemudian pilih object DateTimePicker. Letakkan sejajar dengan label Tanggal Lahir. Ketik properti name menjadi nama yang anda inginkan dan nomor stambuk pada akhir nama tersebut.

7.    Setelah perintah diatas dilakukan maka jadilah seperti kolom dibawah ini:
       

8.    Klik 2x Analisa sehingga muncul perintah berikutnya dan masukkan rumus, contohnya seperti ini:
Private Sub ANALISA_36110039_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ANALISA_36110039.Click
If DTP1_36110039.Value.DayOfWeek Then
TK_36110039.Text = DTP1_36110039.Value.Day
BK_36110039.Text = DTP1_36110039.Value.Month
THNK_36110039.Text = DTP1_36110039.Value.Year
HK_36110039.Text = WeekdayName(Weekday(DTP1_36110039.Value.Date, 1), False, FirstDayOfWeek.Sunday)
End If
End Sub

9.    Klik menu Project pilih Kumpulan_Latihan_04_36110039. Pada Startup Form pilih
       Latihan_04_36110039 lalu close.
      


11.    Untuk melihat apakah program yang anda telah buat sudah benar atau belum tepat maka klik icon Start
         Debugging dan isi kolom yang perlu diisi dan klik tombol Analisa untuk mengetahui fungsi dan hasilnya.