ListView Formatierung
19.01.2022 19:46:27
Sigi
ich habe ein Problem beim übertragen vom Datum einer ListView zur TextBox
Im Tabellenblatt und und ListView wird das Datum mit So, 15.03.1987 angezeigt.
In der TextBox soll jedoch nur 15.03.1987 angezeigt werden.
Was mache ich da falsch?
Danke!
Gruß
Sigi
Private Sub lv_KD_Click()
Dim Item As MSComctlLib.ListItem
If lv_KD.ListItems.Count = 0 Then Exit Sub
With lv_KD.SelectedItem
t_Name.Text = .SubItems(1)
t_Vorname.Text = .SubItems(2)
t_Geburt.Text = Format(.SubItems(3), "dd.mm.yyyy")
t_Zahl.Text = .SubItems(4)
t_Zahl.Text = Format(.SubItems(4), "#,##0.00")
t_Znr.Value = .SubItems(5)
End With
End Sub