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 SubEi 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 SubAihe on jo aika vanha, joten et voi enää vastata siihen.