Contoh Program VB (VisualBasic)

Disini saya menggunakan Microsoft Visual Studio 2010.
Salah satu contoh hasil program di VB


Tujuan program ini, agar ketika checkbox di klik harga akan keluar di textbox total.
codenya seperti ini

Public Class Form1
    Const BB As Integer = 330
    Const SS As Integer = 750
    Const SX As Integer = 450

    Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged


        If CheckBox1.Checked Then
            TextBox1.Text += BB
        Else
            TextBox1.Text -= BB

        End If
    End Sub

    Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
        If CheckBox2.Checked Then
            TextBox1.Text += SS
        Else
            TextBox1.Text -= SS

        End If
    End Sub

    Private Sub CheckBox3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox3.CheckedChanged
        If CheckBox3.Checked Then
            TextBox1.Text += SX
        Else
            TextBox1.Text -= SX

        End If
    End Sub
End Class

Comments

Post a Comment

Popular posts from this blog

One of my best friend

Image
Cerita dari mana ya... Gw mau kenalin best friend gw namanya Raissa Camilla Maringka Raissa Maringka sudah berhasil melepaskan poni Raissa Maringka proses melepaskan poni Kece bgt gak tuh? hahahaha, peace ya bre. Pertama kali ketemu dia ya waktu sekolah di SMK. Awal-awal sih belum, pas udah pertengahan lah ya. Lagi istirahat di lab gitu, dia nyeletuk gw mirip momo geisha -___- orang kesekian, ampe bosen wkwkwk. Tapi dari situ yauda awal pertemanan gw sama itu anak hehehe. Dia sering bawa minum dan bekel selalu. Isinya makanan vegetarian semua! tapi keliatannya enak-enak bet. Tapi pas dimakan juga enak hahaha. Rumahnya deket dari sekolah. Dia pulang sering jalan kaki. Tau ga sih sa, cara jalan lu itu masih tersimpan baik diingatan gw.."cara jalan" hahaha. Masa-masa duduk bareng kelas 10 & 11 Seiring berjalannya waktu, kelas 12 gw ga duduk bareng sama dia. Tapi bukan karena ga duduk sebareng, kita lost gitu. Enggaaa.... Kita sering cerita2, masi
Read more

Alvin and The Chipmunks : Chip-Wrecked Pic

Image
Eleanor & Theodore aaa <3 <3 Simon & Theodore <3 Jeanette, Theodore & Eleanor ALVIN :D Jeanette & Simone :D Dave on plane Alvin & Simon caught out of the room Brittany, Simon & Alvin ATC 3# Eleanor, Brittany, Jeanette The Chipettes The Chipmunks & The Chipettes sing when Zoe dont know about them Alvinnnn Alvin & The Chipettes :D Alvin -_- Simoon This Simone, he did'nt called Simon Dave was sleep and Alvin get flying kites Simon light a fire through his glasses, He's shy with Jeanette :D Alvin&Brittany when they're want to make a tree house After getting food that has been contested, Jeanette to be fair When simon woke up, he considers himself a great. & Theodore don't know it, kalem banget kwkk After arrived on Island The Chipettes Alvin Chipmunks :d When Simon talks to Dave to allowed them playing anything when
Read more

Bagaimana perkembangan Ekonomi Digital di Indonesia?

Image
Pemerintah Indonesia menargetkan Indonesia akan menjadi pusat ekonomi digital di Asia Tenggara pada tahun 2020. Lalu, bagaimana mengupayakannya dengan melihat perkembangan ekonomi digital di Indonesia? Sebelum menjawab hal tersebut, kita harus mengetahui dahulu seperti apa ekonomi digital ini. Jika dikonsepkan, ekonomi digital ialah digitalisasi suatu informasi dan infrastruktur Teknologi Informasi dan Komputer (TIK). Konsep ini menyatakan bahwa dampak yang diberikan bukan hanya kepada aspek teknologi tetapi mengarah ke ekonomi juga. Dilansir oleh Statistik Indonesia , Konsultan McKinsey & Company menilai bahwa Indonesia masih sangat awam terhadap revolusi digital dikarenakan keterbatasan akses masyarakat ke sektor digital melalui penetrasi internet. Dan juga, partner McKinsey & Company Khoon Tee Tan menerangkan untuk mengukur suatu revolusi digital di Indonesia harus melihat gambaran secara umum, melihat bisnis yang berkembang dan konsumen yang berada di sektor terse
Read more