Tutorial membuat Login, Menentukan Kelulusan, & Menentukan Predikat di Visual Basic

| Rabu, 17 Oktober 2012 | |


Tutorial membuat Login, Menentukan Kelulusan, & Menentukan Predikat di Visual Basic




1.      Form tampilan awal.


  
Tampilan awal saat program di jalankan yang menampilkan gambar seperti diatas
Isi dari menu file: exit, form: login, help: about.

Screenshot MDI & code :



 


2.      Form setelah di pilih login.



Untuk membuat tulisan pasword menjadi ” * ” caranya ganti PasswordChar dengan “*” di Properties textbox Pasword.

Screenshot code form login:

 
  
3.      Form setelah login dan diproses.



Tampilan saat sudah login, maka akan muncul tampilan seperti diatas yang akan menampilkan menu - menu.
Isi dari menu File: exit,View: nilai IPK, kelulusan, logout.

Screenshot MDI & Code:



  




4.      Form IPK.

           


  
·           Tampilan form sesudah di input dan di proses
·      Tampilan form sebelum di input angka

Screenshot Code:

  
Code:

Private Sub Command1_Click()
IPKsmester1 = Val(Text3.Text)
IPKsmester2 = Val(Text10.Text)
IPKsmester3 = Val(Text9.Text)
IPKsmester4 = Val(Text8.Text)
IPKsmester5 = Val(Text7.Text)
IPKsmester6 = Val(Text6.Text)
IPKsmester7 = Val(Text5.Text)
IPKsmester8 = Val(Text4.Text)
Text1.Text = (IPKsmester1 + IPKsmester2 + IPKsmester3 + IPKsmester4 + IPKsmester5 + IPKsmester6 + IPKsmester7 + IPKsmester8) / 8

IPK = Val(Text1.Text)
If IPK >= 3.51 Then
Text2.Text = "CAMLAUDE"

ElseIf 3 <= IPK And IPK <= 3.5 Then
Text2.Text = "SANGAT MEMUASKAN"

ElseIf 2.5 <= IPK And IPK <= 2.9 Then
Text2.Text = "MEMUASKAN"

ElseIf 2.4 >= IPK Then
Text2.Text = "MENGULANG"
End If
End Sub
------------------------------------------------------------------------------------------------------------
Private Sub Command2_Click()
End
End Sub


5.      Form kelulusan.



Tampilan setelah memilih menu View > kelulusan.

Screenshot form setelah di proses & Code:




Jika kita memilih IPK kita dapat langsung masuk ke form IPK.

6.      Form about.



Kalau form yang ini kita cukup gunakan LABEL lalu di dalam PROPERTIES kita isi CAPTION dengan “www.POLTEKTEDC.ac.id. Lalu untuk warnanya pilih ForeCollor dan bentuk plus ukurannya kita pilih di FONT.

Screenshot PROPERTIES LABEL:

0 komentar:

Posting Komentar