以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于ComboBox控件输入方式的一个问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=174635)
--  作者：czy66ds
--  发布时间：2022/1/24 15:13:00
--  关于ComboBox控件输入方式的一个问题
对于ComboBox控件，如何实现下拉列表选项好用，而禁止直接在控件内输入内容的功能？
--  作者：cd_tdh
--  发布时间：2022/1/24 15:57:00
--  

应该只能代码实现，启用输入助手，输入后，和下拉列表比对，不是下拉列表内容就清空。

目前的功能不能又启用输入助手，又要和下来比对
--  作者：有点蓝
--  发布时间：2022/1/24 16:17:00
--  
窗口设计器，把控件【允许直接输入】设置为false
--  作者：cd_tdh
--  发布时间：2022/1/24 16:21:00
--  

允许直接输入禁用后就没法用输入助手了

测试了一下，在控件的Leave事件写代码判断，不知道对不对，好像用Contains有点问题，自己测试

e.Sender.ComboList = DataTables("表A").GetComboListString("第一列")
If e.Sender.ComboList.Contains(e.Sender.text) = False Then
    msgbox("不正确的数据")
    e.Sender.Text = ""
    e.cancel = True
End If

[此贴子已经被作者于2022/1/24 16:53:53编辑过]