[VB6] Countdown Startup

[Lathspell]

Ciao a tutti.
Nella mia applicazione ho progettato un piccolo splash screen, un pò come quelli per la presentazione ed il precaricamente delle impostazioni di molti programmi. Facendo clic sul form, questo si chiude e carica il form principale dell'applicazione.

La mia domanda è questa: come posso inserire un piccolo conto alla rovescia che vada a scrivere nella Caption ad esempio 10... 9... 8... ecc.. e poi apra il programma in automatico?

[axsw]

Io ci provo ad aiutarti

Dunque creati una prima label e chiamala lab0 e metti nella proprietà caption "Inizzializzazione in corso"
poi creati una matirce con 20 label e chiamale lab(0), lab(1), ecc ecc. fino a lab(19)
Chiaramente imposterai la caption della lab(0) in "20" la caption della lab(1) "19" ecc.fino a "0"
poi copia incolla questo codice io ho provato a me funziona
mi raccomanndo la procedura timer chiamala (TmrTimer) e imposta la proprieà interval a 200 dovrebbe andare bene
ma dipende dlla velocità della macchina sù cui gira.

-->code
Option Explicit
Dim gTrecorrente As Integer
Dim gFlagMovimento As Integer

Private Sub Form_Load()
TmrTimer.Enabled = True
If gFlagMovimento = 0 Then
gFlagMovimento = 1
Else: gFlagMovimento = 0
gFlagMovimento = 0
gTrecorrente = 0
End If
End Sub

Private Sub TmrTimer_Timer()
If gFlagMovimento = 1 Then
lab0.Caption = lab(gTrecorrente).Caption
gTrecorrente = gTrecorrente + 1
If gTrecorrente = 19 Then
gTrecorrente = 0
Unload Me
formchevuoi.Show
End If
End If

End Sub
<--code
Ciao e fammi sapere

[goku370]

Allora, inserisci la tua label che nel codice quì di seguito si chiama Label1 e imposti la voce Caption con 10, inserisci un controllo timer e imposti interval a 1000 ( 1 secondo oppure decidi tu...) e usi questo codice:

Private Sub Timer1_Timer()
Label1.Caption = Label1.Caption - 1
If Label1.Caption = 0 Then
Unload Me ' al posto di questo mettere il codice per del programma
End If
End Sub

Ciao... :sexpulp:

[Lathspell]

Grazie ragazzi, mo provo.

[axsw]

Complimenti goku io non ci ero arrivato
ascolta Lath
x un semplice countdown puoi usare il metodo di goku
Se invecevuoi fare un intro tipo corel Draw o Photoshop
Cambiando le caption delle label e meglio se usi l'altro codice

[Lathspell]

Naturalmente io sono un pigrone e quindi preferisco quando il codice da scrivere è minimo è per questo che ho provato prima il codice di Goku.
Il responsoè: FUNZIONA! ....olè!

Ringrazio però sia Axsw che Goku per il tempo che mi hanno dedicato.
Ciauuuu