Avatar billede mbl Novice
12. november 2006 - 14:09 Der er 1 kommentar og
1 løsning

Text fil ind i et 3 dropdown boxe

Jeg har en text fil med følgende text

a;b;c
d;e;f
g;h;i


Disse skal lægges i i 3 dropdown boxe
a-d-g i den først
b-e-h i den anden
c-f-i i den tredje
Avatar billede shy Nybegynder
12. november 2006 - 15:03 #1
Sub test()
Dim L As String
Dim Data As String
Dim Tmp As Variant
Dim X1 As Integer

Open "C:\Test.txt" For Input As #1
While EOF(1) = False
    Input #1, L
    Data = Data & L & ";"
Wend
Close 1
Data = Left(Data, Len(Data) - 1)

Tmp = Split(Data, ";")
For X1 = 0 To UBound(Tmp) Step 3
    Combo1.AddItem Tmp(X1 + 0)
    Combo2.AddItem Tmp(X1 + 1)
    Combo3.AddItem Tmp(X1 + 2)
Next X1

End Sub
Avatar billede mbl Novice
13. november 2006 - 13:56 #2
Takker for hjælpen.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester