Listbox fra fil

Det er jo ikkk ligegyldigt om det er en text-fil eller en database...

Database: Brug søgefunktionen - der er en trilliard spørgsmål om databaser

Læs fra fil til listbox med navn List1:

  Dim MinString As String
  Dim FilNummer as Integer
  Filnummer = FreeFile
  List1.Clear
  Open "C:\Fil.txt" For Input As #Filnummer
  while not eof(#filnummer)
    Line Input #Filnummer, MinString
    List1.additem MinString
  Wend
  Close #Filnummer



Som du kan se tilføjer du emner til en listbox med .AddItem

NB: Bruger du en database, kan du

1. binde den til en kontrol, fx. en listbox, så listboxen selv loader de tabeller du har specificeret. Du får brug for en data kontrol, og nok for at læse lidt om listbox kontrollen (der er fx. en property DataSource (http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vb98/html/vbobjlistbox.asp)

2. connecte til databasen og hente de ting du vil ind i et recordset vha. et passende SQL-udtryk. Derefter indlæser du recordsættet i din listbox. Denne metode er beskrevet mindst en trilliard gange her på eksperten ;o)

Mange foretrækker metode 2, da der er en masse begrænsninger i datakontrollen nævnt i 1.

Over & Out, Martin