- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 窗口中表及记录控件同步 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=115480)
-- 发布时间：2018/3/7 21:36:00
-- 窗口中表及记录控件同步
请问：窗体中，表空间与另一个记录同步如何 实现，下述代码报错，是什么原因。
Dim txt As String = form("计量到期及台帐").Table1 "校准编号"
Dim tbl As Table = Tables("计量台帐")
txt = "\'%" & txt & "%\'"
tbl.Filter = "校准编号 Like " & txt & " Or 校准名称 Like " & txt
-- 发布时间：2018/3/7 22:07:00
--
Dim txt As String = forms("计量到期及台帐").controls("Table1").Table.Current("校准编号")
msgbox(txt)
Dim tbl As Table = Tables("计量台帐")
txt = "\'%" & txt & "%\'"
tbl.Filter = "校准编号 Like " & txt & " Or 校准名称 Like " & txt
-- 发布时间：2018/3/8 21:38:00
--
将这个代码放到了窗体中，可是执行中没有反应，在命令窗口发现报错。
请费心。
-- 发布时间：2018/3/8 21:39:00
--
此主题相关图片如下：未命名图片.png
-- 发布时间：2018/3/8 22:13:00
--
1、这个代码弹出什么？msgbox(txt)
2、请上传具体foxtable项目说明你要做的功能。
-- 发布时间：2018/3/9 23:31:00
--
信息见附件。
此主题相关图片如下：未命名图片.png
-- 发布时间：2018/3/10 8:46:00
--
涉及到代码的要把代码文字也贴出来，方便别人修改
使用到current的地方都需要判断一下是否为空值
If Tables("订单").Current IsNot Nothing Then
Output.Show(Tables("订单").Current("客户"))
End If
Output.Show(Tables("订单").Current("客户"))
End If