/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Kolonner i Listbox
Fra : Jack


Dato : 27-05-01 17:45

Hej derude,

Hvordan får jeg indholdet i en ListBox til at stå pænt i kolonner? Jeg kan
vel ikke blot fylde den op med tekst-strenge, á la:

For i=0 to N
listboxName.addItem Str , i
Next i

Hvordan kan man så gøre?

Please help...

/Jack




 
 
Bjørnar Nilsen (27-05-2001)
Kommentar
Fra : Bjørnar Nilsen


Dato : 27-05-01 23:36

I og med at du ønsker å representere dataene dine i kolonner i listboksen,
så antar jeg at strengvariabelen Str inneholder flere "entiteter". Hvis Str
f.eks. er tilordnet slik:

Str = StrEtternavn & ", " & StrFornavn

kan du utføre følgende prosedyre for å få dataene dine i kolonner i
listboksen.

Sett fonten i listboksen til Courier (eller en annen "fixed-width"-font).
Dette er viktig. Husk også på at hvis du bruker en annen font enn f.eks.
Courier, så må du forvisse deg om at denne fonten finnes på alle de PC'ene
som skal kjøre programmet ditt. Courier er "alltid" installert på
Microsoftbaserte OS.

'Deklarerer en string-variabel
Dim StrTomLinje as String

'Lag en linje med tilstrekkelig mange mellomrom. I mitt tilfelle 20
StrTomLinje = " "

'Tilordner variabelen Str etter- og fornavn i "kolonner"
Str = left(StrEtternavn & StrTomLinje, 20) & ", " & left(StrFornavn &
StrTomLinje, 20)

'Legger til verdien av Str i listboksen listboxName
listboxName.additem Str


Håper dette hjelper deg noe videre...

mvh
Bjørnar Nilsen

"Jack" <kir2@hotmail.com> skrev i melding
news:3b112f0f$0$5731$4d4eb98e@news.dk.uu.net...
> Hej derude,
>
> Hvordan får jeg indholdet i en ListBox til at stå pænt i kolonner? Jeg kan
> vel ikke blot fylde den op med tekst-strenge, á la:
>
> For i=0 to N
> listboxName.addItem Str , i
> Next i
>
> Hvordan kan man så gøre?
>
> Please help...
>
> /Jack
>
>
>



J@N (28-05-2001)
Kommentar
Fra : J@N


Dato : 28-05-01 07:45


"Jack" <kir2@hotmail.com> skrev i en meddelelse
news:3b112f0f$0$5731$4d4eb98e@news.dk.uu.net...
> Hej derude,
>
> Hvordan får jeg indholdet i en ListBox til at stå pænt i kolonner? Jeg kan
> vel ikke blot fylde den op med tekst-strenge, á la:
>
> For i=0 to N
> listboxName.addItem Str , i
> Next i
>
> Hvordan kan man så gøre?
>
> Please help...
>
> /Jack
>
Ik' for noget men har du overvejet et Flexgrid ?? Der kan du stille det pænt
i kolonner. Og fjerne stregerne imellem hver kolonne, så det ligner en
listbox (hvis det er ønskeligt.

Jan



Niels G (28-05-2001)
Kommentar
Fra : Niels G


Dato : 28-05-01 09:18


"J@N" <Nowhere@InSpace.Com> wrote in message
news:9ess8q$fe8$1@news.inet.tele.dk...
>
> "Jack" <kir2@hotmail.com> skrev i en meddelelse
> news:3b112f0f$0$5731$4d4eb98e@news.dk.uu.net...
> > Hej derude,
> >
> > Hvordan får jeg indholdet i en ListBox til at stå pænt i kolonner? Jeg
kan
> > vel ikke blot fylde den op med tekst-strenge, á la:
> >
> > For i=0 to N
> > listboxName.addItem Str , i
> > Next i
> >
> > Hvordan kan man så gøre?
> >
> > Please help...
> >
> > /Jack
> >
> Ik' for noget men har du overvejet et Flexgrid ?? Der kan du stille det
pænt
> i kolonner. Og fjerne stregerne imellem hver kolonne, så det ligner en
> listbox (hvis det er ønskeligt.
>
> Jan

En yderlige mulighed er at bruge ListView som befinder sig i Windows Common
Controls.

- Niels G.




Asbjørn Sloth Tønnes~ (28-05-2001)
Kommentar
Fra : Asbjørn Sloth Tønnes~


Dato : 28-05-01 17:28


"Niels G" <ng@kmd.dk> skrev i en meddelelse news:9et1g1$hp$1@news.inet.tele.dk...
>
> "J@N" <Nowhere@InSpace.Com> wrote in message
> news:9ess8q$fe8$1@news.inet.tele.dk...
> >
> > "Jack" <kir2@hotmail.com> skrev i en meddelelse
> > news:3b112f0f$0$5731$4d4eb98e@news.dk.uu.net...
> > > Hej derude,
> > >
> > > Hvordan får jeg indholdet i en ListBox til at stå pænt i kolonner? Jeg
> kan
> > > vel ikke blot fylde den op med tekst-strenge, á la:
> > >
> > > For i=0 to N
> > > listboxName.addItem Str , i
> > > Next i
> > >
> > > Hvordan kan man så gøre?
> > >
> > > Please help...
> > >
> > > /Jack
> > >
> > Ik' for noget men har du overvejet et Flexgrid ?? Der kan du stille det
> pænt
> > i kolonner. Og fjerne stregerne imellem hver kolonne, så det ligner en
> > listbox (hvis det er ønskeligt.
> >
> > Jan
>
> En yderlige mulighed er at bruge ListView som befinder sig i Windows Common
> Controls.

Rigtigt
'-' Kode Start '-'

Private Sub Form_Load()
Dim clmX As ColumnHeader
Dim itmX As ListItem
Dim i As Integer
ListView1.View = lvwReport
For i = 1 To 3
Set clmX = ListView1.ColumnHeaders.Add()
clmX.Text = "Col" & i
Next i

' Add 10 items to list, all with the same icon

For i = 1 To 10
Set itmX = ListView1.ListItems.Add()
itmX.Text = "ListItem " & i
itmX.SubItems(1) = "Subitem 1"
itmX.SubItems(2) = "Subitem 2"
Next i
End Sub


Søg
Reklame
Statistik
Spørgsmål : 177560
Tips : 31968
Nyheder : 719565
Indlæg : 6408941
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste