Program Pilkada pada visual Basic

Sebelum masuk pada form menu,, kita logiin dulu ok seperti pada form dibawah ini :   nah,, jika login berhasil kita akan masuk ke form Menu Utama yang didalamnya terdapat form-form yang telah di add pada project ini,, mari kita lihat tampilan form menu utamanya,,, Kemudian jalankan salah satu form yang tersedia pada menu bar,, untuk...

Read More … Program Pilkada pada visual Basic

Program Belanja pada Visual Basic

Listing program : Dim disc As Double Dim bel1, bel2, bel3, bel4, bel5, t_bayar, t_bel As Currency Private Sub Command1_Click() bel1 = Val(belanja1.Text) bel2 = Val(belanja2.Text) bel3 = Val(belanja3.Text) bel4 = Val(belanja4.Text) bel5 = Val(belanja5.Text) t_bel = bel1 + bel2 + bel3 + bel4 + bel5 total_bel = t_bel If (jam >= 8) And (jam <= 15) Then        ...

Read More … Program Belanja pada Visual Basic

Membuat Program Penggajian Karyawan pada visual Basic

Listing Program : Dim total, lembur, gaji, pajak, tunjangan As Double Private Sub Command1_Click() Text7.Text = 0.025 * Text3.Text gaji = Text3.Text tunjangan = Text5.Text lembur = Text6.Text pajak = Text7.Text total = gaji + tunjangan + lembur - pajak Text9.Text = total End Sub Private Sub Command3_Click() End End Sub Private Sub Option1_Click() Text3.Text...

Read More … Membuat Program Penggajian Karyawan pada visual Basic

Program Penggunaan Option Explisit pada visual basic

Option Explisit digunakan untuk memerintahkan supaya seluruh variabel didefinisikan.  Berikut kode program disamping : Option Explicit Dim test1, test2, test3 As Integer Private Sub Command1_Click() Dim test1 As String test1 = "Nusantara" Label1.Caption = test1 Label2.Caption = test2 Label3.Caption = test3 End Sub Private Sub Command2_Click() test2...

Read More … Program Penggunaan Option Explisit pada visual basic

Membuat Program menghitung Luas Lingkaran, Mencari jumlah dan Rata-rata suatu nilai

Private Sub Command1_Click() Dim luas, keliling As Single Dim r As Single Const phi As Single = 3.14 r = Text1.Text luas = phi * r * r keliling = 2 * phi * r Text2.Text = luas Text3.Text = keliling End Sub Private Sub Command2_Click() Dim nilai1 As Single Dim nilai2 As Single Dim nilai3 As Single Dim jml As Single Dim rata2 As Single nilai1 = Text4.Text nilai2...

Read More … Membuat Program menghitung Luas Lingkaran, Mencari jumlah dan Rata-rata suatu nilai

Membuat Program Kalkulator Visual Basic

Kode Program : Dim hasil As Single Dim value1 As Single, value2 As Single Private Sub Option1_Click() value1 = Text1.Text value2 = Text2.Text hasil = value1 + value2 Text3.Text = hasil End Sub Private Sub Option10_Click() value1 = Text1.Text value2 = Text2.Text hasil = value1 = value2 Text3.Text = Format(hasil, "TRUE/FALSE") End Sub Private Sub Option11_Click() value1...

Read More … Membuat Program Kalkulator Visual Basic

Tipe Data, Variable dan Porator dalam Visual Basic

A. Tipe data Data memiliki tipe yang berbeda‐beda dan biasanya data dikelompokkan pada kelompok yang sejenis agar tidak terjadi operasi matematika diantara data yang berbeda jenis tersebut, contohnya kita tidak bisa menjumlahkan nilai suatu jarak (Km) dengan Massa (Kg) karena keduanya memiliki tipe data yang berbeda. Begitu juga dalam suatu program, setiap...

Read More … Tipe Data, Variable dan Porator dalam Visual Basic