Dobrý den, vyberte formulář, který chcete zobrazit jako splashscreen v rozbalovacím seznamu ve vlastnostech projektu na kartě Application. Do subrutiny MyApplication_Startup (v ApplicationEvents) pak umístěte kód, který se provede během nahrávání programu, zatímco bude zobrazen splashscreen. Pokud chcete nastavit minimální dobu, po kterou bude splashscreen zobrazen, použjte následující kód, který vložte do třídy MyApplication v ApplicationEvents:
Protected Overrides Function OnInitialize(ByVal commandLineArgs As _
System.Collections.ObjectModel.ReadOnlyCollection(Of String)) As Boolean
' Nastavení doby na 5000 ms (5 sekund).
Me.MinimumSplashScreenDisplayTime = 5000
Return MyBase.OnInitialize(commandLineArgs)
End Function
|