DevExpress.XtraEditors.Repository.RepositoryItemCheckedComboBoxEdit 下拉框复选后可以修改选择结果、可手工录入、可选择

原创

于 2018-11-01 15:48:13 发布 · 3.1k 阅读

2 ·

CC 4.0 BY-SA版权

文章标签：

#CheckedComboBoxEdit #DevExpress #下拉复选框

 Dim repositoryItemCheckedComboBox As DevExpress.XtraEditors.Repository.RepositoryItemCheckedComboBoxEdit

 repositoryItemCheckedComboBox = New DevExpress.XtraEditors.Repository.RepositoryItemCheckedComboBoxEdit()
        With repositoryItemCheckedComboBox
            .Name = "GVcolEditorCheckedComboBox"
            .AutoHeight = False
            .BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
        End With
        GridControl.RepositoryItems.Add(repositoryItemCheckedComboBox)

 '鼠标按下事件
    Private Sub GridView_MainMaterial_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles GridView_MainMaterial.MouseDown
        With Me.GridView_MainMaterial
            If .RowCount = 0 Then Exit Sub
            If .FocusedRowHandle < 0 Then Exit Sub

            '部位下拉框可多选
            If .FocusedColumn.FieldName.ToUpper = "Part".ToUpper Then
                '.C