Weer een leip VB probleem

[Verwijderd]

Ik wil een lijst maken met alle namen van gebruikers hier met een checkbox ervoor.
Hoe maak ik zo'n lijst met scrollopties erbij om van boven naar beneden in zo'n lijst te kunnen scrollen?

[Crazy D]

Hoe stel ik m'n vraag lekker vaag

Zo'n lijst met scrollopties
Bedoel je niet gewoon een listbox met checkboxjes?
Desnoods een listview met checkboxjes?

Je kan ook zelf een usercontrol in elkaar knutselen

[Verwijderd]

Ja juist, een listbox met checkboxjes erin, hoe doet ik dat?

[baviaan]

Crisis.
Neem VB6, neem een listview control.
Zet de style op report.
Voeg een aantal columnheaders toe.
Zorg dat de checkboxen aanstaan.

Klaar

[.GoO]

kan je dan niet gewoon beter een listbox maken waarin je regels kan selecteren?

[Verwijderd]

Gewoon een listview gebruiken, en in de properties de checkboxen aanzetten.

Jou zou ook de lisview kunnen subclassen via een aantal API-calls, is echter niet aan te raden.

[Crazy D]

Hoe doe je dat? Door even goed naar de properties van de standaart listbox te kijken.
Hint: style
(oops antwoord al gegeven )

PS dit soort vragen zou je gewoon zelf moeten kunnen oplossen hoor. Basiskennis VB is onder andere dat je weet welke controls er standaart "in" VB zitten. Handig is ook wel om te weten welke controls er standaart meegelevert worden (zoals windows common controls), maar dat vind ik nog tot daar aan toe. Dit is iets wat je gewoon had moeten weten. (no offence verder).

[Verwijderd]

heheheh en hoe doet ik dat?
De bedoeling is dat ik een lijst met alle computergebruikers heb.
Er wordt in een textbox een eigenschap ingetypt en moet aan meerdere items in de lijst toegevoegd kunnen worden.
Nu zat ik dus te denken aan een soort listbox dan met checkboxes om op die manier een hele lange lijst te kunnen maken en zo de mogelijkheid te geven meerdere mensen te selecteren uit die lijst

[baviaan]

zo dus:

Dim moListitem As Object

With lvwListview
.View = lvwReport
.Checkboxes = True
.FullRowSelect = True

.ColumnHeaders.Add , , "Kolom 1"
.ColumnHeaders.Add , , "Kolom 2"
End With

Set moListitem = lvwListview.ListItems.Add

With moListitem
.Text = "Waarde 1"
.SubItems(1) = "Waarde 2"
End With

Set moListitem = Nothing

hmm.. tabs zijn weg. hoe kwoot ik code?

[Grum]

[_code][/code_] (zonder de _'s)

[Crazy D]

Op donderdag 10 januari 2002 11:36 schreef Baviaan het volgende:
zo dus:

code:

    Dim moListitem As Object

Als je daar nou "As ListItem" van maakt issie helemaal handig (heb je tenminste intellisencehelp)

En uh

code:

 en

(alleen dan zonder die spatie...)
Faq

[Speedy_J]

code:

    Dim moListitem As Object
    
    With lvwListview
      .View = lvwReport
      .Checkboxes = True
      .FullRowSelect = True
      
      .ColumnHeaders.Add , , "Kolom 1"
      .ColumnHeaders.Add , , "Kolom 2"
    End With

    Set moListitem = lvwListview.ListItems.Add
    
    With moListitem
      .Text = "Waarde 1"
      .SubItems(1) = "Waarde 2"
    End With
    
    Set moListitem = Nothing

[baviaan]

ja. maar waar heb ik intellisense voor nodig?
klop hele dagen code. as Object zorgt ervoor dattie niet gereferenced wordt, wat vooral bij objecten een hoop problemen voorkomt.

[baviaan]

dank je Speedy!

[Verwijderd]

Ok ik ben dus echt een superbeginner....waar moet deze code komen?

[Speedy_J]

Op donderdag 10 januari 2002 11:45 schreef DreamcasterW het volgende:
Ok ik ben dus echt een superbeginner....waar moet deze code komen?

Waarom koop je niet gewoon een goed boek dan, leer je dit soort dingen wat makkelijker uit..

[Crazy D]

Op donderdag 10 januari 2002 11:42 schreef Baviaan het volgende:
ja. maar waar heb ik intellisense voor nodig?

Waar jij 'm voor nodig hebt weet ik niet, maar ik vind het wel handig (vooral bij objecten die ik niet zovaak gebruik).

[baviaan]

pff. als je niet eens weet waar deze code moet komen kun je beter een boek gaan kopen en daar eens mee beginnen. ik ga hier iig geen tijd en moeite meer aan verspillen

[wasigh]

Op donderdag 10 januari 2002 12:14 schreef Baviaan het volgende:
pff. als je niet eens weet waar deze code moet komen kun je beter een boek gaan kopen en daar eens mee beginnen. ik ga hier iig geen tijd en moeite meer aan verspillen

*Zucht*
dat mag wel iets vriendelijker niet?