以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求教]窗口文本框条件查找  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=138277)

--  作者:hcfbehero
--  发布时间: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编辑过]

--  作者:有点蓝
--  发布时间: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