再會！
有以下格式的 .csv 文本檔案：
Fred Smith|f.smith|engineer|21.12.2021
Ben Taylor|b.taylor|programmer|23.12.2021
Bill Davis|b.davis|programmer|19.12.2021
Steve Harris|s.harris|engineer|23.12.2021
Tom Walker|t.walker|engineer|23.12.2021
使用以下代碼，我將文本檔案中的資料顯示到 DataGridView 中：
Dim list() As String = IO.File.ReadAllLines("D:\UserList.csv", System.Text.Encoding.Default)
For i = 0 To UBound(list)
DataGridView1.Rows.Add()
Dim data() As String = Split(list(i), "|")
For j = 0 To UBound(data) - 1
DataGridView1.Item(j, i).Value = data(j)
Next
Next
告訴我如何在文本檔案中的 datagridview 中僅顯示文本檔案行中指示特定日期的那些員工？
例如：指定日期 - 23.12.2021 在 DataGridView 中，我希望顯示以下結果：
Ben Taylor|b.taylor|programmer|23.12.2021
Steve Harris|s.harris|engineer|23.12.2021
Tom Walker|t.walker|engineer|23.12.2021
請告訴我如何在 DataGridView 中顯示文本檔案中的資料之前進行這樣的選擇？但是，不要洗掉文本檔案中的這些行。
uj5u.com熱心網友回復：
對于 j = 0 到 UBound(data)-1
在加入列的日期之前回圈運行，以便資料不會添加到網格中，因此我洗掉了 -1。
新行的實際問題應指定行號和列號，如下代碼所示。
Dim list() As String = IO.File.ReadAllLines("D:\UserList.csv", System.Text.Encoding.Default)
For i = 0 To UBound(list)
DataGridView1.Rows.Add()
Dim data() As String = Split(list(i), "|")
For j = 0 To UBound(data)
'DataGridView1.Item(j, i).Value = data(j)
DataGridView1.Rows(i).Cells(j).Value = data(j)
Next
Next
uj5u.com熱心網友回復：
有幾種方法可用。如果您將資料放入實作 IBindingListView 介面的東西中，例如 DataTable，那么您可以使用 Filter 屬性。相關檔案：
uj5u.com熱心網友回復：
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
Dim pattern As String = "23.12.2021"
Dim Path As String = "D:\UserList.csv"
Dim _row As String
Dim separator As Char = "|"
For Each _row In File.ReadAllLines(Path, Encoding.Default)
If _row.Contains(pattern) Then
DataGridView1.Rows.Add(_row.Split(separator))
End If
Next _row
End Sub
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/391104.html
上一篇：Outlook上的Html電子郵件<hr>樣式問題？
下一篇：python網路抓取資料到csv