以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 记录窗口问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=121774) |
-- 作者:有点甜 -- 发布时间:2018/7/12 20:53:00 -- currentChanged事件,加入msgbox,能否弹出?
Dim r As Row = e.Table.current
msgbox(123)
If r IsNot Nothing Then
Tables("物料明细表").filter = ""
Dim i = Tables("物料明细表").findrow("料号=\'" & r("料号") & "\'")
msgbox(i)
If i >= 0 Then
Tables("物料明细表").Position = i
Else
Tables("物料明细表").filter = "1=2"
End If
Tables("入库主表").filter = ""
i = Tables("入库主表").findrow("物料编号=\'" & r("物料编号") & "\'")
msgbox(i)
If i >= 0 Then
Tables("入库主表").Position = i
Else
Tables("入库主表").filter = "1=2"
End If
End If
|
-- 作者:有点甜 -- 发布时间:2018/7/13 8:58:00 -- 1、msgbox弹出什么?
2、做个具体例子发上来测试。 |
-- 作者:有点甜 -- 发布时间:2018/7/13 9:23:00 -- 上传实例测试。 |
-- 作者:有点蓝 -- 发布时间:2018/7/13 20:08:00 -- 登录密码是什么? |
-- 作者:有点蓝 -- 发布时间:2018/7/13 22:45:00 -- 做什么操作出问题?说一下具体步骤 |
-- 作者:有点蓝 -- 发布时间:2018/7/14 9:29:00 -- 如果窗口表是副本,2个方法 2、窗口afterload,把记录窗口控件绑定窗口副本表 Dim rg As WinForm.RecordGrid = e.Form.Controls("入库主表") rg.Table = Tables("订单窗体_订单主表") rg.Build() |
-- 作者:有点蓝 -- 发布时间:2018/7/14 10:46:00 -- 代码没有用好,当然不稳定了。副本基本是一个独立的table,和主表有些用法是会同步,有些用法又是独立的。 http://www.foxtable.com/webhelp/scr/1906.htm,把窗口中的table这章内容好好看看
|