16,554
社区成员
发帖
与我相关
我的任务
分享
Private Sub dv1_CellContentClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles dv1.CellContentClick
If e.RowIndex < 0 Then
Exit Sub
End If
If dv1.Columns(e.ColumnIndex).Name = "c1" Then
ElseIf dv1.Columns(e.ColumnIndex).Name = "c2" Then
Dim str As String = ""
For i As Short = 0 To dv1.Rows.Count - 1
If dv1.Rows(i).Cells("c2").Value = True Then
str = str & 1
Else
str = str & 0
End If
Next
MsgBox(str)'他的输出结果永远慢一拍
End If
End Sub