以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 通过窗口对二个表的数据进行编辑 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=85393) |
-- 作者:大红袍 -- 发布时间:2016/5/24 21:57:00 -- Dim idx1 As Integer = Tables("表a").FindRow("工程名称 = \'" & e.form.Controls("Combobox1").Text & "\'") Dim idx2 As Integer = Tables("表b").FindRow("工程名称 = \'" & e.form.Controls("Combobox1").Text & "\'") If idx1 >= 0 Then If idx2 >= 0 Then [此贴子已经被作者于2016/5/25 14:08:27编辑过]
|
-- 作者:Hyphen -- 发布时间:2016/5/25 8:20:00 -- 查询按钮事件 |
-- 作者:大红袍 -- 发布时间:2016/5/25 14:08:00 -- Dim idx1 As Integer = Tables("表a").FindRow("工程名称 = \'" & e.form.Controls("Combobox1").Text & "\'") Dim idx2 As Integer = Tables("表b").FindRow("工程名称 = \'" & e.form.Controls("Combobox1").Text & "\'") If idx1 >= 0 Then If idx2 >= 0 Then |