Belajar membuat aplikasi pengolahan nilai di vb.6

Asalammualaikum
...hai sahabat blogger kaliini saya akan mengajarkan kalian cara membuat aplikasi pengolahan nilai dengan vb.6

....coba pahami ya pasti kalian mengerti

Pertama buat form menggunakan

4 tex box
1 command button
3 label

Kegunaaanya
..3 texbox buat di isi nilai kaya
Nilai uas
Nilai ulangan
Nilai UN
...1 TEXBOX BUAT HASIL DARI PENJUMLAHAN NANATI
...1COMMAND BUTTON BUAT MEMBUAT tombol hasil
...DAN 3 LABEL UNTUK MEMBUAT NAMA DI SETIAP TEXBOX

...LANGSUNG SAJA YA... INGAT YG KITA KODING HANYA TOMBOL HITUNG

KITA KLIK 2KALI TOMBOL HITUNG(COMMAND BUTTON)
...LALU KITA BUAT SOURCE CODENYA

PERTAMA KITA.. (DIM) DULU SEMUA NYA BIAR GAMPANG

DIM A AS DOUBLE
DIM B AS DOUBLE
DIM C AS DOUBLE

CATATAN JIKA ANDA MENGGUNAKAN  TEXBOX UNTUK NAMA SAJA MAKAN PENULISAN NYA... "DIM A AS STRING"

YG BERARTI DOUBLE UNTUK ANGKA DAN STRING UNTUK HURUF

....YG KEDUA DI BAWAH NYA KITA AJARKAN MEREKA CONTOHNYA

A=VAL(TEXT1.TEXT)
B=VAL(TEXT2.TEXT)
C=val(text3.text)

Nah klo udah itu artinya kita mengajarkan apa genunaa val(value) yaitu untuk menjumlahkan misalkan 1+1=2 ....tetapi jika kita tidak menggunakan value maka hasilnya akan 1+1=11

Yg selanjutnya tahap akhir yaitu penjumlahan
....karna kita sudah di dim dan di value.. Memasukan nya sangat mudah sekali
...tapi pertama ganti nama text box yg ke 4 menjadi hitung... Lalu coding lagi di command button

Kaya gini
Hasil = 0.5*a+0.2*b+0.3*c

...nanti klo di jumlahkan pasti bisa
Pahami dlu rumus nya... Rumus pengolahan nilai itu harus 1 jadi... Klo misalkan membuat lebih banyak penilain
....maka di ubah jumlah desimalnya
Misalkan nilai yg akan di nilai 1 un 2 uas 3 uas bn 4 keterampilan

Makan desimal nya di bagi menjadi 4
0.2 0.3 0.2 0.3

Nah seperti itu kita susun source codenya

Dim a as double
Dim b as double
Dim c as double

A=val(text1.text)
B=val(text2.text)
C=val(text3.text)

Hitung=0.5*a+0.2*b+0.3*c

Sekian semoga artikel ini bermanfaat wasalammualaikum wr.wb