Pengikut

Diberdayakan oleh Blogger.
Selasa, 18 Oktober 2011

9.PROGRAM SEDERHANA DALAM VB.NET

9. PROGRAM SEDERHANA DALAM VB.NET
CONTOH PROGRAM SEDERHANA DALAM BAHASA VISUAL BASIC .NET YANG DIPAKAI UNTUK MENGHITUNG JUMLAH PEMBAYARAN DARI M_ITEM BUAH BARANG DENGAN HARGA M_PRICE PER ITEM DITAMBAH 5% PAJAK PENJUALAN: 
  DIM M_ITEM, M_PRICE, TAX, TOTAL AS DOUBLE
  M_ITEM = DOUBLE.PARSE(TEXTBOX1.TEXT)
  M_PRICE = DOUBLE.PARSE(TEXTBOX2.TEXT)
  TAX = 0.05
  TOTAL = M_ITEM * M_PRICE * (1 + TAX)
  LABEL5.TEXT = TOTAL.TOSTRING()
  MESSAGEBOX.SHOW("WELL DONE.")
BERIKUT INI ADALAH CONTOH LAIN DARI PROGRAM VISUAL BASIC YANG MENGGUNAKAN OBJEK CHECKBOX DAN COMBOBOX UNTUK MENGHITUNG JUMLAH KREDIT MATA KULIAH YANG DIAMBIL OLEH SEORANG MAHASISWA (MASING-MASING MATA KULIAH = 3 KREDIT):
DIM TOTAL AS INTEGER
TOTAL = 0 ' AWAL DARI JUMLAH KREDIT TOTAL
IF (CHECKBOX1.CHECKED = TRUE) THEN 'BOLEH MEMILIH SEMUA CHECKBOX
            TOTAL += 3
        END IF
        IF (CHECKBOX2.CHECKED = TRUE) THEN
            TOTAL = TOTAL + 3
        END IF
        IF (CHECKBOX3.CHECKED = TRUE) THEN
            TOTAL = TOTAL + 3
        END IF
IF (COMBOBOX1.SELECTEDINDEX = 0) THEN 'HANYA BISA MEMILIH SATU
            TOTAL = TOTAL + 3
        ELSEIF (COMBOBOX1.SELECTEDINDEX = 1) THEN
            TOTAL = TOTAL + 3
        ELSEIF (COMBOBOX1.SELECTEDINDEX = 2) THEN
            TOTAL = TOTAL + 3
        END IF
LABEL3.TEXT = CSTR(TOTAL) ' HASIL KREDIT TOTAL YANG DIAMBIL

0 komentar: