Show last item in a listbox 1

[CaKiwi]

How can I scroll a list box to show the last item?

CaKiwi

 

[ThatRickGuy]

Try something like this:

listbox.selecteditem = listbox.item(listbox.items.count - 1)

-Rick

VB.Net Forum forum796 forum855 ASP.NET Forum
I believe in killer coding ninja monkeys.

 

[CaKiwi]

That didn't work for me, although something similar did work in VB6. This works but I hard coded the the number of visible lines in the list to be 7. Is there a way to determine this programatically?

        If lstInfo.Items.Count > 7 Then
            lstInfo.TopIndex = lstInfo.Items.Count - 7
        End If

CaKiwi

 

[macleod1021]

>>>That didn't work for me

Can you elaborate a little bit more on that. Rick's code should have worked. What's it doing on your system?

I don't recommend hard coding any type of selection like that because you will get unexpected results/error if the listbox ever changes

 

[CaKiwi]

listbox.item gave a syntax error. I changed it to listbox.items and it had no effect on the appearance of the listbox

CaKiwi

 

[macleod1021]

Hmmm...I just through the following together real quick and it works fine.

Dim i As Int32 = 1
        Do While i < 10
            ListBox1.Items.Add("test" + i.ToString)
            i += 1
        Loop


        ListBox1.SelectedItem = ListBox1.Items(ListBox1.Items.Count - 2)

 

[macleod1021]

I just noticed you referenced scrolling also. I changed 10 to 40 to cause scroll bars and it scrolled to the item requested. Also, the 2 is in the code because I was testing differences. The last item is -1 from the count.

 

[ThatRickGuy]

Now that I'm in front of the IDE, if you just want to scroll to the bottom, this will do it:

Me.ListBox1.TopIndex = Me.ListBox1.Items.Count - 1

-rick

VB.Net Forum forum796 forum855 ASP.NET Forum
I believe in killer coding ninja monkeys.

 

[CaKiwi]

Thanks guys, I used

Me.ListBox1.TopIndex = Me.ListBox1.Items.Count - 1

and it worked fine

CaKiwi