Jeg arbejder med et projekt hvor jeg skal hente nogle data i en database.
Efter brugeren har søgt i databasen, skal de poster som passer på søgningen
presenternes i en 'Listbox' hvor brugeren så kan klikke på den post han ønsker.
Funktionsmæssigt virker det perfekt, men min Listbox liner lort, jeg smækker nemlig bare de forskellige data i kolonnerne vha. TAB[chr(9)],
List1.AddItem (Patient.Recordset("Cpr")) & Chr(9) & _
(Patient.Recordset("Fornavn")) & Chr(9) & _
(Patient.Recordset("Mellemnavn")) & Chr(9) & _
(Patient.Recordset("Efternavn")) & Chr(9) & _
(Patient.Recordset("Adresse")) & Chr(9) & _
(Patient.Recordset("Postnr_")) & Chr(9) & _
når så Længden på de forskellige data-stringe variere, ja så ligner Listbox'en lyn-hurtigt en rodet affære.
derfor ville jeg så bruge Windows Common Controls 6.0, og jeg tror måske også godt den kan løse opgaven, men fejlen ligger 40cm fra tasteturet.
Jeg gik ind og oprettede de forskellige kolonner, men har ikke kunne få lagt nogle data i førnævnte, er der nogen der kan give lidt hjælp!!!!
I den oprindelig Listbox udnytter jeg at man kan trykke på en række og bruge listindex til at finde yderlige data i en database, kan min nye listbox også det????
Joachim Boll
Jens
Hej der
1) jeg ville nok ikke bruge en listbox til at, repræsentere
så man kolonner men istedet msflexgrid/listwiew/datagrid
2) men hvis du absolut vil bruge listboxen!
hvorfor gøre det let når man kan gøre det besværligt.
dim x as integer
dim x1 as integer
dim y as integer
dim y1 as integer
så er der en flg. mulighed!! select * from patienttabel
og her tages der kun udgangspunkt i 2 kolonner
i tabellen
y=13
y1=12 'og så kan Fornavnet ikke være mere end 12 tegn
Do while rst not.EOF
x=Len(rst!cpr) 'her er x= 11 tegn "eks.cpr(111180-2219)"
x=y-x ' her er x=13-11 dvs 2
y=Len(rst!Fornavn) 'her er y= 4 "eks fornavn "jens "
y=y1-y
'------havde det være kristian ville y være 4 i stedet for 8
' mellemrum
List1.AddItem rst!cpr & space(x) & rst!Fornavn & space(y)
'forsættes så
WEND
fremgangs måden her er at, du tæller den enkelte streng
og herefter laver et passende antal mellemrum således
at, næste post ved næste begyndelse får samme
start sted ! derved kommer posterne til at stå ordnet.
men jeg vil dog understrege at dette er lettere at styre i
et såkaldt Grid hvor man vha properties eller kode
kan definere kolonne bredden istedet
hope that helps
Jens