例1************************************* Private Sub SBAN_STOCK() Dim i As Integer Dim j As Integer Dim selectCol As DataGridItem Dim bookid As Integer Dim CheckBoxInStock As CheckBox
Dim a(100) As Integer j = 0 For i = 0 To DataGrid1.Items.Count - 1 selectCol = DataGrid1.Items(i) CheckBoxInStock = CType(selectCol.FindControl("CheckBox1"), CheckBox)
If CheckBoxInStock.Checked = True Then a(j) = CInt(selectCol.Cells(8).Text) j = j + 1 'reDim Preserve a(8) As Integer End If Next i ****************************************
例2************************************ Dim selectCol As DataGridItem Dim CheckBoxInStock As CheckBox Dim i As Integer
For i = 0 To Application("OF注文トラン").Tables("OF注文トラン").Rows.Count() - 1
分類:[ASP.NET]
久しぶりのご質問です。
いつも皆様のご意見を参考にさせていただいています。
今回の内容ですが、
DataGridにテンプレートでCheckBoxを使用しています。
ある処理をされたときにCheckBox.Checkedを判別したいのですが、
Trueになっているはずのレコードが、Falseになってしまいます。
同様の作業をしている例1と例2ですが、
例1ではうまくいっているのですが、例2では全てがFalseになってしまいます。
どなたかご教授ください。
Application("OF注文トラン")にデータがあることは確認済みです。
例2ではFLG_Check が何度も書き換わり、意味がないようですが、
サンプルを作成する都合上です。ご了承ください。
例1*************************************
Private Sub SBAN_STOCK()
Dim i As Integer
Dim j As Integer
Dim selectCol As DataGridItem
Dim bookid As Integer
Dim CheckBoxInStock As CheckBox
Dim a(100) As Integer
j = 0
For i = 0 To DataGrid1.Items.Count - 1
selectCol = DataGrid1.Items(i)
CheckBoxInStock = CType(selectCol.FindControl("CheckBox1"), CheckBox)
If CheckBoxInStock.Checked = True Then
a(j) = CInt(selectCol.Cells(8).Text)
j = j + 1
'reDim Preserve a(8) As Integer
End If
Next i
****************************************
例2************************************
Dim selectCol As DataGridItem
Dim CheckBoxInStock As CheckBox
Dim i As Integer
For i = 0 To Application("OF注文トラン").Tables("OF注文トラン").Rows.Count() - 1
selectCol = DataGrid1.Items(i)
CheckBoxInStock = CType(selectCol.FindControl("CheckBox2"), CheckBox)
If CheckBoxInStock.Checked = True Then
FLG_Check = True
Else
FLG_Check = False
End If
NEXT
****************************************