我决定编写一个简单的应用程序。我需要建议。我必须指出,我是一个完整的初学者,昨天我从 VB 开始......
我有一个列表框:
法典:
listUzivatelu.Items.Clear ()
listUzivatelu.Items.AddRange (databaze.VratVsechny ())
我需要它出现在列表视图中:
法典:
Dim TempStr (1) As String
TempStr (0) = "1111"
TempStr (1) = "Doe, John"
ListView1.Items.Add (New ListViewItem (TempStr))
但是当我写数据时。VratVsechny () 所以它只是抛出一个错误。
数据巴兹。VratVsechny() 返回:
法典:
Public Function VratVsechny () As Product ()
Return Vyrobek.ToArray ()
end Function
我附上源代码:https://www.dropbox.com/s/btg5c66wvafo8qj/csv-zapis-a-cteni-objektu.zip
提前感谢您对该主题的任何建议。
我尝试运行您的项目,执行此行时出现的唯一问题:
databaze.Nacti()
在深入研究该方法后,我发现将"无效"字符串解析为 DateTime 引起的错误。csv 文件中的日期字符串以date.month.year
格式显示,当我编辑 csv 以使用month.date.year
它成功解析并且程序运行没有错误时。另一种选择是使用 ParseExact 而不是 Parse 方法。例如:
Dim registrovan = DateTime.ParseExact(rozdeleno(2), "d", CultureInfo.CreateSpecificCulture("ru-RU"))
这将在csv中成功解析您当前的日期字符串,因为俄罗斯文化中的日期格式是dd.mm.yy
。