KINTAN YULANDA

LISTING PROGRAM

Form1 (Persegi Panjang)

Private Sub Command1_Click()

Text3.Text = Text1.Text * Text2.Text

End Sub

Private Sub Command2_Click()

Text4.Text = (CInt(Text1) + CInt(Text2)) * 2

End Sub

Private Sub Command3_Click()

Form2.Show

End Sub

Form2 (Lingkaran) :

Private Sub Command1_Click()

Text2 = ((Text1 * 1) ^ 2) * 3.14

End Sub

Private Sub Command2_Click()

Text3.Text = (text1 * 1) * 2 * 3.14

End Sub

Private Sub Command3_Click()

Form3.Show

End Sub

Form3 (Persegi) :

Private Sub Command1_Click()

Text2.Text = Text1.Text * Text1.Text

End Sub

Private Sub Command2_Click()

Text3.Text = Text1.Text * 4

End Sub

MDI Form1

Private Sub exit_Click()

End

End Sub

Private Sub lingkaran_Click()

Form2.Show

End Sub

Private Sub persegi_Click()

Form3.Show

End Sub

Private Sub persegipanjang_Click()

Form1.Show

End Sub

ALUR  LOGIKA

Pada kesempatan ini saya akan menjelaskan program yang masih menggunakan Microsoft Visual Basic, namun kali ini kita akan membuat beberapa form atau SDI (Single Document Interface) menjadi MDI (Multiple Document Interface).

Yang pertama saya akan membuat form untuk perhitungan luas dan keliling dari bangun persegi panjang, dengan form seperti ini :

commandButton1, masukan kodingan program agar dapat menampilkan hasil perhitungan panjang yang dikalikan dengan lebar untuk menghitung luas dari bagun persegi panjang yang akan ditampilkan pada text3.

Masukan kodingan seperti ini:

Private Sub Command1_Click()

Text3.Text = Text1 * Text2

End Sub

commandButton2, masukan kodingan program agar dapat menampilkan perhitungan 2 (panjang+lebar) untuk menghitung keliling dari bangun perseegi panjang yang ada pada text4. Kode ‘Cint’ dimaksudkan agar tipe data pada text1 dijadikan tipe data integer sehingga bisa mengoperasi penjumlahan dengan text2, dengan syarat agar pada text2 diubah juga tipe datanya menjadi integer.

Masukan kodingan seperti ini:

Private Sub Command2_Click()

Text4.Text = (CInt(Text1) + CInt(Text2)) * 2

End Sub

Selanjutnya saya akan menjelaskan form2,  menghitung luas dan keliling dari lingkaran. Dengan di ketahui yaitu Jari-jari. Sebelumnya kita akan membuat CommandButton penghubung antara form1 dengan form2 yaitu masukan kodingan berikut:

Private Sub Command3_Click()

Form2.Show

End Sub

Format pada form2 adalah sebagai berikut:

CommandButton1, masukan kodingan program agar dapat menampilkan hasil perhitungan kuadrat dari jari-jari yang diketahui lalu dikalikan dengan pi (3.14) untuk menghitung luas dari lingkaran pada text2.

Masukkan kodingan seperti ini:

Private Sub Command1_Click()

Text2 = ((Text1 * 1) ^ 2) * 3.14

End Sub

commandButton2, masukan kodingan program agar dapat menampilkan hasil perhitungan keliling lingkaran yaitu 2 dikalikan dengan pi, dimana pi bernilai 3.14 kemudian dikalikan kembali dengan Jari-jari yang telah diketahui yang hasilnya akan muncul pada text3.

Masukkan kodingan seperti ini:

Private Sub Command2_Click()

Text3.Text = (text1 * 1) * 2 * 3.14

End Sub

Kemudian untuk form3, menghitung luas dan keliling dari bangun persegi, yang dimana sisinya telah diketahui atau dapat kita isi sesuai kemauan. Namun sebelum itu kita buat dahulu tombol penghubung antara form2 dengan form3, yaitu masukan kodingan berikut:

