DaniWeb Forum Index > Software Development > Visual Basic 4 / 5 / 6

Visual Basic 4 / 5 / 6 RSS

Listview

Please support our Visual Basic 4 / 5 / 6 advertiser: Programming Forums - DaniWeb Sister Site

•

Join Date: Mar 2005

Posts: 71

Reputation: NewVBguy is an unknown quantity at this point

Solved Threads: 3

NewVBguy

Offline

Junior Poster in Training

Listview

Mar 17th, 2005

Hi there,
I am using a listview control. After populating the listview, I want my cursor to jump to the last row and make it visible. how can i do that using vb code.
thanks in advance

newvbguy

•

Join Date: Dec 2004

Posts: 2,413

Reputation: Comatose is a jewel in the rough

Solved Threads: 211

Comatose

Offline

Taboo Programmer

Re: Listview

Mar 17th, 2005

I have a feeling you are going to need to use API calls, or possibly sendkeys. If you post the code or attach the project, I'll take a look at it, and see if I can't find a way to accomplish it.

•

Join Date: Oct 2006

Posts: 1

Reputation: totigo is an unknown quantity at this point

Solved Threads: 0

totigo

Offline

Newbie Poster

Re: Listview

Oct 13th, 2006

Hello Friend!!!! Here is the solution....using EnsureVisible!! Try with this:

Private Sub Form_Load()
With ListView1
.View = lvwReport
.ColumnHeaders.Add , , "TEST"
.ListItems.Add 1, , "5"
.ListItems.Add 1, , "4"
.ListItems.Add 1, , "3"
.ListItems.Add 1, , "2"
.ListItems.Add 1, , "1"
Set .SelectedItem = .ListItems(1)
.SelectedItem.EnsureVisible
End With
End Sub

•

Join Date: Dec 2006

Posts: 2

Reputation: susamudre is an unknown quantity at this point

Solved Threads: 0

susamudre

Offline

Newbie Poster

Re: Listview

Dec 25th, 2006

•

Originally Posted by totigo

Hello Friend!!!! Here is the solution....using EnsureVisible!! Try with this:

Private Sub Form_Load()
With ListView1
.View = lvwReport
.ColumnHeaders.Add , , "TEST"
.ListItems.Add 1, , "5"
.ListItems.Add 1, , "4"
.ListItems.Add 1, , "3"
.ListItems.Add 1, , "2"
.ListItems.Add 1, , "1"
Set .SelectedItem = .ListItems(1)
.SelectedItem.EnsureVisible
End With
End Sub

i have used combobox for item name help, i need code and itemname in variable when i select item form bombo and i want to move cursor according to adding word in search tex.
pls help me send me coding at susamudre@yahoo.com
regards
santosh

•

Join Date: Nov 2006

Posts: 848

Reputation: QVeen72 is on a distinguished road

Solved Threads: 120

QVeen72

Offline

Practically a Posting Shark

Re: Listview

Dec 25th, 2006

Hi,

Use this code

 Help with Code Tags 
 Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
Private Sub cmdShowList_Click()
    With ListView1
        .HideSelection = False
        .FullRowSelect = True
        .View = lvwReport
        .ColumnHeaders.clear
        .ListItems.clear
        .ColumnHeaders.Add , , "CHECKING"
        .ListItems.Add , , "1"
        .ListItems.Add , , "2"
        .ListItems.Add , , "3"
        .ListItems.Add , , "4"
        .ListItems.Add , , "5"
        .SelectedItem = .ListItems(.ListItems.Count)
        .SelectedItem.EnsureVisible
    End With
End Sub
Private Sub cmdShowList_Click()
    With ListView1
        .HideSelection = False
        .FullRowSelect = True
        .View = lvwReport
        .ColumnHeaders.clear
        .ListItems.clear
        .ColumnHeaders.Add , , "CHECKING"
        .ListItems.Add , , "1"
        .ListItems.Add , , "2"
        .ListItems.Add , , "3"
        .ListItems.Add , , "4"
        .ListItems.Add , , "5"
        .SelectedItem = .ListItems(.ListItems.Count)
        .SelectedItem.EnsureVisible
    End With
End Sub