vb.net求教把datatable的值输出成二维数组

发布网友发布时间：2022-08-20 18:36

共3个回答

热心网友时间：2023-09-10 03:37

我觉得你这么做有问题
其实只要用for 循环把datatable的值一个个取出来计算
然后把结果保存在一个数组里面久可以了
很简单的

热心网友时间：2023-09-10 03:38

Dim peopleCount As Integer '总人数
Dim recordCount As Integer '记录数
recordCount = DataSet1.Tables(0).Rows.Count
Dim datatable(recordCount - 1, 1) As String '定义二维数组
Dim i As Integer
For i = 0 To recordCount - 1
datatable(i, 0) = DataSet1.Tables(0).Rows(i)(0) '存人数
datatable(i, 1) = DataSet1.Tables(0).Rows(i)(1) '存名字
peopleCount += CInt(datatable(i, 0)) '计算总人数，以便后面计算概率
Next
For i = 0 To recordCount - 1
MsgBox(datatable(i, 1) + "出现的概率是：" + datatable(i, 0) / peopleCount)
Next

热心网友时间：2023-09-10 03:38

这题就是用for
循环
把datatable
的值一个个取出来计算
然后把算出来的结果保存在数组里面就可以了
很简单