Private Sub Command3_Click()

Form3.Show

End Sub

Format pada form3 adalah sebagai berikut:

CommandButton1, masukkan kodingan program agar dapat menampilkan hasil perhitungan luas dari bangun persegi yaitu sisi dikalikan dengan sisi, dimana sisi telah diketahui atau dapat diisikan sendiri yang nati hasilnya akan muncul pada Text2.

masukan kodingan seperti ini:

Private Sub Command1_Click()

Text2.Text = Text1.Text * Text1.Text

End Sub

CommandButton2, masukkan kodingan agar dapat menampilkan hasil hitungan dari keliling bangun persegi yaitu mengalikan sisi dengan 4, yang nanti hasilnya akan muncul pada Text3.

Masukkan kodingan seperti ini:

Private Sub Command2_Click()

Text3.Text = Text1.Text * 4

End Sub

Form1, Form2, dan Form3 termasuk dalam SDI (Single Document Interface) kemudian untuk menggabungnya agar menjadi MDI (Multiple Document Interface). Klik dahulu menu project lalu pilih Add MDI form, kemudian klik menu editor.

                 Menu Editor

Maka akan muncul tampilan seperti ini:

Pada Menu Editor, disini kita akan membuat menu, dan exit. Lalu isilah caption dan name, kemudian klik next.  lalu untuk membuat sub menu seperti ...persegi panjang, ...Lingkaran, ...Persegi klik menu exit lalu klik insert kemudian klik icon    kemudian oke dan seterusnya.

Agar MDI Form dapat di run atau dijalankan maka atur dahulu pada project properties    

General. Ubah startup object menjadi MDIForm1 kemudian OK. Maka Program MDI yang tadi telah dibuat siap dijalankan.

output

                                        

Lahir pada tahun 1989 di Johanesburg. Ia tidak pernah tahu ayahnya Nkosi telah mengidap HIV positif semenjak lahir, dia diadopsi oleh Gail Jhonson. Nkosi Jhonson mulai menjadi perhatian publik pada tahun 1997, ketika sebuah sekolah dasar dikota melvile johannesburg menolak untuk menerimanya sebagai murid dikarenakan penyakit HIV-positif yang dia derita.kejadian tersebut menyebabkan kehebohan ditingkat tertinggi politik afrika selatan,konstitusi melarang deskriminasi atas dasar status medis.Nkosi adalah inti pembicaraan di 13 Konferensi AIDS Internasional, di mana ia mendorong korban AIDS yang akan terbuka tentang penyakit dan untuk mendapatkan perlakuan yang sama.ini adalah cuplikan kata sambutan Nkosi:

"kita semua manusia yang sama, Kami memiliki tangan, Kami memiliki kaki, Kami dapat berjalan, kami dapat berbicara, kami memiliki kebutuhan seperti orang lain,jangan takut kepada kami,karena kita semua sama" Nelson Mandela menyebut Nkosi sebagai "ikon perjuangan untuk hidup".

Bersama dengan ibu angkat, Nkosi mendirikan sebuah tempat perlindungan HIV positif untuk ibu dan anak-anak mereka, Nkosi Haven's, di Johannesburg. Pada bulan November 2005, Gail mewakili Nkosi ketika ia menerima Hadiah Perdamaian internasional anak dari tangan Mikhail Gorbachev. Nkosi's Haven menerima US $ 100.000 hadiah uang dari Yayasan KidsRights serta patung yang telah menamai Nkosi di Nkosi Johnson's kehormatan. kehidupan nkosi adalah subjek dari buku Kami oleh Jim Woote.

