Alkaa suoraan sanottuna vittutamaan tämä homma.
Tein uuden projektinkin, jotta saisin sen (muka) korjattua, ei auttanut.
Ihan perusformi, frmStart, jossa _ainoastaan_ seuraava koodi:
Private Sub frmStart_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.Show() Application.DoEvents() Status.Text = "Checking for updates..." ''Current version Dim CurrentVersion = "0.1" Dim LatestVersion = "0.1" If LatestVersion > CurrentVersion Then Status.Text = "Updates are ready, closing in 3 seconds..." Application.DoEvents() Threading.Thread.Sleep(2500) Application.DoEvents() Shell("Updater.exe") End End If Status.Text = "Your version is up-to-date. Welcome!" Me.Hide() End Sub
Ei piiloudu.
Auttakaa perkele :D
Jotain:
http://forums.microsoft.com/MSDN/ShowPost.aspx?
EDIT:
Auts, en tiennyt mistään form.close jutusta, nyt kai toimii:
http://expertanswercenter.techtarget.com/eac/
Ei ** oon tyhmä.
Moikka Quirzo!
Latauksen yhteydessä Me.Hide() toimii esim. seuraavasti - Ekax formille paneeli ja sit...
Private Sub Panel1Paint(sender As System.Object, e As System.Windows.Forms.PaintEventArgs) Dim piilossa As Boolean piilossa = Me.Visible '... '... If Not piilossa Then Me.Hide piilossa = True End If End Sub
Aihe on jo aika vanha, joten et voi enää vastata siihen.