Foxtable(狐表)用户栏目专家坐堂 → 关于自定义录入界面的取数问题


  共有3901人关注过本帖平板打印复制链接

主题:关于自定义录入界面的取数问题

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


加好友 发短信
等级:幼狐 帖子:173 积分:1122 威望:0 精华:0 注册:2020/8/20 14:33:00
关于自定义录入界面的取数问题  发帖心情 Post By:2022/5/23 12:17:00 [只看该作者]

2、将窗口的DropDownOpened事件代码设置为:

Dim txt As String = e.Form.DropDownBox.Text
Dim
tbl As Table = Tables("窗口1_Table1")
If
txt = "" Then
   
tbl.Filter = ""
Else

    txt =
"'%" & txt & "%'"
    tbl.Filter =
"客户ID Like " & txt & " Or 公司名称 Like " & txt & " Or 地址 Like " & txt & " Or 联系人 Like " & txt
End
If
e.Form.DropDownBox.
Select()
'将输入焦点返回下拉列表框

这样下拉窗口显示后,会自动根据下拉列表框的内容,筛选出可能的客户,并将输入焦点返回到下拉列表框。




按照如上只能找到table里面的内容,因为我的表做了分页,请教一下我该怎么修改,能查到对应的全部内容


 回到顶部