Monday, July 10, 2017

Contoh penggunaan IF Else dengan VB.NET - tutorialarry

Contoh penggunaan IF Else dengan VB.NET
Pada kesempatan kali ini saya akan membuat Artikel mengenai Pemograman Berorientasi Objek dengan VB.NET.kali ini kita akan belajar mengenai penggunaan IF dan Else dalam bahasa pemograman VB.NET.bagi kalian yang sekolah atau kuliah di jurusan tentang komputer pastinya sudah tidak asing lagi dengan VB.NET.tapi untuk yang masih pemula dan yang mau belajar anda harus tau apa itu VB.NET dan penggunaan IF Else yang akan kita bahas kali ini.
  
Apa Itu VB.NET ?
VB.NET atau Microsoft Visual Basic.NET merupakan sebuah alat untuk mengembangkan dan membangun aplikasi yang bergerak di atas sistem .NET Framework,dengan menggunakan bahasa Basic.
Penggunaan IF Else
IF Else biasa di gunakan untuk memeriksa kondis dari suatu aksi dan membuat keputusan berdasarkan kondisi itu sendiri.
Biasanya IF Else ini menggunakan operator Perbandingan seperti Lebih Besar,Kecil,Sama Besar dan lain-lain. Dan IF Else juga menggunakan Operator Logika seperti Atau(Or) ,Dan (And).

Nah itu dia sedikit pengetahuan saya dari VB.NET dan Penggunaan IF Else. sekarang saya akan berikan contoh bagaimana penggunaan IF Else dalam aplikasi VB.NET mencari Nilai Rata-Rata.

( Baca Juga : Belajar Bilangan Aritmatika VB.NET  )
Contoh Penggunaan IF Else pada aplikasi mencari nilai Rata-rata dengan VB.NET
Sekarang coba anda buat sebuah Form seperti gambar di bawah ini :

contoh aplikasi mencari nilai rata-rata

Jika sudah silahkan Klik 2 x Cek Lalu masukan Source Kode Berikut:

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim angka1 As Double
        Dim angka2 As Double
        Dim angka3 As Double
        Dim rata As Double
        Const jum_skor As Integer = 3

            angka1 = CDbl(TextBox1.Text)
            angka2 = CDbl(TextBox2.Text)
            angka3 = CDbl(TextBox3.Text)
            rata = (angka1 + angka2 + angka3) / jum_skor
        TextBox4.Text = rata.ToString
        If TextBox4.Text >= 85 Then
            TextBox5.Text = ("A")
                TextBox1.Clear()
                TextBox2.Clear()
                TextBox3.Clear()
        ElseIf TextBox4.Text < 85 And TextBox4.Text >= 70 Then
            TextBox5.Text = ("B")
            TextBox1.Clear()
            TextBox2.Clear()
            TextBox3.Clear()
                Else
            If TextBox4.Text < 70 And TextBox4.Text >= 60 Then
                TextBox5.Text = ("C")
                TextBox1.Clear()
                TextBox2.Clear()
                TextBox3.Clear()
            ElseIf TextBox4.Text < 60 And TextBox4.Text >= 50 Then
                TextBox5.Text = ("D")
                TextBox1.Clear()
                TextBox2.Clear()
                TextBox3.Clear()
            ElseIf TextBox4.Text < 50 And TextBox4.Text >= 0 Then
                TextBox5.Text = ("E")
                TextBox1.Clear()
                TextBox2.Clear()
                TextBox3.Clear()
            End If
                End If
                  
    End Sub

Dalam aplikasi ini penggunaan IF Else terdapat pada Nilai Rata-rata dan Huruf . contohnya jika nilai rata-rata 80 maka nilai huruf nya B dan seterusnya.
Nah itulah sedikit pembelajaran tentang penggunaan If dan Else.

( Baca Juga : Belajar Bilangan Aritmatika VB.NET  )


3 Comments

Wah pembelajaran bgt, kebetulan ane lagi belajar ini

perlu belajar lagi ini pakai vbnet, soalnya biasa pakai xampp

Visual Basic.. sedang saya pelajarin gan :D

Tinggalkan Komentar anda...
Karena itu sangat membantu saya dalam membangun sebuah blog.

Perhatian, dilarang membuat Link aktif di dalam komentar.
EmoticonEmoticon