求,二维数组与datatable和datagridview之间的配合。
'数据源,这个不源于跨平台的数据,通过远程获取而来,一个\代表一个记录集
dim strdata as string="A|B|C|D|E|F|G|H|I\AA|BB|CC|DD|EE|FF|GG|HH|II"
'data控件名称
DataGridView1,这里面有9个字段
需求:
我想把strdara里面的数据分成多行(这里只有一个\,所以只需要两行)显示在 DataGridView1 里面,求解。
要求:循环的时候用 For Each
另,请贴出完整的测试代码。
[解决办法]
手动写的代码,没测试,你试试吧
dim dt as new DataTable("Table1")
for i as integer=1 to 9 '增加9列
dt.Columns.Add(new DataColumn("列" & i))
next
dim strdata as string="A
[解决办法]
B
[解决办法]
C
[解决办法]
D
[解决办法]
E
[解决办法]
F
[解决办法]
G
[解决办法]
H
[解决办法]
I\AA
[解决办法]
BB
[解决办法]
CC
[解决办法]
DD
[解决办法]
EE
[解决办法]
FF
[解决办法]
GG
[解决办法]
HH
[解决办法]
II"
dim arrData() as string=strdata.Split("")
for each data as string in arrData '行循环
dim arr() as string=data.Split("
[解决办法]
")
dim dr as datarow = dt.NewRow()
for i as integer=0 to 8 '列赋值
dr(i)=arr(i)
next
dt.Rows.Add(dr)
next
'绑定到datagridview上
dataGridView1.DataSource = dt
dataGridView1.AutoGenerateColumns = true