Hallo
folgendes Problem: ich habe eine Listview die ich nacheinander mit Daten fülle:
vorher habe ich noch
jetzt möcht ich gerne mit einem Klich auf eine Reihe alle 4 Spalten auslesen und einzeln in Textboxen füllen
ich habe leider nur folgenden Code
aber das hilft nur um den ersten Item in eine Textbox zu laden
kann mir einer helfen
danköö
PrimuS
folgendes Problem: ich habe eine Listview die ich nacheinander mit Daten fülle:
Code:
With ListView1
.ListItems.Add = txttitel.Text
.ListItems(i).SubItems(1) = txtenglisch.Text
.ListItems(i).SubItems(2) = txtid.Text
.ListItems(i).SubItems(3) = txtjahr.Text
End With
vorher habe ich noch
Code:
Private Sub Form_Load()
Dim Breite As Long
Dim i As Long
With ListView1
Breite = Int(.Width / 3.2) ' Spaltenbreite
.ColumnHeaders.Add , , "Titel", Breite ' Überschrift
.ColumnHeaders.Add , , "Orig. Titel", Breite
.ColumnHeaders.Add , , "ID", Breite
.ColumnHeaders.Add , , "Jahr", Breite
.View = lvwReport
End With
End Sub
jetzt möcht ich gerne mit einem Klich auf eine Reihe alle 4 Spalten auslesen und einzeln in Textboxen füllen
ich habe leider nur folgenden Code
Code:
Private Sub ListView1_Click()
Text2.Text = ListView1.SelectedItem
End Sub
kann mir einer helfen
danköö
PrimuS