- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 查找赋值给窗口的文本框 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87992)
-- 发布时间：2016/7/24 13:25:00
-- 查找赋值给窗口的文本框
老师们 你好 麻烦抽个时间帮我解决如下问题 谢谢
从窗口输入病人的姓名，如果查找到该病人 则把病人相关信息表显示到窗口相关的文本框里，谢谢
此主题相关图片如下：22.png
-- 发布时间：2016/7/24 13:34:00
--
文本框连接字段名即可
-- 发布时间：2016/7/24 13:39:00
--
你好 那查找的代码如何写 对Foxtable代码不太懂 谢谢
-- 发布时间：2016/7/24 14:45:00
--
参考代码
Dim drs As List(Of DataRow) = DataTables("表A").Select("姓名 = \'" & e.form.controls("TextBox1").Text & "\'")
If drs.count > 0 Then
e.form.controls("TextBox60").Text = drs(0)("姓名")
e.form.controls("TextBox61").Text = drs(0)("性别")
Else
e.form.controls("TextBox60").Text = Nothing
e.form.controls("TextBox61").Text = Nothing
End If
-- 发布时间：2016/7/24 22:08:00
--
多谢 老师 按你的代码已经解决了 万分感谢
-- 发布时间：2016/7/25 0:05:00
--
建议不要用那么多TEXTBOX 控件，一个table 控件就可以解决问题
-- 发布时间：2016/7/29 10:46:00
--
谢谢 我试一下