03/04/15 22:12
archemi
Ciao a tutti, ho un problema che mi sta facendo diventare matta.
Volevo mettere durante il caricamento della base dati uno splash screen di avviso
Ora vorrei metterlo al centro dello schermo ma niente...
il codice è questo:
Volevo mettere durante il caricamento della base dati uno splash screen di avviso
Ora vorrei metterlo al centro dello schermo ma niente...
il codice è questo:
Public Class frmUtilizzatori Private _SplashForm As New SplashForm Private Sub frmUtilizzatori_Load(sender As Object, e As EventArgs) Handles MyBase.Load Control.CheckForIllegalCrossThreadCalls = False Me.Hide() BackgroundWorker1.RunWorkerAsync() _SplashForm.ShowDialog() End Sub Private Sub BackgroundWorker1_DoWork(sender As Object, e As DoWorkEventArgs) Handles BackgroundWorker1.DoWork accessoDati.caricaUtilizzatori(cbUtilizzatori) End Sub Private Sub BackgroundWorker1_RunWorkerCompleted(sender As Object, e As RunWorkerCompletedEventArgs) Handles BackgroundWorker1.RunWorkerCompleted _SplashForm.Close() Me.Show() End Sub End Class Public Class SplashForm Inherits Form Private _Label As New Label With {.Dock = DockStyle.Fill, .Text = "ATTENDERE PREGO", .ForeColor = Color.White} Private Sub SplashForm_Load(sender As Object, e As System.EventArgs) Handles Me.Load Controls.Add(_Label) Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None Me.Width = 200 Me.Height = 50 Me.StartPosition = FormStartPosition.CenterScreen Me.BackColor = Color.Green End Sub End Class
aaa