Hector Pieterson (1964 - 16 Juni 1976) menjadi ikon gambar pada tahun 1976 tentang pemberontakan apartheid di Afrika Selatan ketika berita foto oleh Sam Nzima tentang kematian Hector yang sedang digendong oleh temannya, telah diterbitkan di seluruh dunia. Dia dibunuh pada usia 12 tahun ketika polisi menembaki siswa yang berunjuk rasa. 16 juni berdiri sebagai simbol perlawanan terhadap kekejaman dari pemerintah apartheid. Saat ini, diketahui sebagai Hari Nasional Pemuda - sehari di Afrika Selatan yang menghormati kaum muda dan membawa perhatian terhadap kebutuhan mereka.

16 juni 2002,telah diresmikan sebuah museum Hector Pieterson di dekat tempat dia di Orlando Barat.

gambar dibawah adalah Sam Nzima 16 juni 1976 foto dari Mbuyisa Makhubo membawa Hector Pieterson, diiringi oleh Hector's saudara, Antoinette.

Iqbal Masih adalah seorang anak laki-laki Pakistan umur 4 tahun yang telah dijual ke industri karpet sebagai budak dengan harga US$12. Dia disuruh bekerja selama dua belas jam perhari. Karena jam kerja yang lama dan keras,kurang makanan dan perawatan, Iqbal memiliki tubuh yang sangat kecil. Pada usia dua belas tahun, Iqbal bertubuh tak layaknya anak laki-laki yang baru berusia 6 tahun. Pada usia 10 tahun, dia melarikan diri dari perbudakan brutal dan kemudian bergabung dengan Front Pembebasan Buruh bond Pakistan untuk membantu menghentikan pekerja anak di seluruh dunia,iqbal meolong lebih dari 3.000 anak Pakistan lepas dari perburuhan, escape to freedom.

Dia telah dibunuh pada hari Minggu Easter 1995. Diduga oleh banyak pihak bahwa ia telah dibunuh oleh anggota "Carpet Mafia" karena ia membawa publisitas terhadap pekerja anak di industri.

Pada tahun 1994, Iqbal telah dianugerahkan Reebok Human Rights Award. Pada tahun 2000, ketika Hadiah untuk Hak-hak Anak dibentuk, dia diberikan hadiah ini sebagai salah satu laureates.

Thandiwe Chama adalah gadis Zambia berusia 16 tahun,dia memperoleh scooped the 2007 International Children’s menyingkirkan 28 nominasi lainnya dari seluruh dunia. Hadiah yang prestasius tersebut diberikan kepada thandiwe pada hari minggu oleh pemenang hadiah nobel perdamaian Betty Williams and Live8 inisiator, sir bob geldof. Hadiah berupa patung "the Nkosi" dan uang sebesar 100.000 Euro.

Pada tahun 1999 ketika thandiwe berusia 8 tahun,sekolahnya ditutup karena tidak ada guru,thandiwe beserta 60 anak lainnya berjalan mencari sekolah lainnya.akhirnya semua anak-anak tersebut ditampung di the Jack Cecup School.diperkuat dengan prestasinya,thandiwe selalu meneriakkan tentang hak-hak anak sekolah untuk mendapatkan pendidikan yang layak.thandiwe terus bersuara,misalnya dengan berbicara didepan gereja tentang anak-anak dan AIDS,tetapi masalah tidak selalu mudah dibahas di gereja.bersama dengan temannya dia menulis dan mengilustrasi sebuah buku yang berjudul "the chicken with AIDS" yang menceritakan tentang kisah anak-anak penderita AIDS.

"Ini sangat penting untuk mengetahui bahwa anak juga mempunyai hak. Di sekolah saya belajar tentang hak. Dan kemudian saya tahu bahwa ini adalah sesuatu yang ingin saya untuk memerangi. Karena jika anak-anak telah diberi kesempatan, mereka yakin dapat berkontribusi di dunia ini membuat tempat yang lebih baik. "- Thandiwe Chama.

