vb.net DataGridView有多个逗号分隔的字符串,例如"John,Doe,25,Programmer"、"Alice,Wonderland,30,Designer"、"Bob,Smith,40,Engineer",分别赋值到指定索引几行单元格,自动增加行,每行代码带注释
时间: 2023-07-19 17:43:00 浏览: 93
下面是一个示例代码,可以将多个逗号分隔的字符串分别赋值到指定索引几行单元格,并自动增加行。每行代码都带有注释:
```vb.net
' 创建一个列表,用于存储逗号分隔的字符串
Dim data As List(Of String) = New List(Of String)()
' 添加逗号分隔的字符串
data.Add("John,Doe,25,Programmer")
data.Add("Alice,Wonderland,30,Designer")
data.Add("Bob,Smith,40,Engineer")
' 获取 DataGridView 控件
Dim dataGridView As DataGridView = Me.DataGridView1
' 获取当前行数
Dim rowCount As Integer = dataGridView.Rows.Count
' 自动增加行
dataGridView.Rows.Add(data.Count)
' 遍历逗号分隔的字符串列表
For i As Integer = 0 To data.Count - 1
' 将逗号分隔的字符串分隔成一个字符串数组
Dim values As String() = data(i).Split(","c)
' 遍历字符串数组,将每个字符串赋值到指定的单元格中
For j As Integer = 0 To values.Length - 1
' 获取要赋值的单元格
Dim cell As DataGridViewCell = dataGridView.Rows(rowCount + i).Cells(j)
' 将字符串赋值到单元格
cell.Value = values(j)
Next
Next
```
这段代码中,我们首先创建一个列表,用于存储逗号分隔的字符串。然后,我们获取 `DataGridView` 控件,并自动增加行数。接着,我们遍历逗号分隔的字符串列表,将每个字符串分隔成一个字符串数组,并遍历字符串数组,将每个字符串赋值到指定的单元格中。最后,我们将每个逗号分隔的字符串赋值到指定的行中。
阅读全文