Tutorial Membuat Splash Screen :
1. Buka VB6 And Pilih Standart EXE ( Pastinya :hihi: )
2. Tambahkan 1 Buah Splash Screen Caranya Click Project -> Click Add Form Dan pilih Splash Screen dan click OK Coba Lihat Gambar Dibawah Ini :
Click Project And Sellect Add Form |
Pilih Splash Screen And Click Open |
4. Masukan Components Microsoft Winsock Control 6.0 & Microsoft Windows Common Controls 6 (SP6) Caranya tekan CTRL + T Pada keyboard :
5. Setelah di masukan sekarang masukan :
- 1 ProgressBar
- 1 Timmer
- 1 Label
Atur Propertinya Seperti Ini :
- Progressbar : Appearance = 0 - ccflat, Scroling = 1
- Timer : Interval = 50
- Label : Caption = seterah sih sesuai kebutuhan
Kira - Kira Menjadi Seperti Ini ( sesudah ane design ) :
7. Pada Startup Objects ganti frmsplash :
8. Masukan Code Ini :
Option Explicit
Dim efek As Integer
Private Sub Timer1_Timer()
On Error Resume Next
efek = efek + 5
ProgressBar1.Value = ProgressBar1.Value + 400 / 400
If efek > 500 Then
Timer1.Enabled = False
Screen.MousePointer = vbNormal
Me.WindowState = 0
Do
Me.Left = Me.Left + 20
Me.Move Me.Left, Me.Top
DoEvents
Loop Until Me.Left > Screen.Width
Load Form1
Form1.Show
Unload Me
End If
End Sub
9.Selesai hehe saya memakai splash screen juga pada web browser v.1.0 Tekan F5 untuk menjalankan project
*Note : Saya sarankan anda memakai VB Full Version jika anda belum punya bisa di download ( disini )
Untuk anda yang ingin menyimpan program yang anda sudah buat caranya :
1. Klik File pada tab atas
2. Klik Make Project1.exe...