Cara Menggunakan SSTab untuk Membuat Aplikasi di VB6 - Pada pertemuan pagi kali ini diakhir pekan minggu ke-3 dibulan oktober tip dan trik akan membuat sebuah tips bagaimana Cara Menggunakan SSTab untuk membuat Aplikasi di VB6. Sebelum ke tips mari kita simak sama-sama mencari tau apa fungsi dari SSTab tersebut.
SSTab berfungsi untuk membuat tab-tab pada program aplikasi dimana masing-masing tab memiliki tampilan sendiri sesuai dengan kebutuhan user.
Untuk membahas SSTab ke dalam Toolbox aktifkan kotak Microsoft Tabbed Dialog Controls 6.0 pada jendela komponen. Berikut adalah beberapa properti penting yang wajib diketahui pada SSTab :
Properti
|
Kegunaan
|
| TabHeight | Untuk menentukan tinggi masing-masing Tab |
| Tab | Menentukan nomor Tab yang aktif |
| TabMaxWidth | Menentukan lebar Maksimum masing-masing Tab |
| Tabs | Menentukan banyaknya Tab |
| TabPerRows | Menentukan banyaknya Tab yang muncul pada masing-masing baris |
Setelah kita mengetahui cara bagaimana menambahkan komponen SSTab di toolbox dan fungsinya, sekarang mari kita simak bagaimana cara membuat SSTab untuk sebuah aplikasi.
Untuk berlatih menggunakan SSTab kita akan menambahkan beberapa komponen pelengkap seperti MonthView, DTPicker, ProgressBar dan Slider . Ikuti langkah-langkah berikut dibawah ini:
1 Buatlah Project Standar baru tambahkan SSTab ke ToolBox dengan cara yang sudah disebutkan diatas tambahkan juga MonthView, DTPicker, ProgressBar dan Slider di ToolBox
2 Tanamkan SSTab kedalam Form
3 Aturlah Properti untuk SSTab sebagai berikut :
Objek Propereti Nilai
SSTab1 Tabs 2
TabsPerRows 2
Catatan :
-Untuk menambahkan komponen MonthView, DTPicker, ProgressBar dan Slider cari Microsoft Windows Common Controls-2 6.0 dan Microsoft Windows Common Controls 6.0
-Untuk menambahkan komponenen SSTab cari Microsoft Tabbed Dialog Controls 6.0
4. Klik kanan SSTab, lalu klik Properties pada PopUp yang muncul klik tab General pada bagian atas property pages
5. Klik tombol < atau tombol > pada bagian Current Tab sehingga Current Tab yang terpilih adalah tab ke 0
6. Ketikan kata "MonthView dan DTPicker" pada kotak isian TabCaption
7. Klik tombol > pada bagian Current Tab sehingga Current Tab yang terpilih adalah tab ke 1
8. Ketikan kata "ProgressBar dan Slider" pada kotak isian TabCaption
9. Klik tombol OK
10. Sekarang klik tab ke 1 yang bertuliskan "MonthView dan DTPicker" kemudian tanamkan objek MonthView dan DTPicker kedalam form
11. Atur properti untuk MonthView dan DTPicker sebagai berikut :
Objek Propereti Nilai
MonthView1 Name mtv_bulan
DTPicker1 Name dtc_tanggal
12. Sekarang klik Tab ke 2 yang bertuliskan "ProgressBar dan Slider" kemudian tanamkan ProgressBar dan Slider didalamnya
13. Atur properti untuk ProgressBar dan Slider sebagai berikut :
Objek Propereti Nilai
ProgressBar1 Name prg_satu
Max 100
Min 0
Slider1 Name sld_satu
Max 100
Min 0
Sehingga hasil desain tab masing-masing di formnya seperti gambar dibawah ini:
 |
| Hasil Desain Form |
14. Sekarang buka jendela kode, lalu ketik kode dibawah ini :
Private Sub dtc_tanggal_Change()
mtv_bulan.Day = dtc_tanggal.Day
mtv_bulan.Month = dtc_tanggal.Month
mtv_bulan.Year = dtc_tanggal.Year
End Sub
Private Sub mtv_bulan_DateClick(ByVal DateClicked As Date)
MsgBox "Anda mnemilih tanggal "+CStr(DateClicked), vbOkOnly + vbInformation, "Perhatian"
dtc_tanggal.Day = mtv_bulan.Day
dtc_tanggal.Month = mtv_bulan.Month
dtc_tanggal.Year = mtv_bulan.Year
End Sub
Private Sub sld_satu_Change()
prg_satu.Value = sld_satu.Value
End Sub
15. Sekarang Anda jalankan program dengan F5 kemudian klik masing-masing tab apa yang terjadi?
16. Jika berjalan dengan benar silahkan simpan project Anda.
Demikian tips kali tentang Cara Menggunakan SSTab untuk membuat Aplikasi di VB6.Semoga bermanfaat selamat mencoba semoga berhasil.
No comments:
Post a Comment