vsflexgrid 的combox是否可以编辑？

fjm_520 2010-10-20 09:40:20

vsflexgrid 自带的combox好像只能选择下拉菜单的内容，不能修改。

有时候需要填写新内容，怎样让它能支持修改呢？

...全文

223 12 打赏收藏转发到动态举报

写回复

用AI写文章

12 条回复

切换为时间正序

请发表友善的回复…

发表回复

fjm_520 2010-10-22

打赏
举报

[Quote=引用 11 楼 king06 的回复:]
⊙﹏⊙b汗~
ColComboList属性中确实没有提到,ComboList里面提到了.
我1楼说法有误,都可以的.
[/Quote]

呵呵谢谢了以后多向你请教啊

king06 2010-10-22

打赏
举报

⊙﹏⊙b汗~
ColComboList属性中确实没有提到,ComboList里面提到了.
我1楼说法有误,都可以的.

fjm_520 2010-10-22

打赏
举报

[Quote=引用 9 楼 king06 的回复:]
To edit the cell using a drop-down list, set the ComboList property to a string containing the available options, separated by pipe characters ("|"). For example:

ComboList = "ListItem 1|ListItem……
[/Quote]

英文的看不懂哈

king06 2010-10-22

打赏
举报

To edit the cell using a drop-down list, set the ComboList property to a string containing the available options, separated by pipe characters ("|"). For example:

ComboList = "ListItem 1|ListItem 2".

To edit the cell using a drop-down combo, set the ComboList property to a string containing the available options, separated by pipe characters ("|") and starting with a pipe character. For example:

ComboList = "|ComboItem 1|ComboItem 2".

fjm_520 2010-10-22

打赏
举报

[Quote=引用 6 楼 king06 的回复:]
VSFlexGrid的帮助文档上有例子

VB code
.Editable = flexEDKbdMouse
.ComboList = "|#10*1;Getz" & vbTab & "Stan" & vbTab & "1 Sansome" & vbTab & "972-4323" & _
……
[/Quote]

终于知道怎么进行编辑了：如果 .ColComboList(1)="str1|str2|str3"，那么这个列combox的text是不可修改的；如果如果 .ColComboList(1)="|str1|str2|str3"，那么这列combox的text就是可以修改的，太神奇了！！！区别在于赋值的字符串前有没有"|"，怎么说明中就没有提到呢！！！

神马都能聊 2010-10-22

打赏
举报

[Quote=引用楼主 fjm_520 的回复:]
vsflexgrid 自带的combox好像只能选择下拉菜单的内容，不能修改。

有时候需要填写新内容，怎样让它能支持修改呢？
[/Quote]
绑定一个ComboBox控件到你的指定列，代码实现简单，编辑自由，日后维护也容易。

king06 2010-10-22

打赏
举报

VSFlexGrid的帮助文档上有例子

        .Editable = flexEDKbdMouse

        .ComboList = "|#10*1;Getz" & vbTab & "Stan" & vbTab & "1 Sansome" & vbTab & "972-4323" & _

                    "|#20;Mindelis" & vbTab & "Nuno" & vbTab & "2 5th" & vbTab & "972-2321" & _

                    "|#30;Davis" & vbTab & "Miles" & vbTab & "1 High" & vbTab & "345-2342" & _

                    "|#40;Johnson" & vbTab & "Bob" & vbTab & "5 Hemlock" & vbTab & "342-2321"



        .ShowComboButton = flexSBFocus



        .ComboSearch = flexCmbSearchLists '作用于drop-down lists

fjm_520 2010-10-22

打赏
举报

[Quote=引用 4 楼 patrickkong 的回复:]
Private Sub VSFlexGrid1_BeforeEdit(ByVal Row As Long, ByVal Col As Long, Cancel As Boolean)
If Row = 10 Then
VSFlexGrid1.ComboList = "|234|235"
Else
VSFlexGrid1.ComboList = "123|124"
En……
[/Quote]

这样还是不支持text内容的修改呀，只能通过鼠标选择list的项。
combobox控件有Style属性，0为可修改text内容，2为不可修改text内容。好像vsflexgrid的combox没法设置这个属性。

帝企鹅已被占用 2010-10-22

打赏
举报

Private Sub VSFlexGrid1_BeforeEdit(ByVal Row As Long, ByVal Col As Long, Cancel As Boolean)
If Row = 10 Then
VSFlexGrid1.ComboList = "|234|235"
Else
VSFlexGrid1.ComboList = "123|124"
End If
End Sub
colcombolist 一样

fjm_520 2010-10-22