Archive for the ‘Perulangan’ Category

Perulangan

Perulangan

 

Perulangan

Struktur perulangan adalah salah satu statement penting di dalam pemrograman. Struktur ini digunakan untuk mengulang satu atau beberapa statement selama kondisi nya masih terpenuhi.

 

Pada VB 2005 terdapat beberapa struktur perulangan yang biasa dipakai, yaitu For ..Next, For Each….Next, While…End while, dan Do…Until..Loop dan Do..Loop Until, sedangkan pada C# terdapat struktur perulangan for, foreach, while, dan do .

 

Perulangan For…Next VB 2005

Struktur For digunakan untuk mengulangi suatu perintah dalam jumlah yang ditentukan. Pada struktur ini, anda bisa menentukan hingga berapa kali loop akan berulang, penentuan banyaknya perulangan yang dilakukan biasanya telah ditentukan sejak awal. Selain banyaknya yang dilakukan biasanya juga step atau langkah pengulangan (bertambah atau berkurang ) jga telah ditetapkan

 

Pada struktur ini biasanya juga digunakan variable ber tipe integer untuk dijadikan kondisi untuk perulangan. Bentuk umum dari struktur ini adalah :

 

Deklarasi Variabel

For <Variabel>=<Nilai Awal> To <Nilai Akhir>  <Step  [Step]>

Statement

Statement

Statement

Next <Var>

 

 

 

 

 

 

 

 

 

Sebagai contoh jika kita ingin menampilkan angka dari 1 sampai dengan 10 dengan step 1, maka programnya dapat dituliskan seperti contoh dibawah ini

 

Dim X As Integer

For X=1 To 10  Step 1

Print X

Next X

 

 

 

 

 

Untuk membuat program yang menggunakan struktur For..Next lakukan langkah-langkah berikut ini :

 

Ø  Buat project baru

Ø  Pilih Visual Basic à Windows, pada templates pilih Windows Application

Ø  Pada Name ketikkan “Perulangan01-VB2005

Ø  Klik Button Browse dan pilih ke folder Contoh_Program

Ø  Ketikkan “Struktur_Perulangan” pada Solution Name

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Ø  Klik OK, sesaat aka muncul layar pengembangan project

 

Ø  Pada Form1 atur properti

 

Properti Nilai
Backcolor White
FormBorderStyle Fixed3D
StartPosition CenterScreen
Text For .. Next

 

Ø  Selanjutnya masukkan tiga Label, tiga TextBox, Tiga Button, dan satu ListBox. Atur masing-masing objek menjadi seperti tampilan berikut

Ø  Ubah Text Label1 menjadi=” Nilai Awal”, Label2=”Langkah Perulangan”, Label3=”Nilai Akhir”

Ø  Letakkan TextBox1 pada sisi kanan Label1, TextBox2 pada sisi kanan  Label2, dan TextBox3 pada sisi kanan Label3.

Ø  Kemudian Letakkan ListBox di dan atur sehingga panjang nya dari atas ke bawah sama dengan letak TextBox1 dan TextBox3

Ø  Selanjutnya ubah properti Text pada Button1 menjadi = “Mulai”, Button2 =  “Proses” dan Button3 = “Selesai”

Ø  Terakhir atur posisi masing-masing button

 

Selanjutnya tambahkan kode program untuk masing-masing button :

 

Ø  Klik ganda Button1 dan ketikkan kode program berikut :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As

System.EventArgs) Handles Button1.Click

ListBox1.Items.Clear()

TextBox1.Clear()

TextBox2.Clear()

TextBox3.Clear()

TextBox1.Focus()

End Sub

 

 

 

 

 

 

 

Ø  Pada Event Button2_Click tambahkan kode program untuk memproses perulangan :

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As

System.EventArgs) Handles Button2.Click

Dim X, Awal, Akhir, Langkah As Integer

Awal = CInt(TextBox1.Text)

Akhir = CInt(TextBox3.Text)

Langkah = CInt(TextBox2.Text)

 

For X = Awal To Akhir Step Langkah

ListBox1.Items.Add(X)

Next

 

End Sub

 

 

 

 

 

 

 

 

 

Ø  Terakhir tuliskan kode program untuk keluar dari aplikasi, yaitu pada Buttton2

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e

