Don get value from my listview

Posted on 2007-11-23
Last Modified: 2008-02-07
here is the code im using to drag the value from the listview

        Dim vareantall As String = Me.listviewordre.SelectedItems.(2).Text
        Dim varenummer As String = Me.listviewordre.SelectedItems(1).Text

Below is the code for my listview, why dont i get the values i need??

And yes i have values inside my listview box, they are gathered from a database, but i get error when trying the code above, to get values from column 1 and 2
With Me.listviewordre

                .GridLines = True

                .MultiSelect = False

                .FullRowSelect = True

                .View = View.Details

                .HideSelection = False

                .Columns.Add("O. nr", 35, HorizontalAlignment.Center)

                .Columns.Add("V. nr", 35, HorizontalAlignment.Center)

                .Columns.Add("Ant.", 35, HorizontalAlignment.Center)

                .Columns.Add("Salgsdato", 68, HorizontalAlignment.Center)

                '.Columns.Add("Kundenr", 45, HorizontalAlignment.Center)

                .Columns.Add("Varenavn", 111, HorizontalAlignment.Center)

                '.Columns.Add("Varetype", 65, HorizontalAlignment.Center)

                .Columns.Add("Pris", 50, HorizontalAlignment.Center)

                .Columns.Add("Kundenavn", 100, HorizontalAlignment.Center)

                .Columns.Add("Adresse", 185, HorizontalAlignment.Center)

                '.Columns.Add("Postnummer", 65, HorizontalAlignment.Center)

                '.Columns.Add("Poststed", 65, HorizontalAlignment.Center)

                .Columns.Add("Ansatt", 45, HorizontalAlignment.Center)

                '.Columns.Add("Fullført", 55, HorizontalAlignment.Center)

            End With

            Dim lstItem As ListViewItem

            While dataleser.Read()

                lstItem = New ListViewItem()

                lstItem.Text = dataleser.GetInt32(0)








                lstItem.SubItems.Add(dataleser.GetString(8) & " " & dataleser.GetString(9))

                lstItem.SubItems.Add(dataleser.GetString(10) & " " & dataleser.GetString(11) & " " & dataleser.GetString(12))






            End While

Open in new window

Question by:leeds2000
  • 2

Author Comment

ID: 20338500
I do get values from .selecteditems(0)

is this becouse the others are subitems? how do i get values from subitems?
LVL 55

Accepted Solution

Jaime Olivares earned 500 total points
ID: 20338506
>>but i get error when trying the code above, to get values from column 1 and 2
First question: do you really have the items (rows) selected? If not, this will produce an exception:
Dim vareantall As String = Me.listviewordre.SelectedItems.(2).Text
Dim varenummer As String = Me.listviewordre.SelectedItems(1).Text

I think you are confused on how to get the column 1 and 2 (first and second). By example, to get the 1st and 2nd column of the first item in the listview, should be:

Dim vareantall As String = Me.listviewordre.Items.(0).SubItems(0).Text
Dim varenummer As String = Me.listviewordre.Items(0).SubItems(1).Text

LVL 55

Expert Comment

by:Jaime Olivares
ID: 20338511
SelectedItems returns the list of items that are currently selected, that is, highlighted (just one if MultiSelect is set to False).
But if there is not selected item or there are less items selected than what you are trying to access, then you will cause an Exception.

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Well, all of us have seen the multiple EXCEL.EXE's in task manager that won't die even if you call the .close, .dispose methods. Try this method to kill any excels in memory. You can copy the kill function to create a check function and replace the …
Introduction When many people think of the WebBrowser ( control, they immediately think of a control which allows the viewing and navigation of web pages. While this is true, it's a…
In this video I am going to show you how to back up and restore Office 365 mailboxes using CodeTwo Backup for Office 365. Learn more about the tool used in this video here: (…
Internet Business Fax to Email Made Easy - With eFax Corporate (, you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…

912 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

18 Experts available now in Live!

Get 1:1 Help Now