LATIHAN_08_36110042

Deskripsi Latihan_08_36110042

A.   Object-object dalam Latihan_08_36110042 :

1.    Object Label

Terdapat dua belas label yang bertuliskan:

1.    nama

2.    alamat

3.    anda

4.     teman 1

5.    teman 2

6.    teman 3

7.     teman 4

8.    teman 5

9.     cerita 1

10.   cerita 2

11.   cerita 3

12.   cerita 4

2.    Object Textbox

Terdapat enam belas textbox (dua belas status input; empat status read only). Status input digunakan untuk memasukkan nilai yang akan dimasukkan dalam perhitungan. Status Read Only digunakan untuk menampilkan hasil perhitungan dari angka-angkat yang sudah diinput.

3.    Object Button

Terdapat satu object button (Close). Button Close digunakan untuk mengosongkan kembali semua TextBox.

B.   Script Unique

Untuk button Close

NAMA_36110042.Text = ""

C.   Even

NAMA_36110042_TextChanged

CLOSE_36110042_Click

D.   Property

Property TextBox è ReadOnly = True

Langkah-Langkah Latihan_08_36110042

1.    Klik Start lalu pilih Microsoft Visual Studio 2008.

2.    Lalu akan muncul Start Page Microsoft Visual Studio 2008.

3.    Pilih Recent Project “Kumpulan_Latihan_36110042”

4.     Setelah terbuka, pilih icon Add New Item atau Ctrl+Shift+A

5.    Akan terbuka jendela Add New Item seperti di bawah ini, pilih template “Windows Form” dan beri nama “Latihan_08_36110042”

6.    Kemudian buat form sesuai dengan form di bawah ini.

 

7.     Berikut ini adalah rumus untuk menjalankan form di atas.

 

   Public Class Latihan_08_36110042

    Private Sub NAMA_36110042_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NAMA_36110042.TextChanged, ALAMAT_36110042.TextChanged, TEMAN1_36110042.TextChanged, ALAMAT1_36110042.TextChanged, TEMAN2_36110042.TextChanged, ALAMAT2_36110042.TextChanged, TEMAN3_36110042.TextChanged, ALAMAT3_36110042.TextChanged, TEMAN4_36110042.TextChanged, ALAMAT4_36110042.TextChanged, TEMAN5_36110042.TextChanged, ALAMAT5_36110042.TextChanged

        CERITA1_36110042.Text = "Nama saya adalah " & NAMA_36110042.Text & ". Alamat saya di Jalan " & ALAMAT_36110042.Text & ". Saya mempunyai banyak teman, yaitu " & TEMAN1_36110042.Text & " yang bertempat tinggal di " & ALAMAT1_36110042.Text & ", " & TEMAN2_36110042.Text & " yang tinggal di " & ALAMAT2_36110042.Text & ", " & TEMAN3_36110042.Text & ",yang tinggal di " & ALAMAT3_36110042.Text & " , " & TEMAN4_36110042.Text & " yang tinggal di " & ALAMAT4_36110042.Text & " dan " & TEMAN5_36110042.Text & " yang tinggal di " & ALAMAT5_36110042.Text & ". Mereka adalah teman-teman saya yang terbaik. "

        CERITA2_36110042.Text = "Nama saya " & NAMA_36110042.Text & ". Saya tinggal bersama orang tua saya di " & ALAMAT_36110042.Text & ". Teman saya yang bernama " & TEMAN1_36110042.Text & " yang tinggal di " & ALAMAT1_36110042.Text & ", " & TEMAN2_36110042.Text & " yang tinggal di " & ALAMAT2_36110042.Text & ", " & TEMAN3_36110042.Text & " yang tinggal di " & ALAMAT3_36110042.Text & ", " & TEMAN4_36110042.Text & " yang tinggal di " & ALAMAT4_36110042.Text & ",dan " & TEMAN5_36110042.Text & " yang tinggal di " & ALAMAT5_36110042.Text & ",sering datang berkunjung ke rumah saya. "

        CERITA3_36110042.Text = "Saya " & NAMA_36110042.Text & " yang beralamat di " & ALAMAT_36110042.Text & ".Saya senang ketika teman-teman saya datang ke rumah saya untuk berkumpul dan membuat acara makan-makan . Dan " & TEMAN1_36110042.Text & " yang tinggal di " & ALAMAT1_36110042.Text & " sangat jago dalam hal memasak, diantara teman-teman yang lain, seperti " & TEMAN2_36110042.Text & " yang tinggal di " & ALAMAT2_36110042.Text & ", " & TEMAN3_36110042.Text & " yang tinggal di " & ALAMAT3_36110042.Text & ", " & TEMAN4_36110042.Text & " yang tinggal di " & ALAMAT4_36110042.Text & ",dan " & TEMAN5_36110042.Text & " yang tinggal di " & ALAMAT5_36110042.Text & ". "

        CERITA4_36110042.Text = "Saya adalah " & NAMA_36110042.Text & ". Saya tinggal di jalan " & ALAMAT_36110042.Text & ". Saya sering pergi berenang bersama teman-teman saya seperti " & TEMAN1_36110042.Text & " yang tinggal di " & ALAMAT1_36110042.Text & ", " & TEMAN2_36110042.Text & " yang tinggal di " & ALAMAT2_36110042.Text & ", " & TEMAN3_36110042.Text & " yang tinggal bersama orang tuanya di " & ALAMAT3_36110042.Text & ", " & TEMAN5_36110042.Text & " beralamat di jalan " & ALAMAT5_36110042.Text & "."

    End Sub

    Private Sub CLOSE_36110042_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CLOSE_36110042.Click

        NAMA_36110042.Text = ""

        TEMAN1_36110042.Text = ""

        TEMAN2_36110042.Text = ""

        TEMAN3_36110042.Text = ""

        TEMAN4_36110042.Text = ""

        TEMAN5_36110042.Text = ""

        ALAMAT_36110042.Text = ""

        ALAMAT1_36110042.Text = ""

        ALAMAT2_36110042.Text = ""

        ALAMAT3_36110042.Text = ""

        ALAMAT4_36110042.Text = ""

        ALAMAT5_36110042.Text = ""

        CERITA1_36110042.Text = ""

        CERITA2_36110042.Text = ""

        CERITA3_36110042.Text = ""

        CERITA4_36110042.Text = ""

    End Sub

End Class

8.    Setelah itu, jalankan programnya dengan klik Icon Start Debugging kemudian akan mucul form navigator dan klik Latihan 08.