[VB6] Rallentare caricamento con ciclo For

[giustav]

Ciao,
volevo sapere come posso fare, avendo questo codice come modulo:

Public fMainForm As frmLogin

Sub Main()
frmIntro.Show
frmIntro.Refresh
Set fMainForm = New frmLogin
Load fMainForm
Unload frmIntro

fMainForm.Show
End Sub

a rallentare il caricamento del logo iniziale (nome form: frmIntro) per passare al form Login, in quanto la visualizzazione del logo è troppo veloce.
So che bisogna utilizzare il ciclo FOR, ma non so come inserirlo in questo codice.

Help me.
P.S: sottolineo che è da poco che ho iniziato con questo linguaggio di programmazione.

Grazie per le risposte.
Giuseppe

[MItaly]

Ma in sostanza tu vuoi inserire una pausa tra Load fMainForm e Unload frmIntro? Non fai prima ad inserire un timer in frmIntro in modo che si chiuda da solo dopo un tot di secondi?

[giustav]

si...
Con il codice che ho inserito prima, mi puoi dire come posso fare per modificarlo???


grazie mille
Giuseppe

[MItaly]

Aggiungi al form frmIntro un timer, impostane la proprietà Interval al numero di millisecondi dopo i quali vuoi che la schermata sparisca e inserisci nella parte di codice

Private Sub Timer1_Timer()
    Unload Me
End Sub

; quindi rimuovi dal codice che hai postato l'istruzione Unload frmIntro.

[giustav]

Grazie mille.



Non so come ringraziarti!

[MItaly]

Figurati... per così poco!