latihan_02_46110023

Public Class LATIHAN_02_46110023

   
    Private Sub kisah46110023_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kisah46110023.Click
        ISI46110023.Text = "Nama saya adalah " & NS46110023.Text & ", saya adalah cewek berusia 19 Tahun, sekarang ini saya tinggal di " & AS46110023.Text & ". Orang tua saya bernama " & NA46110023.Text & " Dan " & NI46110023.Text & ", mereka berdua mengharapkan saya untuk tetap belajar keras demi masa depan yang lebih baik. Saya telah mengenyam pendidikan selama puluhan tahun mulai dari taman kanak-kanak hingga di Politeknik, selama mengenyam pendidikan tersebut saya memiliki beberapa teman terbaik. Di sekolah dasar saya memiliki teman yang sangat baik bernama " & SD46110023.Text & ", setelah lulus di sekolah dasar " & SD46110023.Text & " melanjutkan pendidikan di sekolah yang berbeda dengan saya, saya melanjutkan pendidikan di SLTP Favorit dan " & SD46110023.Text & " ke Jakarta. Di SLTP tempat saya belajar terdapat teman yang selalu membantu memberi saya semangat hingga saya lulus sama-sama di sekolah, namanya adalah " & SLTP46110023.Text & ". Setelah selesai di SLTP kami sama-melanjutkan di sebuah SLTA, namun ketika di SLTA si " & SLTP46110023.Text & " memilih Jurusan IPS dan saya sendiri di jurusan IPA, di kelas saya terdapat seorang perempuan yang sangat pintar dan orangnya baik pada saya namanya adalah " & SLTA46110023.Text & ", dia tidak pernah tidak menduduki peringkat I. Di Politeknik juga ada teman baik mesti tidak satu kelas dengan saya, namanya ialah " & POLTEK46110023.Text & ". Hingga semester ini saya masih berteman baik dengan si " & POLTEK46110023.Text
    End Sub

    Private Sub sekian46110023_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles sekian46110023.Click
        NS46110023.Text = ""
        AS46110023.Text = ""
        NA46110023.Text = ""
        NI46110023.Text = ""
        SD46110023.Text = ""
        SLTP46110023.Text = ""
        SLTA46110023.Text = ""
        POLTEK46110023.Text = ""
        ISI46110023.Text = ""
    End Sub
End Class