Foxtable(狐表)用户栏目专家坐堂 → [求教]窗口文本框条件查找


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

主题:[求教]窗口文本框条件查找

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


加好友 发短信
等级:幼狐 帖子:109 积分:1074 威望:0 精华:0 注册:2019/1/16 22:56:00
[求教]窗口文本框条件查找  发帖心情 Post By:2019/7/27 2:10:00 [只看该作者]

老师,我制作一窗口如图一,有DB1下拉控件,对账按钮,文本框TB11,TB12.我的目的是,在DP1中选择客户名称后,点击对账按钮,使得TB11和TB12按DP1的客户名称在表“销售档案“(图二)中,找到相应的“销档编号”列和“吉文”列的值,效果图如图三,还有就是如果TB12查找到的值为√,则显示“吉文”,值为空时,则显示“白塔”,希望老师能帮忙写个代码,谢谢!
图一

图片点击可在新窗口打开查看此主题相关图片如下:20190727001.jpg
图片点击可在新窗口打开查看
图二

图片点击可在新窗口打开查看此主题相关图片如下:20190727003.jpg
图片点击可在新窗口打开查看
图三

图片点击可在新窗口打开查看此主题相关图片如下:20190727002.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2019/7/27 2:10:20编辑过]

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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/7/27 9:18:00 [只看该作者]

dim dr as datarow = datatables("销售档案").find("销售客户名称='" & e.form.controls("DB1").text & "'")
if dr isnot nothing then
    e.form.controls("TB11").text = dr("销档编号")
    e.form.controls("TB12").text = IF(dr("吉文")="","吉文","白塔")
end if

 回到顶部