MENAMPILKAN
FILE SWF
File ber-ekstensi SWF
merupakan file animasi yang dibuat menggunakan flash, tutorial kali ini dapat
anda gunakan sebagai alternatif untuk mengurangi script dalam perintah untuk
menampilkan file ber ekstension GIF.
1.
Bukalah program visual basic dan
mulailah dengan form baru.
2. Kemudian
aktifkan dialog Component dengan cara klik kanan pada
component tool, setelah itu beri tanda cek pada pilihan Shockwave Falsh dan klik Ok.
3.
Masukkanlah sebuah komponen ShockwaveFlash dan CommandButton kedalam area form.
4.
Selanjutnya klik ganda di dalam area
form dan ketiklah perintah di bawah ini pada prosedur Form_Load. Setelah itu ketik juga perintah untuk menutup form pada
prosedur Command1_Clik.
|
1
2
3
|
Private
Sub Command1_Click()
End
End
Sub
|
|
4
5
6
7
8
9
10
11
|
Private
Sub Form_Load()
With ShockwaveFlash1
.Top = 0
.Left = 0
.Width = Me.Width
.LoadMovie 0, App.Path &
"\banner.swf"
End With
End
Sub
|
Keterangan Kode
2
3-5
6
10
|
Membuat
perintah yang akan memberikan awalan perintah ShockwaveFlash1 pada kode yang berada diantara perintah With-End With.
Mengatur
posisi Top dn Left komponen ShockwaveFlash1,
kemudian menyesuaikain ukuran komponen dengan ukuran lebar form.
Menampilkan
file flash yang berada di dalam folder dimana anda menyimpan file ini.
Perintah
untuk menutup semua form.
|
5.
Untuk mencoba hasilnya tekan tombol F5 pad akeyboard anda.
EmoticonEmoticon