PERULANGAN (LOOP)

Perulangan (Loop) pada VB 6

Intro :

Dalam kehidupan sehari-hari, sering kali kita melakukan suatu kegiatan yang dilakukan berulang-ulang. Misalnya, disaat kita melakukan pemilihan siaran (channel)  televisi. Kita akan terus melakukan pencarian sampai ditemukan siaran yang diinginkan, bahkan rutinitas keseharian kita pun merupakan sesuatu yang dilakukan berulang-ulang. Kegiatan kita yang dilakukan secara berulang-ulang pada saatnya tentu akan selesai/berhenti juga.  Misalnya dari contoh pemilihan siaran televisi diatas, pemilihan akan berhenti apabila ditemukan siaran yang diinginkan. Artinya suatu perulangan harus ada penentuan kondisi agar perulangan tersebut berhenti.

Demikian juga didalam program komputer, suatu perulangan digunakan untuk mengotomatisasi atau mengefektifkan satu atau beberapa pernyataan (statement). Perulangan didalam Pemrograman komputer dikenal dengan istilah Loop sedangkan Looping adalah prosesnya. Perhatikan kode program berikut ini :

Private Sub Form_Activate()

     Print 1

    Print 2

    Print 3

     Print 4

    Print 5                         

End Sub

 Gb 1. Form Saat dijalankan

 

 

Private Sub Form_Activate()

For i = 1 To 5

    Print i

Next i

End Sub

Kode program yang kedua juga menghasilkan hasil yang sama seperti kode program yang pertama. Perbedaannya adalah kode program yang pertama tidak menggunakan fungsi perulangan (loop).

puisi islam

Bayang-bayang Nabi

Ya Rasulullah, apa yang harus dilakukan para pemimpin ?
"Membela yang lemah dan membantu yang miskin" jawab Nabi.

Ya Rasulullah, apa yang harus dilakukan ulama ?
Memberi contoh yang baik dan mendukung pemimpin
YAng membela orang - arang lemah" jawabnya

Ya Rasulullah ... apa yang harus dilakukan orang-orang lemah dan miskin ?
"Bersabarlah, dan tetplah bersabar
Jangan kau lihat pemimpinmu yang suka harta
Jangan kau ikuti ulamamu yang mendekati mereka
Jangan kau temani orang-orang yang menjilat mereka
Jangan kau lepaskan pandanganmu dari para pemimpin dan ulama yang hidupnya juhud dari harta"

Ya RAsulullah... Pemimpin seperti itu sudah tidak ada
Ulama seperti itu sudah menghilang entah kemana
Yang tersisa adalah pemimpin serakah
Yang tertinggal adalah ulama-ulama yang tama'
Banyak rakyat yang mengikuti keserakahan mereka
Ummat banyak yang meneladani ketamakan mereka !
Apa yang harus aku lakukan, Ya... RAsulullah !
Siapa yang harus aku angkat jadi pemimpin ?
Siapa yang harus aku ikuti fatwa-fatwanya ?
Siapa yang harus aku jadikan teman setia ?

"Wahai ummatku...
Tinggalkan mereka semua
Dunia tidak akan bertambah baik sebab mereka
Bertemanlah dengan anak dan istrimu saja
Karena Allah menganjurkan, "Wa 'asiruhunna bil ma'ruf"
Ikutilah fatwa hatimu
Karena hadits mengatakan, "Istafti qalbaka, wa in aftaukan nas waftauka waftauka"
Dan angkatlah dirimu menjadi pemimpin
Bukankah, "Kullulkum Ra'in, ea kullukum masulun 'an ra'iyyatihi ?"

---

PHOTOSHOP

BERIKUT INI ADALAH BEBERAPA HASIL KARYA YANG DI MENGGUNAKAN PHOTOSHOP

kita tidak hanya bisa memperbaiki gambar,. tetapi kita juga bisa membuat gambar yang kita ingin kan....
belajar photoshop ini tidak cukup sulit....   asal kan mau BELAJAR

kalaw kita sudah mahir,..
kita bisa menjadi master ,....
"membuat photoshop semudah membalik telapak tangan"

INI CONTOH NYA,..!!!



KEREN KAN?????? ;)

kegiatan siswa

HARI GURU pd tggl 25 nov 2010,

kami seluruh anak SMK KHAIDIR NUR membuat acara,... yaitu mkn2 br sama....
jauh2 hr, kmi sudah mrencanakn smua tentang hr gru ini....
dn allhamdullillah TERCAPAI sudah ap yg d rencana kn....

tertib acara nya,,

*kt sambutan dr pendiri....& mewakili pak yayasan..

*kt sambutan dr pak kepsek..

*kt sambutan dr ktua osis..

*pembacaan puisi, (wenti daniar)

*penyerahan cendra mata pd  gru2....

*dan kmudian pemberian hadiah untk "the best of teacher"...

dan gru trsebut is,,, pak rifani....

*dn acara slanjut nya,,, makan2...

dn stlh it, acara bebas,, smpai jm 2....