[VB 6] Enumerate + combobox

[nenne]

Waarde Tweakers,

Ik laat een combobox automatisch vullen met enkele tekstwaarden. Aangezien ik voor de overzichtelijkheid in mijn code geen gebruik wil maken van bijvoorbeeld

If Comboxbox.ListIndex = 1 Then

maar het liever vergelijk met de tekstwaarde, zoals

If .... = Blaat Then

wil ik gebruik maken van de functie enumerate.

Een speurtocht op internet heeft mij nog niet veel meer opgeleverd dan het definieren van de functie:

Private Enum Blaat

Blaaat = 0
Blaaaat = 1
Blaaaaat = 2

End Enum

Hoe vergelijk ik de waarde in mijn combobox met de enumerate functie?

[P_de_B]

Je kunt nu gewoon Blaaat als constante voor 0 gebruiken. Je hoeft verder niets te doen.

[nenne]

P_de_B schreef op 09 juni 2004 @ 10:41:
Je kunt nu gewoon Blaaat als constante voor 0 gebruiken. Je hoeft verder niets te doen.

Als het goed is moet ik als ik de functie opvraag ook alle waarden kunnen zien met Alt+spatie, maar die verschijnen niet....

[ Voor 4% gewijzigd door nenne op 09-06-2004 10:43 ]

[Tukk]

nenne schreef op 09 juni 2004 @ 10:40:
Waarde Tweakers,

Ik laat een combobox automatisch vullen met enkele tekstwaarden. Aangezien ik voor de overzichtelijkheid in mijn code geen gebruik wil maken van bijvoorbeeld

If Comboxbox.ListIndex = 1 Then

maar het liever vergelijk met de tekstwaarde, zoals

If .... = Blaat Then

wil ik gebruik maken van de functie enumerate.

Een speurtocht op internet heeft mij nog niet veel meer opgeleverd dan het definieren van de functie:

Private Enum Blaat

Blaaat = 0
Blaaaat = 1
Blaaaaat = 2

End Enum

Hoe vergelijk ik de waarde in mijn combobox met de enumerate functie?

Twee goed bedoelde tips:
- gebruik de [code=vb]-tag, dat maakt je verhaal heel wat leesbaarder.
- gebruik de msdn-cd's, daar staat echt heel veel in, ik denk ook het antwoord op je vraag. (ik begrijp niet echt wat je nu wil)

[P_de_B]

Blaat.

edit: misschien niet helemaal duidelijk Je moet dus de naam van de Enum typen (Blaat) in dit geval, en dan een punt, je krijgt dan het lijstje.

Je kunt trouwens als je meerdere enums hebt beter Blaat.Blaaaat ipv alleen Blaaaat gebruiken.

[ Voor 50% gewijzigd door P_de_B op 09-06-2004 10:46 ]

[Tukk]

nenne schreef op 09 juni 2004 @ 10:43:
[...]


Als het goed is moet ik als ik de functie opvraag ook alle waarden kunnen zien met Alt+spatie, maar die verschijnen niet....

Omdat de listindex niet van het type is dat je als je enum hebt gedefinieerd.

De listindex-prop is een Integer (of een long), geen Blaat-type

[ Voor 10% gewijzigd door Tukk op 09-06-2004 10:49 ]

[nenne]

Problem solved, ik was een beetje slordig met het definieren van de functie

[P_de_B]

Tukk schreef op 09 juni 2004 @ 10:45:
[...]

Omdat de listindex niet van het type is dat je als je enum hebt gedefinieerd.
De listindex-prop is een Integer (of een long), geen Blaat-type

Blaat.Blaaat kun je gewoon in plaats van de integer waarde 0 gebruiken.

[NMe]

nenne schreef op 09 juni 2004 @ 10:49:
Problem solved, ik was een beetje slordig met het definieren van de functie

offtopic:
Sinds wanneer is het declareren van een enum een functie?

[Tukk]

P_de_B schreef op 09 juni 2004 @ 10:50:
[...]


Blaat.Blaaat kun je gewoon in plaats van de integer waarde 0 gebruiken.

Klopt, ik refereerde ook naar de Alt-Spatie functionaliteiten die verwacht werden.

Het is niet dat dan de Blaat-waarde te voorschijn komen. Als je ze der neer zet zullen ze wel werken, maar je zou het zelf moeten tikken.