---

jeg vil gerne ha det sådan at hvis tallet allerede er i listen så skal den
lave en popup.,, men hvis det ikke er der så skal den bare tilføje det.. :

If List1.?? = Round(Rnd * (txt1.Text), 0) Then
MsgBox ("doh")
Else
List1.AddItem (Round(Rnd * (txt1.Text), 0))
End If