vb.net DataGridView 数组元素定义不同的数据类型比如有字符串类型,整数类型,逻辑类型等,将初始值用数组元素赋值到指定的一列单元格内,每行后面带注释
时间: 2024-03-23 17:36:53 浏览: 48
DataGridView 显示数组中的元素
4星 · 用户满意度95%
可以通过定义一个包含对应列的属性的数据类,然后将数据列表转换为DataTable,最后将DataTable绑定到DataGridView中,并设置每个单元格的Value属性来实现。
假设我们有一个DataGridView控件名为dataGridView1,其中有三列分别为字符串类型、整数类型和逻辑类型,可以按照以下步骤进行操作:
1. 设置每列的数据类型和DataPropertyName属性:
```vb.net
' 字符串类型列
Dim column1 As New DataGridViewTextBoxColumn()
column1.HeaderText = "字符串"
column1.DataPropertyName = "StringColumn"
dataGridView1.Columns.Add(column1)
' 整数类型列
Dim column2 As New DataGridViewTextBoxColumn()
column2.HeaderText = "整数"
column2.DataPropertyName = "IntColumn"
column2.ValueType = GetType(Integer)
dataGridView1.Columns.Add(column2)
' 逻辑类型列
Dim column3 As New DataGridViewCheckBoxColumn()
column3.HeaderText = "逻辑"
column3.DataPropertyName = "BoolColumn"
dataGridView1.Columns.Add(column3)
```
2. 定义数据类,包含对应列的属性:
```vb.net
Public Class MyData
Public Property StringColumn As String
Public Property IntColumn As Integer
Public Property BoolColumn As Boolean
End Class
```
3. 定义数据数组,每个元素包含对应列的初始值:
```vb.net
' 定义数据数组
Dim dataArr As Object(,) = New Object(1, 2) {}
dataArr(0, 0) = "字符串1" ' 第一列为字符串类型
dataArr(0, 1) = 100 ' 第二列为整数类型
dataArr(0, 2) = True ' 第三列为逻辑类型
dataArr(1, 0) = "字符串2"
dataArr(1, 1) = 200
dataArr(1, 2) = False
```
4. 将数据数组转换为DataTable:
```vb.net
' 定义DataTable
Dim dt As New DataTable()
' 添加列
dt.Columns.Add("StringColumn", GetType(String))
dt.Columns.Add("IntColumn", GetType(Integer))
dt.Columns.Add("BoolColumn", GetType(Boolean))
' 添加行
For i As Integer = 0 To dataArr.GetLength(0) - 1
Dim row As DataRow = dt.NewRow()
row("StringColumn") = dataArr(i, 0)
row("IntColumn") = dataArr(i, 1)
row("BoolColumn") = dataArr(i, 2)
dt.Rows.Add(row)
Next
```
5. 将DataTable绑定到DataGridView中,并设置每个单元格的Value属性:
```vb.net
' 绑定数据到DataGridView
dataGridView1.DataSource = dt
' 设置第一行第一列单元格的值为"字符串1"
dataGridView1.Rows(0).Cells("StringColumn").Value = "字符串1"
' 设置第二行第一列单元格的值为"字符串2"
dataGridView1.Rows(1).Cells("StringColumn").Value = "字符串2"
' 设置第一行第二列单元格的值为100
dataGridView1.Rows(0).Cells("IntColumn").Value = 100
' 设置第二行第二列单元格的值为200
dataGridView1.Rows(1).Cells("IntColumn").Value = 200
' 设置第一行第三列单元格的值为True
dataGridView1.Rows(0).Cells("BoolColumn").Value = True
' 设置第二行第三列单元格的值为False
dataGridView1.Rows(1).Cells("BoolColumn").Value = False
```
通过以上步骤,可以实现DataGridView中不同列的数据类型定义和初始值的赋值。
阅读全文