Vraag : VB.net 2008 dicht een OpenRead

Ik heb een programma dat de inhoud van een folder leest en een combovakje met de namen van elke sql file.

1 bevolkt:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:

For Elk F als FileInfo in folder.GetFiles
            Probeer
                'probeer om elk dossier voor gelezen te openen
                f.OpenRead ()
                'f.openRead.close
                'f.openRead.dispose
                'vang fout
            Vang c als Uitzondering
                'toestemmingenkwestie, skip dossier
                GoTo nxt2
            Het eind probeert
            'controleer als het dossier een sql dossier is
            Als f.Name.Substring (Len (f.Name) - 4, 4) = „.sql“ toen
                het 'dossier is een sql dossier
                cmbscript. Items.Add (f.Name.Replace („.sql“, ""))
            Eind als
nxt2:

        Daarna


I am gebruiken OpenRead ()

How sluit ik het nadat combobox met de naam van het dossier wordt bevolkt?  Zelfs nadat sub wordt gedaan kan ik niet het dossier uitgeven of veranderen het ben naam.  Het zou geen open verbinding aan het moeten houden.

I heeft geprobeerd:
f.openread () .close
f.openread () .dispose

neither work

What ben verkeerd doen van I?

Antwoord : VB.net 2008 dicht een OpenRead

Probeer iets als:
1:
2:
3:
4:
5:
6:
7:
8:

        Voor Elk F als FileInfo in folder.GetFiles („*.sql“)
            Probeer
                Het gebruiken fs als FileStream = f.OpenRead ()
                Het Gebruiken van het eind
                cmbscript. Items.Add (Path.GetFileNameWithoutExtension (f.Name))
            Vangst c als Uitzondering
            Het eind probeert
        Daarna
Andere oplossingen  
 
programming4us programming4us