--
Genesio Conti - Calvizzano (NA) - Italy
E-Mail : gen...@NOSPAMsofthome.net
( remove NOSPAM for answer )
[Neo] CyberL <pr...@microsoft.com> wrote in message
82bfki$95t$1...@news.flashnet.it...
>Salve a tutti
>vorrei sapere se era possibile mettere una form iniziale che duri pochi
>secondi prima di far partire il prigramma vero e proprio.
Questa domanda è stata fatta già molte volte (consiglio: dare sempre un'occhiata su www.dejanews.com)
O puoi usare il wizard di VB (non l'ho mai fatto ma dovrebbe esser possibile fare una cosa del genere)
Oppure:
Imposta come procedura di avvio la Sub Main di un modulo:
Sub Main()
Logo.Show
Sleep (2)
Unload Logo
frmMain.Show
End Sub
Dove Sleep è la seguente funzione (che ho trovato non so dove), la quale sostituisce praticamente il timer:
Public Sub Sleep(delay As Double)
Dim tempTime As Double
tempTime = Timer
While Timer - tempTime < delay
DoEvents
If Timer < tempTime Then
tempTime = tempTime - 24# * 3600#
End If
Wend
End Sub
Questo Codice carica la form Logo, attende due secondi, dopodiché la chiude e visualizza la form frmMain.
Ciao,
Moreno
#sirri#@morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------
Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds
As Long)
ciao,
RiK