Scrolling For ListView Selected Item

If you selected an item in ListView control within your code, Not always the item will be visible to the user.
This sample code will assure that the selected item will be visible.


Add ListView control to your form (Named ListView1)
Set the ListView View property to 3 - lvwReport
Right click on the ListView Control, choose Properties from the menu, select the 'Column Headers' Tab, Press 'Insert Column' button, type in the 'Text' Text Box "MyHeader", and press the OK button.

Form Code

Private Sub Form_Load()
   Dim x As Integer
'the 4 lines below add 20 items to your ListView:
'MyItem1 named 'Item 1', MyItem2 named 'Item 2' and so on.

  With ListView1
      For x = 1 To 20
         .ListItems.Add Key:="Item " & x, Text:="MyItem" & x
       Next x
'Replace the "Item 20" below with the Item name that you want to select
.SelectedItem = .ListItems("Item 20")
   End With
End Sub

Go Back