Saya akan Berbagi bagaimana cara
membuat program sederhana di Visual Bassic. Disini saya akan membuat program login
dan program yang apabila kita memasukan nama dan kelas maka nanri akan keluar
sebuah kalimat yang di akan menggabungkan antara nama dan kelas,dari pada
tambah bingung program apa yang mau di buat maka langsung saja kita masuk ke
bagaimana cara pembuatan program tersebut.
- Buka program Visual basic kita,lalu ketika sudah muncul form 1 kita tambahkan Form2. Pada Form1 kita buat susunan form login yang isinya disana adalah:
- Label1 : digunakan membuat tulisan LOGIN
- Label2 : digunakan membuat tulisan Username
- Label3 : digunakan membuat tulisan Password
- Textbox1 :textbox1 disini nantinya akan digunakan untuk memasukan Username kita
- Textbox2 : textbox2 digunakan untuk membuat kita memasukan Password kita
- Command1 : Command1 disini berfungsi untuk login masuk kedalam form2
- Command2 : Command2 disini berfungsi untuk keluar dari program
Contoh desain form 1
Gambar1.1
Selanjutnya kita akan mengganti
caption dalam Form1 yang kia buat tadi,double klik pada Form1 yang kita buat
tadi sehingga muncul seperti gambar 1.2
Gambar 1.2
Sudah muncul tempat untuk mengkoding program selanjutnya kita ketikan
Label1.Caption = "LOGIN"
Label1.FontSize = 16
Label1.FontBold = True
Label2.Caption = "Username"
Label3.Caption = "Password"
Command1.Caption = "Masuk"
Command2.Caption = "Batal"
Disini saya akan sedikin membahas apa
yang dimaksud Caption, FontSize , FontBold:
Caption
: digunakan untuk mengganti tampilan nama dari suatu komponen yang ada tipe
data yang digunakan disini adalah string
FontSize:
digunakan untuk mengganti ukuran huruf dari suatu komponen,tipe data yang
digunakan adalah integer
FontBold
: digunakan untuk merubah style dari suatu komponen menjadi bold,tipe data yang digunakan untuk mendeskripsikan
adalah Boolean
- Setelah selesai dalam desain form kita masuk ke kodingan Command 1 dan Command 2,double klik pada Command1 sehingga muncul seperti pada gambar 1.3
Gambar 1.3
Ketikan koding berikut setelah
Private Sub Command1_Click()
If Text1.Text = "Rifra" Or
Text2.Text = "test" Then
MsgBox "Selamat Datang " +
Text1.Text, 0, "Login"
Form1.Hide
Form2.Show
Else
MsgBox "Username atau password
salah", 0, "Error"
Text1.Text = " "
Text2.Text = " "
Disini kita menggunakan kondisi untuk
masuk ke dalam Form 2,dalam kondisi ini kita mendeskripsikan jika yang di tulis
di text1 = “Rifra atau Text2 = “test” maka akan muncul kotak pesan yang berisi
selamat datang +yang di tulis di text1. 0 yang kita deskripsikan disini adalah
tipe dari kotak pesan yang akan tampil
dan “Login” adalah Nama dari kotak pesan yang di tampilkan,dan apabila
Text1 dan Text2 sama seperti apa yang kita ketikan saat program di jalankan
akan masuk ke form2,karena dalam koding tadi sudah di tuliskan Form1.Hide dan
Form2.Show itu artinya juga benar maka
Form1 disembunyikan da Form2 ditampilkan.Selanjutnya apabila kita salah
mengisikan Username atau Password akan keluar kotak pesan yang isinya “Username
atau password salah” dan judul dari kotak pesan itu adalah Eror.
Text1.Text = " "
Text2.Text = " "
Maksud dari kodingan program di atas
adalah apabila salah nanti maka pada kotak textbox1 dan textbox2 akan kembali
kosong.Agar Password menjadi * pada textbox2 di klik lalu liat di properties ada passwordchar isi password char menjadi *
Selanjutnya double klik pada command2
sehingga muncul seperti pada gambar berikut:
Gambar 1.4
Lalu ketikan saja End pada baris yang
sudah disediakan.
- Pada Form2 kita buat susunan yang hamper sama seperti form login yang isinya disana adalah:
- Label1 : digunakan membuat tulisan Nama
- Label2 : digunakan membuat tulisan Kelas
- Label3 : label 3 disini dikosongkan
- Textbox1 :textbox1 disini nantinya akan digunakan untuk memasukan nama kita
- Textbox2 : textbox2 digunakan untuk membuat kita memasukan Kelas
- Command1 : Command1 disini berfungsi untuk Print apa yang kita tuliskan di Textbox 1 dan 2
- Command2 : Command2 disini berfungsi untuk keluar dari program
- Command3 : Command3 disini berfungsi untuk membersihkan textbox1 dan textbox2
Sehingga tampilan akan menjadi
seperti pada gambar berikut:
Gambar 1.6
Setelah selesai pada desain kita
double klik pada Form2 lalu kita ketikan seperti pada gambar 1.7
Gamar 1.7
- Selanjutnya kita akan membuat kodingan program pada form 2. Double klik pada command1 sehingga muncul sperti pada gambar 1.8
Gaambar 1.8
Lalu
Ketikan kode berikut:
Label3.Caption = "Nama Saya
Adalah " + Text1.Text + " dan Saya Kelas " + Text2.Text
Artinya kita akan membuat Caption
Label 3 Menjadi “ Nama Saya Adalah +yang kita tulis di textbox1 +dan Saya Kelas
+yang kita tulis di textbox2”
Lalu pada command2 kita double klik
lalu kita gantikan isikan dengan END,agar apabila di klik akan keluar dari
program dan pada command3 kita isikan
Text1.Text = " "
Text2.Text = " "
Label3.Caption=” “
Yang apabila command 3 di klik maka
pada textbox 1 dan textbox2 akan kosong kembali tanpa harus menghapus.
Sehinggah hasil kodingan program akm
menjadi sperti ini.
Gambar 1.9
- Setelah selesai klik file Save Project as lalu kita save Projecet tersebut
- Lalu klik tombol run di menu
.jpg)