As System.EventArgs) Handles Button3.Click

End

End Sub

 

 

 

 

 

Ø  Jalankan program dengan cara mengklik tombol Start Debugging pada tololbar

Ø  Klik Button Mulai dan ketikkan angka 1 pada TextBox1, angka 1 pada TextBox2, dan 20 pada TextBox3

Ø  Klik Button Proses

 

Ø  Untuk mencoba lagi, klik button mulai dan masukkan angka-angka pada TextBox, misalkan masukkan angka 30 pada TextBox1, angka 3 pada TextBox2, dan angka 0 pada TextBox3

Ø  Selanjutnya klik lagi Button Proses

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Ø  Klik Button Selesai untuk keluar dari aplikasi

Ø  Simpan kembali Project dan Solution

Perulangan for pada C#

Pada C# juga terdapat struktur perulangan For. Pada C# struktur For juga sama dengan struktur For yang terdapat pada C++. Struktur ini digunakan untuk mengulang satu atau beberapa pernyataan di dalam satu blok perulangan. Sama seperti pada VB 2005 perulangan biasanya di dasarkan nilai angka dari suatu variable yang telah dideklarasikan sebelumnya. Bentuk umum dari struktur For pada C# adalah :

 

{

Typedata  variabel;

For ( varibel = nilai_Awal; Variabel=Nilai_akhir; Variabel ++ / Variabel – (Step)

{

Statement…              ;

Statement…              ;

} ;

}

 

 

 

 

 

 

 

 

 

Untuk membuat program yang menggunakan struktur for pada C# lakukan langkah-langkah berikut ini :

 

Ø  Buka Solution Struktur_Perulangan yang telah dibuat pada saat membuat project pada VB 2005

Ø  Pada Solution “Struktur Perulangan” lakukan klik kanan mouse, pilih Add à New Project.

Ø  Sesaat akan tampil jendela “Add New Project”, selanjutnya pilih Windows Visual C# pada Project Type

Ø  Pada Tab Template pilih Windows Application

Ø  Pada Name ketikkan “Perulangan01-CSharp”

Ø  Klik OK

 

Ø  Pada Form1 atur properti

 

Properti Nilai
Backcolor White
Control Box False
FormBorderStyle SizableToolWindow
StartPosition CenterScreen
Text Perulangan for

 

Ø  Selanjutnya masukkan objek ListBox1, dan dua Button ke dalam form

Ø  Atur posisi ListBox1 sehingga memanjang ke bawah

Ø  Ubah property Text Button1 menjadi “Proses”, Button2 menjadi “Selesai”

Ø  Properti Font masing-masing Button menjadi Bold

Ø  Pada Properti Backcolor kedua Button ubah menadi “White” dan FlatStyle menjadi “Flat”

 

Ø  Kemudian tambahkan kode program untuk perulangan, yaitu menampilkan angka 1 sampai 15 dengan step 1. Klik ganda pada Button1 (Proses)  dan ketikkan kode program berikut ini :

private void button1_Click(object sender, EventArgs e)

{

for (int i = 1; i <= 15; i++)

{

listBox1.Items.Add(i);

}

}

 

 

 

 

 

 

 

Ø  Selanjutnya klik ganda pada Button2 (Selesai) dan ketikkan program berikut ini :

private void button2_Click(object sender, EventArgs e)

{

Close();

}

 

 

 

 

 

Setelah selesai untuk menjalankan program, pertama-tama atur terlebih dahulu Start Up Project pada Solution “Struktur Perulangan dengan carar

 

Ø  Klik Solution sehingga tampil layar Solution Properties

Ø  Selanjutnya pada jendela properties, pilih Start Up Project, kemudian ubah menjadi project “Perulangan01-CSharp”

Ø  Jalankan program dengan mengklik Tombo Start Debugging pada ToolBar

Ø  Klik Button Proses

Ø  Klik Button selesai untuk keluar dari program.

 

Penjelasan Program :

Program yang dibuat menggunakan  C# sama dengan program yang dibuat dengan VB 2005. Pada program VB yang akan diulang adalah variable X (Integer) nilai awal di dapat dari variable Awal (TextBox1), nilai akhir dari variable akhir (TextBox3) dan step (langkahnya) dari variable Langkah (TextBox2). Perulangan variable X ditampilkan pada ListBox.

Untuk perulangan pada C# yang akan ditampilkam adalah nilai I. Nilai I sudah ditentukan, yaitu dari 1 sampai 15 dengan step (langkah 1). Sama seperti program VB nilai I ditampilkan pada ListBox1.

 

 

 

For Each ..Next pada VB 2005 dan foreach pada C#

Struktur perulangan ini hampir sama dengan struktur perulangan yang telah dibahas diatas, perbedaan nya pada perulangan For each variable yang digunakan untuk perulangan adalah Array. perbedaan pada perulangan for each

 

Aturan penulisan struktur pada VB 2005 adalah :

For  each elemen  in array

Statement

Statement

Exit For

Statement

 

 

 

 

 

 

 

 

Pada C# penulisan statement foreach adalah ::

 

For  each (array)

{

Statement

Statement

Break

Statement

}

 

 

 

 

 

 

 

 

Perulangan While…end While

Struktur While digunakan untuk menjalankan perintah-perintah di dalam blok program selama kondisi masih terpenuhi. Aturan penulisan pada struktur ini adalah :

 

While <Kondisi>

Statement

End While

 

 

 

 

Seperti contoh pada perulangan For untuk menampilkan angka berdasarkan nilai awal (TextBox1) sampai nilai akhir (TextBox3) dan step berdasarkan nilai (TextBox2), maka pada struktur While dapat dituliskan sebagai berikut :

Dim X, Awal, Akhir, Langkah As Integer

Awal = CInt(TextBox1.Text)

Akhir = CInt(TextBox3.Text)

Langkah = CInt(TextBox2.Text)

X = Awal

While X <= Akhir

ListBox1.Items.Add(X)

X = X + Langkah

End While

 

 

 

 

 

 

 

 

 

 

 

 

Untuk lebih memudahkan pemahaman berikut penulis berikan contoh program untuk menampilkan angka berdasarkan nilai awal, nilai akhir, dan juga langkah nya. Pada program ini terdapat dua Listbox untuk menampilkan angka secara menaik dan menurun (ascending dan descending). Untuk membuat program lakukan langkah-langkah di bawah ini :

 

Ø  Buka Solution Struktur Perulangan

Ø  Pada Solution “Struktur Perulangan” lakukan klik kanan mouse, pilih Add à New Project.

Ø  Sesaat akan tampil jendela “Add New Project”, selanjutnya pada bagian project type pilih Visual Basic à windows

Ø  Pada Tab Template pilih Windows Application

Ø  Pada Name ketikkan “Perulangan02-VB2005

Ø  Klik OK

Ø  Setelah tampil project, pada Form1 ubah property menjadi :

 

Properti Nilai
Backcolor White
FormBorderStyle SizableToolWindow
StartPosition CenterScreen
Text Perulangan While …End While’

 

Ø  Selanjutnya masukkan dua ListBox, tiga Label, Tiga TextBox dan tiga Button

Ø  Pada Label ubah property AutoSize menjadi false, dan property Text menjadi :

 

Objek Properti Nilai
Label 1 Text

Font Style

Awal

Bold

Label 2 Text

Font Style

Langkah

Bold

Label 3 Text

Font Style

Akhir

Bold

 

Ø  Kemudian Ubah juga property masing-masing Button :

 

Objek Properti Nilai
Button1 Text

Font Style

FlatStyle

Mulai

Bold

Flat

Button2 Text

Font Style

FlatStyle

Proses

Bold

Flat

Button3 Text

Font Style

FlatStyle

Selesai

Bold

Flat

 

Ø  Atur posisi masing-masing TextBox sehingga Form1 menjadi seperi terlihat pada gambar

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Tambahkan kode untuk masing-masing button :

 

Ø  Pada Button1 (Mulai), klik ganda dan ketikkan program pada blok program :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e

As System.EventArgs) Handles Button1.Click

