Kan man på något sätt "checka" att man står vid sista värdet i en listbox ?


Och att man inte kan lägga till ett värde som redan finns i listboxen (en dubblett)
Tittade på det som finns under Tips/tricks men får inte till den






Sören

<code>
'Kolla om man står vid sista värdet
MsgBox (List1.ListIndex = List1.ListCount - 1)

'Kolla efter dubbletter
Public Sub AddToList(strText As String)
Dim i As Long

For i = 0 To List1.ListCount - 1
If List1.List(i) = strText Then Exit Sub
Next i

List1.AddItem strText
End Sub
</code>

/Micke

Tusen tack, det fungerar...

eh...

MsgBox (List1.ListIndex = List1.ListCount - 1) kollar inte om du står på sista värdet - den ställer dig på det sista värdet.

/Emma

HJär ser man föerdelarna att ha olika operator för jämförelse och tilldelning som t. ex. Java där = tilldelar och == jämför.

I dett fallet:
<code>
MsgBox (List1.ListIndex = List1.ListCount - 1)
</code>
Kommer en jämförelse göras. VB tilldelar bara till variabeln om variabeln inte förekoms av något.
T. Ex:
<code>
A = B = C
</code>
Alternativt:
<code>
A = (B = C)
</code>
Vad denna kod gör är att tilldelar uttrycket till höger om första lika med tecknet till variabel A.

Hur kollar man då, om man står på sista värdet

<b>Hur kollar man då, om man står på sista värdet </b>

Man kan skriva så som jag skrev, som Andreas försökte förklara.

/Micke