• Najnowsze pytania
  • Bez odpowiedzi
  • Zadaj pytanie
  • Kategorie
  • Tagi
  • Zdobyte punkty
  • Ekipa ninja
  • IRC
  • FAQ
  • Regulamin
  • Książki warte uwagi

ListView Visual Basic

Object Storage Arubacloud
0 głosów
213 wizyt
pytanie zadane 1 czerwca 2019 w Visual Basic przez mateusz19955 Nowicjusz (120 p.)

Witam, od niedawna zacząłem naukę programowania w Visual Basic, no i napotkałem na pewien problem związany z kontrolką ListView.

Potrafię za pomocą kodu dodać element do tej listy i pod elementy tego elementu, zaznaczyć i określić który elementy został wybrany, ale nie potrafię odczytać konkretnego pod elementu w dodanym elemencie.

Może mi ktoś napisać/wytłumaczyć jak to zrobić?

Oto kod który napisałem:

Public Class Form1
    Dim objektElementListy As ListViewItem

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        objektElementListy = WidokListy.Items.Add("Łukasz")
        objektElementListy.SubItems.Add("Poznań")
        objektElementListy.SubItems.Add("26")

    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        If WidokListy.SelectedItems.Count > 0 Then
            MsgBox(WidokListy.SelectedItems(0).Text)
        End If

    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        If WidokListy.SelectedItems.Count > 0 Then
            WidokListy.Items.Remove(WidokListy.SelectedItems(0))
        End If

    End Sub
End Class

Kod ma działać w ten sposób że, po naciśnięciu klawisza "Button1" ma zostać dodany do listy element o nazwie "Łukasz" i jego dwa pod elementy.

Klawisz "Button3" ma za zadanie usunąć zaznaczony element listy, a klawisz "Button2" ma wyświetlić zaznaczony element.

No i tu pojawia się problem, bo jak zaznaczę sobie element i kliknę Button2 to komunikat jaki zwraca mi metoda MsgBox() jest "Łukasz" czyli nazwa całego elementu.

A ja chciałbym sobie odczytać np. pod element o nazwie "Poznań".

W jaki sposób mogę to odczytać?

 

1 odpowiedź

0 głosów
odpowiedź 7 czerwca 2019 przez Kasper Nowicjusz (140 p.)

Musisz odwołać się do pod elementu SelectedItems

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        If WidokListy.SelectedItems.Count > 0 Then
            MsgBox(WidokListy.SelectedItems(0).SubItems(1).Text)
        End If
 
    End Sub

 

Podobne pytania

0 głosów
0 odpowiedzi 158 wizyt
pytanie zadane 29 czerwca 2019 w Visual Basic przez Zwyczajne konto Nowicjusz (190 p.)
0 głosów
0 odpowiedzi 462 wizyt
pytanie zadane 4 listopada 2018 w Visual Basic przez Maciek Nayko Wiśniew Początkujący (350 p.)
0 głosów
1 odpowiedź 415 wizyt

92,580 zapytań

141,433 odpowiedzi

319,665 komentarzy

61,966 pasjonatów

Motyw:

Akcja Pajacyk

Pajacyk od wielu lat dożywia dzieci. Pomóż klikając w zielony brzuszek na stronie. Dziękujemy! ♡

Oto polecana książka warta uwagi.
Pełną listę książek znajdziesz tutaj.

Akademia Sekuraka

Kolejna edycja największej imprezy hakerskiej w Polsce, czyli Mega Sekurak Hacking Party odbędzie się już 20 maja 2024r. Z tej okazji mamy dla Was kod: pasjamshp - jeżeli wpiszecie go w koszyku, to wówczas otrzymacie 40% zniżki na bilet w wersji standard!

Więcej informacji na temat imprezy znajdziecie tutaj. Dziękujemy ekipie Sekuraka za taką fajną zniżkę dla wszystkich Pasjonatów!

Akademia Sekuraka

Niedawno wystartował dodruk tej świetnej, rozchwytywanej książki (około 940 stron). Mamy dla Was kod: pasja (wpiszcie go w koszyku), dzięki któremu otrzymujemy 10% zniżki - dziękujemy zaprzyjaźnionej ekipie Sekuraka za taki bonus dla Pasjonatów! Książka to pierwszy tom z serii o ITsec, który łagodnie wprowadzi w świat bezpieczeństwa IT każdą osobę - warto, polecamy!

...