以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何自动将CTRL + ENTER 写入代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=1941)

--  作者:狐哥
--  发布时间:2009/2/26 14:01:00
--  [求助]如何自动将CTRL + ENTER 写入代码

2、高级筛选功能

前面提到的自动筛选功能,只能筛选出以输入字符开始的项目。
如果需要筛选出包括输入字符的项目,可以按“Ctrl + Enter"键。
例如下图中,我们输入“贸易”二字,然后按“Ctrl + Enter"键,即可自动列出所有包括“贸易”二字的项目供选择。



请问如下代码,如何自动将CTRL + ENTER 写入代码

If e.IsFocusCell Then \'如果是焦点单元格
    If e.Col.Name = "公司简称" Then
        If e.Row.IsNull("费用关联") Then
            e.Col.Combolist = ""
        Else
            e.Col.Combolist = DataTables("客户与供应商").GetComboListString("客户简称")
        End If
   end if


--  作者:czy
--  发布时间:2009/2/26 14:20:00
--  

ChangeEdit事件中设置:Sendkeys.Send("^{Enter}") 试试。


--  作者:狐哥
--  发布时间:2009/2/26 14:28:00
--  
以下是引用czy在2009-2-26 14:20:00的发言:

ChangeEdit事件中设置:Sendkeys.Send("^{Enter}") 试试。

试了,但一进入后不能编辑,你试试,如我要在单元格内先写入: 好,没写完就跑了


--  作者:czy
--  发布时间:2009/2/26 14:33:00
--  
将1楼的代码放到PrepareEdit事件中,将我的代码放到ChangeEdit事件中应该不会跑的。
--  作者:狐哥
--  发布时间:2009/2/26 14:44:00
--  
以下是引用czy在2009-2-26 14:33:00的发言:
将1楼的代码放到PrepareEdit事件中,将我的代码放到ChangeEdit事件中应该不会跑的。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:跨表统计.table


帮看看,一是选择写入不了,二是只能录一个字就触发了.
--  作者:czy
--  发布时间:2009/2/26 15:04:00
--  
以下是引用狐哥在2009-2-26 14:44:00的发言:

 下载信息  [文件大小:448.0 KB  下载次数:0]
图片点击可在新窗口打开查看点击浏览该文件:跨表统计.table


帮看看,一是选择写入不了,二是只能录一个字就触发了.


是有这种情况,看来还很难解决。


--  作者:狐哥
--  发布时间:2009/2/26 15:18:00
--  
呵,只能手动了
--  作者:狐狸爸爸
--  发布时间:2009/2/26 15:40:00
--  
要不我家一个方法,可编码强制下拉?
--  作者:狐哥
--  发布时间:2009/2/26 16:41:00
--  

呵呵,感谢,ComboBox中也写一个,呵呵,列表项目太多时,真不好选.