Pada usia lima tahun, dia diambil dari orang tuanya dan bekerja diladang selama 3 tahun. Setelah itu dia menjadi aktivis di Bachpan Bachao Andolan, dia berkampanye tentang pendidikan gratis di rajasthan.dia kemudian membantu mendirikan sebuah network yang dikenal dengan nama "child friendly villages”, tempat anak-anak yang dihormati dan hak-hak pekerja anak tidak diperbolehkan. Dia juga mengatur network yang bertujuan untuk memberikan semua anak-anak yang lahir sertifikat sebagai salah satu cara untuk membantu melindungi mereka dari eksploitasi. Dia juga bekerja untuk memastikan anak-anak diberikan akte kelahiran. Dia mengatakan registrasi tersebut merupakan langkah pertama menuju enshrining hak anak-anak, membuktikan usia mereka, dan untuk membantu melindungi mereka dari perbudakan, perdagangan, perkawinan atau dipaksa melayani anak sebagai tentara.

Dia telah dianugerahkan Internasional Anak Hadiah Perdamaian oleh mantan Presiden Afrika Selatan FW de Klerk, yang memenangkan Hadiah Nobel Perdamaian pada tahun 1993.

Samantha Reed Smith adalah siswi Amerika dari Manchester, samantha menjadi terkenal di era Perang dingin Amerika dan Uni Soviet. Pada bulan November 1982, ketika Smith berusia 10 tahun, dia menulis surat kepada pemimpin Uni Soviet Yuri Andropov,dia menanyakan mengapa hubungan antara Uni Soviet dan Amerika Serikat begitu menegangkan.kemudian surat tersebut dimuat koran Soviet di Pravda. Samantha sangat senang mengetahui bahwa surat itu telah diterbitkan, Namun, dia tidak mendapatkan balasan. Dia kemudian mengirim surat ke Uni Soviet's di Duta Besar Amerika Serikat untuk menanyakan apakah ada respon dari tuan Andropov. Pada tanggal 26 April 1983, ia mendapatkan respon dari Andropov.

Smith menarik perhatian media luas di kedua negara tersebut sebagai "Goodwill Ambassador", dan menjadi dikenal sebagai "Duta Besar Amerika Serikat yang lebih muda" berpartisipasi dalam kegiatan perdamaian di Jepang. Dia menulis sebuah buku dan co-bintang dalam serial televisi, sebelum kematiannya pada usia 13 tahun di Bar Harbor Airlines Penerbangan 1808 pesawat crash.

para pembaca pasti pernah dengar tentang kehebohan diary anne frank. Annelies Marie "Anne" Frank (12 Juni 1929 – Februari/Maret 1945) adalah seorang perempuan kaum Yahudi yang menulis sebuah buku harian ketika ia bersembunyi bersama keluarga dan empat temannya di Amsterdam semasa pendudukan Nazi di Belanda pada Perang Dunia II. Setelah bersembunyi selama dua tahun, grup mereka dikhianati dan mereka dibawa ke kamp konsentrasi yang mengakibatkan seluruhnya tewas kecuali Otto, ayah Anne. Otto kembali ke Amsterdam dan dia menemukan buku harian anaknya. Karena yakin akan uniknya catatan tersebut, Otto berusaha mempublikasikannya.

Buku harian tersebut diberikan kepada Anne pada ulang tahunnya yang ketiga belas dan mencatat rentetan peristiwa-peristiwa kehidupan Anne dari 12 Juni 1942 hingga catatan terakhir pada 1 Agustus 1944. Akhirnya buku harian itu diterjemahkan dari bahasa Belanda ke berbagai bahasa dan menjadi salah satu buku yang paling banyak dibaca di dunia. Beberapa produksi teater dan film juga mengangkat tema diari ini. Buku harian yang digambarkan sebagai karya yang dewasa dan berwawasan ini menyodorkan potret kehidupan sehari-hari yang mendalam di bawah pendudukan Nazi; melalui tulisannya, Anne Frank menjadi salah satu korban Holocaust yang paling banyak dibicarakan.

http://www.onthespot-trans7.com/2011/11/kisah-nyata-perjuangan-hidup-7-anak.html