Percabangan If Clause Satu Kondisi VB.NET

Dalam membuat Program atau Aplikasi pasti anda akan menggunakan IF, baik menggunakan VB NET atau Bahasa Pemograman yang lain. Dibawah ini akan kami jelaskan mengenai penggunaan IF pada VB Net dan anda bisa langsung mempraktikannya :

Satu Kondisi : IF ... THEN ...
Pada kondisi ini jika kondisi satu terpenuhi maka code result akan dijalankan atau dieksekusi. Namun
jika tidak memenuhi kondisi maka tidak ada yang dieksekusi.

Sintaks:

If [kondisi] Then [Result]

(2 atau lebih baris result)
If [kondisi] Then    [Result]   [Result]   ...End If

 Contoh:
 UI:

Code :
Public Class Form1
    Dim i As Integer
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        i = 0
        Label1.Text = i
        Button1.Text = "Tambah (+)"
        Button2.Text = "Kurang (-)"
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If i < 10 Then
            i = i + 1
            Label1.Text = i
        End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If i > 0 Then i = i - 1 : Label1.Text = i
    End Sub
End Class

Runtime :

Silahkan anda coba di komputer anda, dan ikuti terus pembelajaran kami selanjutnya...
Silahkan Klik Disini Untuk Download Project VB .Net diatas

2 comments: