Belajar Visual Basic: Pembuatan Form Dengan Activeskin.

Aplikasi Visual Basic 6. Form yang kita buat biasanya selalu setandard nah… Bagaimana jika form aplikasi yang kita buat bisa tampil lain dari biasanya. Dalam hal ini kita bisa membuat tampilan form dengan bantuan komponen Activeskin. Activeskin yang saya gunakan disini adalah Activeskin versi 4.3.

Pada saat pertama kita memulai Project pada VB6 biasanya kita langsung ditawari form yang standard dari VB6.

Form Standard VB6.

Lalu kemudian kita tambahkan komponen pada Toolbox, dengan cara klik kanan Toolbox.

Toolbox untuk menambah komponen

Maka akan keluar daftar komponen yang sudah ada, lalu kita klik ActiveSkin 4.3 Library makan akan di centang ActiveSkin yang akan kita tambahkan pada Project kita.

Lalu tekan OK.

Daftar komponen control.

Maka akan bertambah komponen ActiveSkin pada Toolbox kita.

Pada Toolbox akan bertambah 2 komponen yaitu Skin :->

dan SkinLabel : ->

Lalu tambahkan komponen ActiveSkin pada Form kita dengan cara double klik Skin, maka pada Form kita akan bertambah komponen Skin.

Form ditambahkan ActiveSkin.

Untuk memilih Skin yang akan kita gunakan dapat dilakukan dengan 2 cara :

Cara pertama :

Klik kanan komponen Skin yang ada pada Form kita, lalu pilih Load Skin.

Klik kanan Skin.

Maka kita disuruh memilih Skin yang sudah ada :

Kemudian pilih Skin Files dengan Ekstensi “.skn” lalu pilih open.

Jika Project kita jalankan (tekan F5) maka tampilan Skin tidak akan terlihat, untuk itu kita perlu menambahkan scrip command pada Even Form_Load() : -> “Skin1.ApplySkin Me.hWnd”

Private Sub Form_Load()

Skin1.ApplySkin Me.hWnd

End Sub

Lalu jalankan Project dengan menekan F5. Maka akan tampak tampilan Form kita berubah

Form setelah memakai Skin.

Form Standard.

Tampak perbedaan Form kita sekarang sudah berubah tidak seperti biasanya.

Cara yang kedua :

Dengan langsung menambahkan command pada Even Form_Load()

Private Sub Form_Load()

Skin1.LoadSkin App.Path & "\skins\Zhelezo.skn"

Skin1.ApplySkin Me.hWnd

End Sub

Dalam hal ini file *.skn sudah ada didalam folder App Path kita dan tersimpan pada sub Folder skis.

Maka jika Project dijalankan (tekan F5) hasilnya akan sama dengan gambar Form setelah memakai Skin.

Jangan heran jika kita ingin menambahkan Label pada form Project kita dengan menambahkam komponen Label Standard, maka tidak akan tampak pada form setelah Project dijalankan (tekan F5). Hal ini dikarenakan “hWnd” from sudah berubah setelah ada command “Skin1.ApplySkin Me.hWnd”, untuk itu jika kita ingin menambahkan Label pada Form kita maka kita harus menggunakan komponen SkinLabel.

Untuk menambahkan SkinLabel sama yaitu dengan Double klik SkinLabel maka akan tampak Komponen SkinLabel sudah berada didalam form kita.