Protected Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
With Repeater1
Dim chkSelect As CheckBox = CType(.Items(1).FindControl("chkSelect"), CheckBox)
chkSelect.Checked = True
End With
End Sub
----------------------------------------------------
----------------------------------------------------
อีกตัวอย่างนะครับ คือ เป็นการวนรอบ ในการเรียกค่าจาก Web control ในแต่ละแถว
Protected Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
With Repeater10
Dim i As Integer
For i = 0 To .Items.Count - 1
Dim chkSelect As CheckBox = CType(.Items(i).FindControl("chkSelect"), CheckBox)
Dim chk As String = chkSelect.Checked
Next
End With
End Sub
ไม่มีความคิดเห็น:
แสดงความคิดเห็น