Solved

Don get value from my listview

Posted on 2007-11-23
3
406 Views
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.GetInt32(1))
                lstItem.SubItems.Add(dataleser.GetInt32(2))
                lstItem.SubItems.Add(dataleser.GetOracleDateTime(3))
                'lstItem.SubItems.Add(dataleser.GetInt32(4))
                lstItem.SubItems.Add(dataleser.GetString(5))
                'lstItem.SubItems.Add(dataleser.GetString(6))
                lstItem.SubItems.Add(dataleser.GetInt32(7))
                lstItem.SubItems.Add(dataleser.GetString(8) & " " & dataleser.GetString(9))
                lstItem.SubItems.Add(dataleser.GetString(10) & " " & dataleser.GetString(11) & " " & dataleser.GetString(12))
                'lstItem.SubItems.Add(dataleser.GetString(11))
                'lstItem.SubItems.Add(dataleser.GetString(12))
                lstItem.SubItems.Add(dataleser.GetInt32(13))
                'lstItem.SubItems.Add(dataleser.GetString(14))
 
                Me.listviewordre.Items.Add(lstItem)
 
 
            End While

Open in new window

0
Comment
Question by:leeds2000
  • 2
3 Comments
 
LVL 3

Author Comment

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

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

Accepted Solution

by:
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



0
 
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.
0

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

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

Suggested Solutions

Title # Comments Views Activity
VS.net 2010 11 48
VB.NET 2008 (3.5 Framework) Remove all items from List 3 32
VB.net Open Folder in Windows Explorer 3 51
How to repeat the data 4 17
This article explains how to create and use a custom WaterMark textbox class.  The custom WaterMark textbox class allows you to set the WaterMark Background Color and WaterMark text at design time.   IMAGE OF WATERMARKS STEPS Create VB …
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 …
Microsoft Active Directory, the widely used IT infrastructure, is known for its high risk of credential theft. The best way to test your Active Directory’s vulnerabilities to pass-the-ticket, pass-the-hash, privilege escalation, and malware attacks …
In a recent question (https://www.experts-exchange.com/questions/29004105/Run-AutoHotkey-script-directly-from-Notepad.html) here at Experts Exchange, a member asked how to run an AutoHotkey script (.AHK) directly from Notepad++ (aka NPP). This video…

840 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