|
■No43626 (カッキー さん) に返信
> どこが悪いのでしょうか、どなたかご教示下さい。
Dim aryUriageNo() As Integer
Dim alUriageNo As ArrayList
aryUriageNo = Nothing
alUriageNo = New ArrayList
alUriageNo.Clear()
For i = 0 To DataGridView1.RowCount - 1
If DataGridView1.Rows(i).Cells(10).Value = True Then
alUriageNo.Add(CInt(DataGridView1.Rows(i).Cells(1).Value)) '伝票番号
End If
Next
aryUriageNo = CType(alUriageNo.ToArray(GetType(Integer)), Integer())
こんなんで如何?
以上。
|