

Membuat tab-
Klik Kanan Pada Mouse, Klik Componets lalu pilih Microsoft Tabbed Dialog
Control 6.0
-Mengisi Tab 0-
Ubah ( name
) Tab 0 Menjadi Sistem Informasi, lalu ubah...
Setelah itu masukan gambar yang kita inginkan dengan klik Image pada
General...
-Mengisi
Tab1-
Ubah ( name ) Tab 1 Menjadi Data
Mahasiswa,
lalu buat dulu database dan tabel lewat VDM
sebagai berikut :
Pada menu Visual Basic pilih Add
Ins > Visual Data Manager maka akan muncul tampilan
disamping ini:

Setelah selesai menyimpan database maka tampilan akan kembali ke
Visdata dan akan muncul kotak dialog Database Window. selanjutnya
klik kanan pada Properties > New Table. Seperti tampilan disamping ini:
Setelah
melaksanakan perintah di atas maka akan muncul Table Structure untuk
mengisi data Field.
Sebagai
contoh membuat tabel mahasiswa, ketik pada Table Name : TblMhs. Kemudian
untuk mengisi Field, klik Add Field dan masukkan field-field pada gambar
di atas :
Tampilan
untuk memasukkan Field-field seperti dibawah ini :
Selesai
membuatkan table di atas berikutnya gunakan table tersebut pada tampilan
inputan yang ada pada form Visual Basic dengan cara membuat terlebih dahulu
tampilan form. Jadi sekarang masuk pada tampilan Form Visual Basic dan
simpanlah beberapa komponen seperti tampilan pada form dibawah ini :
-Coding (Source Code) :
Code Program Combo1, 2, 3
Private Sub Form_Load()
Combo1.AddItem "Belum
Kawin"
Combo1.AddItem
"Kawin"
Combo1.AddItem
"Janda"
Combo1.AddItem "Duda"
Combo2.AddItem
"Laki-Laki"
Combo2.AddItem
"Perempuan"
Combo3.AddItem "Tidak
Sekolah"
Combo3.AddItem
"SD/Sederajat"
Combo3.AddItem
"SMP/Sederajat"
Combo3.AddItem
"SMA/Sederajat"
Combo3.AddItem "D-II"
Combo3.AddItem
"D-III"
Combo3.AddItem
"S1/D-IV"
Combo3.AddItem "S2"
Combo3.AddItem "S3"
Code Program Button Simpan :
Private Sub Command2_Click()
Data1.Recordset.Update
End Sub
Code Program Button Tambah :
Private Sub Command3_Click()
Data1.Recordset.AddNew
Text1.SetFocus
End Sub
Code Program Form Active :
Private Sub Form_Activate()
Data1.Recordset.AddNew
Text1.SetFocus
End Sub
-Mengisi
Tab 2-
Ubah ( name ) Tab 2 MenjadiKeluar,
lalu
Coding (Source Code) :
Code Program Button Keluar:
Private Sub Command1_Click()
End
End Sub
-Untuk Mewarnai Tulisan:
Dari Properties klik Fore Color
Lalu Pilih Warna sesuka hati dari palette atau System
-Untuk Membesar kan huruf:
Dari Properties klik Font lalu
keluar tampilan berikut
Pilih
font, font style, & size sesukamu...
Sampai Sini Aja Infonya Semoga Bermanfaat....
EmoticonEmoticon