タイトル : Re^5: dataTable 2 配列 投稿日 : 2013/06/14(Fri) 08:19 投稿者 : ルトケ
ありがとうございます。自己レスです。以下のコードで 走りました。 Dim dt As New DataTable dt.Columns.Add(): dt.Columns.Add() dt.Rows.Add(0, 2): dt.Rows.Add(1, 3):dt.Rows.Add(2, 6) Dim numbers As New List(Of Integer) For Each row As DataRow In dt.Rows numbers.Add(row(1)) Next Dim result As Single, i As Integer For i = 0 To 2 Step 1 result += numbers(i) Next i MsgBox("average: " & CStr(result / 3)) |