APLIKASI MENGHITUNG NILAI DENGAN PROGRAM VISUAL BASIC 6

Ini tugas waktu final kuliah disuruh buat yang beginiyan ...
semoga bermanfaat aja bagi yang membutuhkan ..


MEMBUAT APLIKASI MENGHITUNG NILAI DENGAN PROGRAM VISUAL BASIC 6

1.     Membuat sebuah aplikasi baru yang mempunyai fungsi menghitung hasil – hasil nilai mahasiwa.
2.     Buatlah properties masing-masing komponen seperti yang sudah tertera di bawah ini :

Objek
Propertis
Value
Form1
Caption
Nilai akhir Mahasiswa
Label1
Name
Nilai mahasiswa
Label2
Name
Nim
Label3
Name
Nilai tugas
Label4
Name
Nilai Quiz
Label5
Name
Nilai uas
Label6
Name
Nilai
Textbox1
Text
nama
<kosong>
Txtnilaimahasiswa
Textbox2
Text
Nama
<kosong>
Txtnim
Textbox3
Text
Nama
<kosong>
Txtnilaitugas
Textbox4
Text
Nama
<kosong>
Txtnilaiquiz
Textbox5
Text
Name
<kosong>
Txtnilaiuas
Textbox6
Text
Name
<kosong>
Txtnilai
Textbox7
Text
Name
<kosong>
Txtnilaihuruf
Command1
Caption
Proses
Command2
Caption
Tampilan
Command3
Caption
Get out


Sesuaikan dengan layout di bawah ini yaaaaaa ::::
Untuk tampilannya silahkan buat sendiri

Masukkan code pada  command1
TXTNILAIAKHIR.Text = Val(txtnilaitugas.Text) * 0.1 + Val(txtnilaiquiz.Text) * 0.2 + Val(txtnilaiuts.Text) * 0.3 + Val(txtnilaiuas.Text) * 0.4 + Val(TXTNILAIAKHIR.Text)
txtnilai.Text = TXTNILAIAKHIR.Text
End Sub


Masukkan code pada  command2
MsgBox "  Nama Anda  " & txtnamamahasiswa.Text & "  Nim  " & txtnim.Text & "  Dengan Nilai  " & TXTNILAIAKHIR.Text & "  Nilai  " & txtnilai.Text & ""
End Sub
Masukkan code pada  command3
End
End Sub
Masukkan code pada txtnilaiakhir
NilaiAkhir = (10 * tugas) + (20 * Quiz) + (30 * UTS) + (40 * UAS)
End Sub
Masukkan code pada txtnilai
If TXTNILAIAKHIR.Text >= 85 Then
    txtnilai.Text = "A"
ElseIf TXTNILAIAKHIR.Text >= 70 Then
    txtnilai.Text = "B"
ElseIf TXTNILAIAKHIR.Text >= 60 Then
    txtnilai.Text = "C"
ElseIf TXTNILAIAKHIR.Text >= 50 Then
    txtnilai.Text = "D"
ElseIf TXTNILAIAKHIR.Text < 50 Then
    txtnilai.Text = "E"
End If
End Sub
Hasil dari program di atas seperti gambar di bawah ini..
Untuk hasil dari tampilannya seperti pada gambar di bawah ini :


Oke selasai dah……..
Tidak terlalu susah kan……………
Selamat mencoba ……………………..

0 komentar:

Posting Komentar

 
Copyright © NUANSA ANAK DESA