ListBox1.Items.Clear()

ListBox2.Items.Clear()

TextBox1.Clear()

TextBox2.Clear()

TextBox3.Clear()

TextBox1.Focus()

End Sub

 

 

 

 

 

 

 

 

 

Ø  Selanjutnya pada Button2 (Proses) tuliskan ketikkan kode program berikut ini :

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim X, Y, Awal, Akhir, Langkah As Integer

Awal = CInt(TextBox1.Text)

Akhir = CInt(TextBox3.Text)

Langkah = CInt(TextBox2.Text)

X = Awal

Y = Akhir

While (X <= Akhir)

ListBox1.Items.Add(X)

ListBox2.Items.Add(Y)

X = X + Langkah

Y = Y – Langkah

End While

End Sub

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Ø  Terakhir pada Button3 (Selesai) tambahkan kode program

Private Sub Button3_Click(ByVal sender As System.Object, ByVal

e As System.EventArgs) Handles Button3.Click

End

End Sub

 

 

 

 

 

Ø  Compile program dengan menggunakan Menu Bar Build à Build Perulangan02-VB2005

Ø  Jalankan program melalui Menu Bar Debug à Start Debugging

Ø  Setelah form tampil, klik Button Mulai dan masukkan angka-angka pada Textbox

Ø  Klik Button Proses

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Perulangan while Pada C#

