A.
Object-object dalam Latihan_04_36110033
:
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 (satu status input; empat status read only). Status input digunakan
untuk memasukkan nama saya. Status Read Only digunakan untuk menampilkan hasil analisa
tanggal kelahiran, bulan kelahiran, tahun kelahiran, dan hari kelahiran.
3. Object Button
Terdapat satu
object button (Analisa). Button Analisa digunakan untuk menampilkan hasil analisa
di object TextBox ReadOnly.
4. Object DateTimePicker
Terdapat
satu objek datetimepicker. Digunakan untuk menentukan tanggal yang akan
ditampilkan pada TextBox ReadOnly.
B.
Script Unique
Untuk button Analisa:
If DTP_36110033.Value.DayOfWeek Then
HK_36110033.Text =
WeekdayName(Weekday(DTP_36110033.Value.Date, 1), False,
FirstDayOfWeek.Sunday)
Else : HK_36110033.Text = "minggu"
End If
TK_36110033.Text = DTP_36110033.Value.Day
BK_36110033.Text = DTP_36110033.Value.Month
THK_36110033.Text = DTP_36110033.Value.Year
C.
Even
ANALISA_36110033_Click
D.
Property
Property TextBox ==> ReadOnly=True
Prosedur
1. Buka Ms.
Visual Studio
2. Klik Create
Project
3. Ketik nama
file yang ingin disimpan
4. Akan terbuka
jendela pekerjaan Ms. Visual Studio
6. Buat text
pada form dengan menggunakan label, sebanyak
6 label. Dengan nama text masing-masing sebagai berikut:
o
Nama saya
o
Tanggal lahir
o
Tanggal kelahiran
o
Bulan kelahiran
o
Tahun kelahiran
o
Hari kelahiran
7. Buat kolom sesuai dengan design pada latihan
04 dengan mengguanakan textbox, sebanyak 5 kolom. Nama textbox diisi dengan
identitas apa saja yang kemudian diikuti nomor stambuk.
8. Buat kolom
tanggal sesuai dengan design pada latihan 04 dengan DateTimePicker dengan nama DTP_36110033. Kolom itu nantinya akan
digunakan untuk menuliskan tanggal yang kita iginkan.
9. Buat 1 tombol sesuai dengan design pada latihan 04
dengan menggunakan button. Kemudian beri nama ANALISA_36110033 kemudian textnya
diisi dengan Analisa.
10. Untuk
menuliskan rumus pada latihan 04, klik dua kali tombol analisa. Akan muncul lembar
kerja untuk menulis rumus. Adapun rumusnya dapat dituliskan sebagai berikut:
Public Class Latihan_04_36110033
Private SubANALISA_36110033_Click(ByValsenderAsSystem.Object,ByVale As
System.EventArgs)HandlesANALISA_36110033.Click
If DTP_36110033.Value.DayOfWeek Then
HK_36110033.Text=WeekdayName(Weekday(DTP_36110033.Value.Date,1),False,FirstDayOfWeek.Sunday)
Else HK_36110033.Text = "minggu"
End If
TK_36110033.Text =
DTP_36110033.Value.Day
BK_36110033.Text =
DTP_36110033.Value.Month
THK_36110033.Text =
DTP_36110033.Value.Year
End Sub
End Class
11. 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.
12. Uji kembali
program untuk mengetahui apakah program ini berjalan atau tidak dengan
cara mengklik Start Debbuging
13. Jika program
berjalan simpan dengan menekan tombol ctrl+s
untuk menyimpan data
14. Setelah
melaksanakan semua prosedur maka latihan 04 selesai.
Tidak ada komentar:
Posting Komentar