Keskustelu: Ohjelmointikysymykset: [VB6] Shell

Mitä vikaa:

Private Sub ccXPButton1_Click()
Unload Me
Shell Text1.Text, vbNormalFocus
App.TaskVisible = False
End Sub

VB väittää ettei tiedostoa löydy. Text1:ssä lukee yhen ohjelman polku.

Kristallipallo sanoo, että syypäänä on polussa olevat välilyönnit. Laita se lainausmerkkien sisään.

Jos näin ei ole, kerro lisää tietoja.

"Unload Me" _muistaakseni_ sulkee formin (ei koko ohjelmaa kuitenkaan kuten End) siihen paikkaan ja siihen tyssääkin koodin suoritus tästä paikasta... vaihda "Me.Hideksi"

Tässä käy näin: Unload lataa formin pois muistista ja kaikki arvot katoavat. Seuraava rivi kutsuu Text1.Textiä, joten formi ladataan uudelleen muistiin. Text1.Text on tyhjä -> tiedostoa ei tietenkään löydy. Siirrä Unload Me viimeiseksi suoritettavaksi asiaksi ja homma pelittää kuten haluat.