Foxtable(狐表)用户栏目专家坐堂 → 列设置了下拉窗口,但是用在窗口中的“记录窗口”无效,怎么解决?


  共有3060人关注过本帖树形打印复制链接

主题:列设置了下拉窗口,但是用在窗口中的“记录窗口”无效,怎么解决?

帅哥哟,离线,有人找我吗?
erdbeer
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:445 积分:4777 威望:0 精华:0 注册:2010/4/11 14:09:00
列设置了下拉窗口,但是用在窗口中的“记录窗口”无效,怎么解决?  发帖心情 Post By:2015/10/15 1:03:00 [只看该作者]

列设置了下拉窗口,在表中已经可以用了,但是用在窗口中的“记录窗口”无效,怎么解决?

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/15 9:39:00 [只看该作者]

测试了一下,只要表名写对,就一定有效。

 

Tables("表名,可能是副本表").cols("第一列").DropForm = "窗口2"


 回到顶部
帅哥哟,离线,有人找我吗?
erdbeer
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:445 积分:4777 威望:0 精华:0 注册:2010/4/11 14:09:00
  发帖心情 Post By:2015/10/15 19:34:00 [只看该作者]

在记录窗口中,输入数据后,下拉窗口不会打开

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

[此贴子已经被作者于2015/10/15 19:33:58编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/15 19:37:00 [只看该作者]

If e.Col.Name = "第一列" Then '如果编辑的是客户ID列
    If e.Col.DroppedDown = False '且下拉窗口没有打开
        Sendkeys.Send("{F4}")
    End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
erdbeer
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:445 积分:4777 威望:0 精华:0 注册:2010/4/11 14:09:00
  发帖心情 Post By:2015/12/29 22:24:00 [只看该作者]

 

想要在记录窗口输入内容时自动打开下拉窗口,该怎么做啊?


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/12/29 22:59:00 [只看该作者]

原本的代码,改成4楼代码,就行啊。

 回到顶部
帅哥哟,离线,有人找我吗?
erdbeer
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:445 积分:4777 威望:0 精华:0 注册:2010/4/11 14:09:00
  发帖心情 Post By:2015/12/29 23:59:00 [只看该作者]

 

是的,这样可以打开,就是有个问题,假如我想输入的是12

 

现在是输入1的时候打开下拉窗口,再输入12才可以,

 

等于是我要输入112才行,第一个字母被截掉了,在表中和记录窗口都是这个情况


 回到顶部
帅哥哟,离线,有人找我吗?
erdbeer
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:445 积分:4777 威望:0 精华:0 注册:2010/4/11 14:09:00
  发帖心情 Post By:2015/12/30 0:07:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:录入界面之三.foxdb

例子在这里,另外,我要是想在TextBox中实现这个更能呢,可以做吗?该在哪里设置代码?


 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/12/30 8:49:00 [只看该作者]

以下是引用erdbeer在2015/12/29 23:59:00的发言:
 

是的,这样可以打开,就是有个问题,假如我想输入的是12

 

现在是输入1的时候打开下拉窗口,再输入12才可以,

 

等于是我要输入112才行,第一个字母被截掉了,在表中和记录窗口都是这个情况


取巧的方法:

If e.Col.Name = "客户ID" Then '如果编辑的是客户ID列

    If e.Col.DroppedDown = False '且下拉窗口没有打开

         Sendkeys.Send("{F4}")

        Sendkeys.Send("{RIGHT}")

 '   e.Col.OpenDropDown() '打开下拉窗口

    End If

End If


 回到顶部
帅哥哟,离线,有人找我吗?
Hyphen
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/12/30 8:54:00 [只看该作者]


 回到顶部
总数 11 1 2 下一页