<div style='background-color: none transparent;'></div>

Pages

Home » , , » LOADING SPLASH SCREEN USING PROGRESS BAR IN VB 6.0

LOADING SPLASH SCREEN USING PROGRESS BAR IN VB 6.0

DESCRIPTION

This vb sample program using a progress bar is use for loading / splash screen on your small application.
download the full source code below for free then try it on your own. enjoy!

SCREENSHOT

CODE

Option Explicit

Private Sub Form_Load()
Timer1.Enabled = True
Timer1_Timer
End Sub

Private Sub Timer1_Timer()
ProgressBar1.Value = ProgressBar1.Value + 10
    If ProgressBar1.Value = 80 Then
      ProgressBar1.Value = ProgressBar1 + 20

        If ProgressBar1.Value >= ProgressBar1.Max Then
            Timer1.Enabled = False
        End If
      'In this are you may call the form to be loaded next!
      MsgBox "Loading Complete!", vbInformation, "Info"
      Unload Me
   End If
End Sub

Share this article :

No comments :

Post a Comment

 
Copyright © 2011. datasavvy . All Rights Reserved
Company Info | Contact Us | Privacy policy | Term of use | Widget | Advertise with Us | Site map
Template Modify by Creating Website . Inpire by Darkmatter Rockettheme Proudly powered by Blogger