Hejsan hejsan alla glada pelesoftare. <code> Man tackar man tackar... och av självaste pelle va det också =) // R-musListbox checked = ?
Inte ofta jag behöver hjälp själv men nu har jag kört fast.
Har försökt att lösa detta själv men ikke...!!!
Fråga: I listboxar kan man välja som egenskap att de ska vara förkryssningsbara. (checked or unchecked).
Det jag nu har fastnat på är just hur man kollar om dom är ikryssade eller inte.
jaghar en cmd som "Ta Bort"-knapp, den ska ta bort de rader i listboxen som är ikryssade. Hur gör jag detta?
Läxa på sommarlovet... kan det bli mycket värre? // R-musSv: Listbox checked = ?
Private Sub Command1_Click()
For a = 0 To List1.ListCount - 1
If List1.Selected(a) Then
MsgBox a + 1 & " är vald"
Some = True
End If
Next
If Some = False Then
MsgBox "Ingen vald"
End If
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Load()
Dim Index
Index = "Inställningar För Microsoft Exchange"
List1.AddItem Index
Index = "Kommunikationsserver"
List1.AddItem Index
Index = "Besöksfrekvenser"
List1.AddItem Index
End Sub
</code>Sv: Listbox checked = ?