Statement while digunakan untuk melakukan perulangan selama kondisi bernilai true (masih terpenuhi). Kondisi pada struktur ini terletak di bagian awal maka bisa terjadi bagian pernyataan tidak akan dijalankan apabila pada awal nya kondisi tidak terpenuhi. Bentuk umum struktur perulangan ini adalah sebagai berikut :

 

{

Tipe data Variabel

While (kondisi)

{

Statement…              ;

Statement…              ;

} ;

 

 

 

 

 

 

Contoh pemakaian statement While untuk menampilkan angka 1 samapi dengan 10 adalah sebagai berikut :

int X;

X = 1;

while (X <= 10)

{

listBox1.Items.Add(X);

X = X + 1;

}

 

 

 

 

Berikut ini kita membuat contoh program yang hampir sama dengan contoh program while pada VB 2005. Lakukan langkah-langkah berikut untuk membuat program

 

Ø  Buka Solution Struktur Perulangan

Ø  Pada Solution “Struktur Perulangan” lakukan klik kanan mouse, pilih Add à New Project.

Ø  Sesaat akan tampil jendela “Add New Project”, selanjutnya pada bagian project type pilih C# à windows

Ø  Pada Tab Template pilih Windows Application

Ø  Pada Name ketikkan “Perulangan02-CSharp

Ø  Klik OK

Ø  Setelah tampil project, pada Form1 ubah property menjadi :

Perulangan Do …Loop Until

Struktur perulangan ini hampir sama dengan struktur yang digunakan pada While …End While, tetapi pada struktur perulangan Do ini kondisi bisa di letakkan pada bagian awal blok program ataupun pada bagian akhir blok program. Jika kondisi diletakkan di awal maka digunakan statement Do While ….Loop, tetapi apabila kondisi diletakkan  di bagian akhir blok pernyataan yang digunakan adalah statement Do…Loop Until. Aturan penulisan struktur perulangan ini adalah :

 

Dim Variabel As Tipe data

X = <Nilai Awal>

Do While <Kondisi>

Statement

Statement

Loop

Atau

Dim Variabel As Tipe data

X = <Nilai Awal>

Do

Statement

Statement

Loop Until >= <Kondisi>

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Dim X As Integer

X = 1

Do While X <= 10

ListBox1.Items.Add(X)

X = X + 1

Loop

Atau

Dim X As Integer

X = 1

Do

ListBox1.Items.Add(X)

X = X + 1

Loop Until >= 10

 

 

 

 

 

 

 

 

 

 

 

Perulangan Do Pada C#

Struktur perulangan do memiliki fungsi yang hampir sama dengan struktur while, tetapi pengecekan kondisi dilakukan di akhir struktur, maka minimal satu kali blok pernyataan akan di jalankan.

 

{

do

{

Statement…              ;

}

while (kondisi);

}

 

 

 

 

 

 

 

 

int X;

X = 1;

do

{

listBox1.Items.Add(X);

X += 1;

}

while (X <= 10);

Silahkan Download Link Di bawah ini untuk data yang lebih lengkap :)

http://www.mediafire.com/?zxgsb01wrfv2hzx

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Ikuti

Get every new post delivered to your Inbox.