title image


Smiley Das ist sehr einfach...
Mit ListIndex setzt du zwar den Index auf das gewünschte Element, aber wenn du möchtest, dass dieses dann auch noch selektiert wird, musst du mit "SteuerelementName.Selected(Index)=True" auch noch markieren. Und das Ereignis ist in der Tat das Click-Ereignis. Hier ein Beispiel, welches eine Listbox mit 100 Einträgen füllt, das erste Element selektiert und markiert und eine Messagebox ausgibt beim Klicken auf ein Element:



Option Explicit



Private Sub Form_Load()

Dim i As Integer

For i = 1 To 100

List1.AddItem i & ": Irgendwas " & i

Next i



List1.ListIndex = 0

List1.Selected(0) = True



End Sub



Private Sub List1_Click()

Dim i As Integer

For i = 0 To List1.ListCount - 1

If List1.Selected(i) = True Then

MsgBox List1.List(i)

End If

Next i

End Sub

>/font>

Gruß aus Ostfriesland. Möge Tux mit Dir sein!

ff


Proggst du schon .net oder quälst du dich noch mit VB6?



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: