you haven't answered my question - but independant here is an answer for you :
Dim l As Integer = ListBox1.Items.Count
Dim myEntry as string = ListBox1.Items(l-1)
this gives you the last Entry from your Listbox.
to get any else you should realize that the Entry-List is Zero-based - that means that the first entry stays a Index=0 and so on ...