以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]帮忙看下这个代码的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=22344)

--  作者:jiskin
--  发布时间:2012/8/9 16:09:00
--  [求助]帮忙看下这个代码的问题
如果入库编号换成另一个后 单价不会跟着变……

Dim tbl As Table = Tables("窗口1_Table1")
If tbl.Current IsNot Nothing Then
    Tables("出库").Current("入库编号") = tbl.Current("入库编号")
    Tables("出库").Current("单价") = tbl.Current("单价")
End If
Forms("窗口1").Close()


图片点击可在新窗口打开查看

--  作者:jiskin
--  发布时间:2012/8/9 16:22:00
--  
OK