Untitled Document
Untitled Document
Pekanbaru » Posting » Artikel Umum
Membuat Program Jurusan pada Visual Basic
Tutor by: RADINAL SIMAMORA dibaca:5079 kali, Posted on 2013-04-19 06:15:11

Selamat sore sobat, apa kabar ne sobat...? pastinya Puji Tuhan Baek ya... amin :) ok... lanjut sobat, setelah kemaren saya sudah menjelaskan apa itu visual basic dan sidah memberikan beberapa contoh programnya, termasuk saya sudah share bagaimana cara membuat "Program Huruf", sekarang saya akan menjelaskan bagaimana membuat "Program Jurusan".

 

Perhatikan Step by Step berikut :

1. Buka Aplikasi Visual Basic.

VB Portable

2. klik New - Standart Exe - Open

Open Project

 

 3. Buat Form Sepeti gambar dibawah ini :

 

form jurusan

Catatan : Gunakan beberapa Icon dibawah ini :

command button

 

 

label

 

text box

 

 

 

 

 

 4. Copas Script Berikut : 

Private Sub Command1_Click()

Text1 = ""

Text2 = ""

Text3 = ""

Text1.SetFocus

End Sub

Private Sub Command2_Click()

End

End Sub

Private Sub Form_Load()

Text3.Enabled = False

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

KeyAscii = Asc(UCase(Chr(KeyAscii)))

If KeyAscii = 13 Then Text2.SetFocus

End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)

KeyAscii = Asc(UCase(Chr(KeyAscii)))

If KeyAscii = 13 Then

If Text2 <> "MI" And Text2 <> "KA" And Text2 <> "TK" Then

MsgBox "Jurusan tidak terdaftar"

Text2 = ""

Text2.SetFocus

Exit Sub

End If

If Text2 = "MI" Then Text3 = "MANAJEMEN INFORMATIKA"

If Text2 = "KA" Then Text3 = "KOMPUTER AKUNTANSI"

If Text2 = "TK" Then Text3 = "TEKNIK KOMPUTER"

Command1.SetFocus

End If

End Sub

5. Tekan F5 atau Play untuk melihat Hasilnya :

 

Hasil

 

 Catatan : untuk Property [name : tidak ada diubah]

               untuk Property [Caption : disesuaikan] > Perhatikan Rumus.

 

Nah... Sekian postingan kali ini sobat Mengenai Program Jurusan, jika ada pertanyaan atau komentar atau saran, langsung saja dikotak komentar yang sudah disediakan.

semoga tutorial diatas, bermanfaat bagi kita semua *amin.

 

Silahkan membaca Tutorial selanjutnya mengenai "Program Kalkulasi"

Salam Sukses....!



Loading...
 Komentar Lainnya (1)

Nama : Email : Blog/Web :

:D :P ;;> ;) :) :O :: =s :g :-? :@ :-)) :-bd I-) B-) ):b :-/ :o:
:x =D> :-)/\:-) =)) @_@ o|^_^|o

Untitled Document