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

ListView Visual Basic

0 głosów
373 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 245 wizyt
pytanie zadane 29 czerwca 2019 w Visual Basic przez Zwyczajne konto Nowicjusz (190 p.)
0 głosów
0 odpowiedzi 730 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ź 598 wizyt

93,720 zapytań

142,641 odpowiedzi

323,265 komentarzy

63,268 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

Twierdza Linux. Bezpieczeństwo dla dociekliwych

Aby uzyskać rabat -10%, użyjcie kodu pasja-linux, wpisując go w specjalne pole w koszyku.

...