Extending splash screen time

Question

0.00/5 (No votes)

See more:

How to extend time of splash screen in vb.net 2008?

I have 2 forms one is my main form(frmMain) and the other is my splash screen(frmSplash). In project properties I set the start form to frmMain and in splash screen frmSplash. When I run my project the splash screen display only 2 seconds. How can I extend the time?

thanks in advance.

Posted 16-Apr-13 21:01pm

ianshack

Add a Solution

3 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Aarti Meswania · Answer 1 · 2013-04-16T21:12:00

Solution 1

add timer control on splash form
and on tick event put if condition when timer's time goes greater than desire time then close form and enable your MDI form

Happy coding!
:)

Posted 16-Apr-13 21:12pm

Aarti Meswania

Comments

Johnny J. 17-Apr-13 9:21am

The OP wants to use the built in splash screen functionality instead of coding his own, so this is not a solution to the OP's question...

Thregarth · Answer 2 · 2013-04-17T01:11:00

Solution 2

You can code this:

Private Sub SplashScreenForm_Shown(sender As Object, e As EventArgs) Handles Me.Shown
   Application.DoEvents()
   Dim sw As New Stopwatch
   sw.Start()
   Do : Loop While sw.ElapsedMilliseconds < 3000
 End Sub

Posted 17-Apr-13 1:11am

Thregarth

Comments

Thregarth 17-Apr-13 10:10am

I think about writting this code in the Shown event, yout can ensure that the form with what you want to show, is being shown, after all controls are painted

Johnny J. · Answer 3 · 2013-04-17T03:39:00

Try this in your main form:

VB

Public Class MainForm

    Private WithEvents tmr As New Timer

    Private Sub MainForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        tmr.Interval = 5000
        tmr.Enabled = True

        Do While tmr.Enabled
            Application.DoEvents()
        Loop
    End Sub

    Private Sub tmr_Tick() Handles tmr.Tick
        tmr.Enabled = False
    End Sub

End Class