Stuktur IF di Visual Basic 2010

Dalam pelajaran sebelumnya, kita telah belajar bagaimana kode program yang menerima masukan dari pengguna dan menampilkan output tanpa mengontrol aliran program. Dalam bab ini, Anda akan belajar bagaimana untuk menulis kode yang dapat VB2010 membuat keputusan ketika proses input dari pengguna, dan kontrol aliran program dalam proses. Proses pengambilan keputusan merupakan bagian penting dari pemrograman karena akan membantu memecahkan masalah praktis secara cerdas sehingga dapat memberikan output yang berguna atau umpan balik bagi pengguna. Sebagai contoh, kita dapat menulis sebuah program VB2010 yang dapat meminta komputer untuk melakukan tugas tertentu sampai kondisi tertentu terpenuhi, atau sebuah program yang akan menolak non-numerik data. Dalam rangka untuk mengontrol aliran program dan untuk membuat keputusan, kita perlu menggunakan operator kondisional dan operator logika bersama-sama dengan struktur kontrol Jika.

1 Bersyarat

Para operator kondisional adalah alat yang kuat yang menyerupai operator matematika. Operator ini memungkinkan programto VB2010 membandingkan nilai data dan kemudian memutuskan tindakan yang harus dilakukan, apakah untuk menjalankan sebuah program atau menghentikan program yang andmore. Mereka juga dikenal sebagai operator perbandingan numerik. Biasanya mereka digunakan untuk membandingkan dua nilai untuk melihat apakah mereka sama atau satu nilai lebih besar atau kurang dari nilai lainnya. Perbandingan akan mengembalikan hasil benar atau salah. Operator ini ditunjukkan pada Tabel 1.

Table 1:  Conditional Operators Operator Arti = Sama Dengan > Lebih Dari < Kurang Dari >= Lebih Dari dan Sama Dengan <=  Kurang Dari dan Sama Dengan <>  Tidak Sama Dengan

2 Logical Operator

Kadang-kadang kita mungkin perlu untuk membuat lebih dari satu perbandingan sebelum keputusan dapat dibuat dan tindakan yang diambil. Dalam hal ini, menggunakan operator perbandingan numerik saja tidak cukup, kita perlu menggunakan operator tambahan, dan mereka adalah operator logika. Ini operator logika ditunjukkan pada Tabel 2.

Operator	Arti
And	Kedua belah pihak harus benar
or	Satu sisi atau lainnya harus benar
Xor	Satu sisi atau lainnya harus benar tetapi tidak keduanya
Not	meniadakan kebenaran

* Biasanya operator di atas digunakan untuk membandingkan data numerik. Namun, Anda juga dapat membandingkan string dengan operator di atas. Dalam membuat perbandingan string, ada aturan tertentu untuk berikut: Huruf Besar kurang dari huruf kecil, adalah "A" <"B" <"C" <"D ".......<" Z" dan nomor kurang dari huruf.

3 Menggunakan struktur IF dengan Operator Perbandingan

Untuk secara efektif mengontrol aliran program VB2010, kita akan menggunakan struktur kontrol Jika bersama-sama dengan operator kondisional dan operator logika. Pada dasarnya ada tiga jenis struktur Jika kontrol, yaitu if .... then pernyataan, Jika .... Kemudian ... Else statement dan if .... then .... ElseIf pernyataan.

3 (a) IF .... Then Statement
Ini adalah struktur kontrol sederhana yang meminta komputer untuk melakukan tindakan tertentu yang ditentukan oleh ekspresi VB jika kondisi benar. Namun, ketika kondisi adalah palsu, tidak ada tindakan akan dilakukan. Format umum untuk if ... then .. pernyataan

If condition Then
VB expression
End If

Contoh :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myNumber As Integer
myNumber = TextBox1.Text
If myNumber > 100 Then
Label2.Text = " You win a lucky prize"
End If
End Sub

* Ketika Anda menjalankan program dan masukkan nomor yang lebih besar dari 100, Anda akan melihat "Anda memenangkan hadiah beruntung" pernyataan. Di sisi lain, jika nomor yang dimasukkan kurang dari atau sama dengan 100, Anda tidak melihat tampilan apapun.

3 (b) IF .... Then ... Else Statement
Menggunakan pernyataan IF .... Then ini tidak sangat berguna dalam pemrograman dan tidak memberikan pilihan bagi pengguna. Dalam rangka memberikan pilihan, kita dapat menggunakan Statement IF .... Then ... Lain-Lain. Struktur kontrol akan meminta komputer untuk melakukan tindakan tertentu yang ditentukan oleh ekspresi VB jika kondisi benar. Dan ketika kondisi adalah palsu, tindakan alternatif akan dieksekusi. Format umum untuk IF .... Then ... Else Statement

If condition Then
VB expression
Else
VB expression
End If

Contoh 2 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim myNumber As Integer myNumber = TextBox1.Text If myNumber > 100 Then Label2.Text = " Selamat! Anda memenangkan hadiah beruntung" Else Label2.Text = " Maaf, Anda tidak menang hadiah apapun" End If End Sub * Ketika Anda menjalankan program dan masukkan nomor yang lebih besar dari 100, "Selamat! Anda memenangkan hadiah beruntung" akan ditampilkan. Di sisi lain if  nomor yang masukkan kurang dari atau sama dengan 100, Anda akan melihat "Maaf, Anda tidak menang hadiah apapun"

Contoh 3 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim myNumber, MyAge As Integer myNumber = TextBox1.Text MyAge = TextBox2.Text If myNumber > 100 And myAge > 60 Then Label2.Text = "Selamat! Anda memenangkan hadiah beruntung" Else Label2.Text = " Maaf, Anda tidak menang hadiah apapun" End If End Sub * Program ini menggunakan Operator logika Dan di samping operator kondisional. Ini berarti bahwa kedua kondisi harus dipenuhi agar kondisi yang harus benar, jika blok kedua kode akan dieksekusi. dalam contoh ini, nomor yang dimasukkan harus lebih dari 100 dan usia harus lebih dari 60 dalam rangka untuk memenangkan beruntung hadiah, salah satu dari kondisi di atas tidak terpenuhi akan mendiskualifikasi pengguna dari memenangkan hadiah.

3 (c) IF .... Then ... ElseIf Statement
Jika ada lebih dari dua pilihan alternatif, dengan menggunakan pernyataan IF .... Then .... Else pernyataan tidak akan cukup. Untuk memberikan lebih banyak pilihan, kita dapat menggunakan Statement if .... Then ... ElseIf. Format umum untuk if ... then .. Else pernyataan

If condition Then
VB expression
ElseIf condition Then
VB expression
ElseIf condition Then
VB expression
.
.
Else
VB expression
End If

Contoh 4 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim Mark As Integer Dim Grade as String Mark = TextBox1.Text If myNumber >=80 Then Grade="A" ElseIf  Mark>=60 and Mark<80 then Grade="B" ElseIf  Mark>=40 and Mark<60 then Grade="C" Else Grade="D" End If End Sub

Untuk Percabangan lainnya dapat anda lihat pada postingan lainnya :
Struktur Select Case di Visual Basic

Klik Like/share jika anda menyukai tulisan ini;