Question

我需要一个复选框列表，我可以添加只读项目（因此使用列表视图，这样我就可以使项目灰显并让用户不选择它）。

但是，当我点击该项目时，该复选框不会切换。但是当我将以下代码添加到项目点击事件时，

Private Sub LVSubFiles_Click(sender As Object, e As EventArgs) Handles LVSubFiles.Click
        If LVSubFiles.Items(LVSubFiles.FocusedItem.Index).ForeColor <> Drawing.Color.Gray Then
            If LVSubFiles.Items(LVSubFiles.FocusedItem.Index).Checked = True Then
                LVSubFiles.Items(LVSubFiles.FocusedItem.Index).Checked = False
            Else
                LVSubFiles.Items(LVSubFiles.FocusedItem.Index).Checked = True
            End If
        End If
End Sub

但在这种情况下，当用户点击复选框而不是项目时，没有任何反应，选择任何其他复选框也会检查突出显示的项目和所选新项目的复选框。

有没有办法让这些项目像复选框一样？我尝试过使用数据网格视图，但我遇到了类似的问题，很多代码都是基于这个列表视图的操作。

Answer 1

对于那些发现此问题的人。我最终选择了一个隐藏的列来跟踪“只读”项目。每当列表更新时，只读标签都会将该项变为灰色，但仍可以对其进行检查。

关于列表与用户的交互方式，我将操作项移到了两个类别中，这似乎运行得很顺利。无论单击项目的哪个部分，用户都可以单击选择/取消选择。

Private Sub dgvSubFiles_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgvSubFiles.CellContentClick
    If dgvSubFiles(dgvSubFiles.Columns("chkSubFiles").Index, dgvSubFiles.CurrentCell.RowIndex).Value = True Then
        dgvSubFiles(dgvSubFiles.Columns("chkSubFiles").Index, dgvSubFiles.CurrentCell.RowIndex).Value = False
    Else
        dgvSubFiles(dgvSubFiles.Columns("chkSubFiles").Index, dgvSubFiles.CurrentCell.RowIndex).Value = True
    End If
End Sub

Private Sub dgvSubFiles_SelectionChanged(sender As Object, e As EventArgs) Handles dgvSubFiles.SelectionChanged
    dgvSubFiles.ClearSelection()
End Sub

使用复选框制作列表视图就像复选框列表

1 个答案: