以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  要想"表窗口_入库订单表"为空行时,则按钮本次点击无效,应该怎么改?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=134220)

--  作者:fengwenliuyan
--  发布时间:2019/4/30 11:03:00
--  要想"表窗口_入库订单表"为空行时,则按钮本次点击无效,应该怎么改?
以下按钮控件的代码,要想"仓管表窗口_入库订单表"为空行时,则按钮本次点击无效,应该怎么改?

Dim t As Table =  Tables("表窗口_入库订单表")
Dim dr As Row = Tables("表窗口_入库明细表").AddNew()
dr("客户") = t.current("客户")

--  作者:有点甜
--  发布时间:2019/4/30 11:24:00
--  
Dim t As Table =  Tables("表窗口_入库订单表")
If t.current("客户") = nothing andalso t.current("产品") = nothing then return
Dim dr As Row = Tables("表窗口_入库明细表").AddNew()
dr("客户") = t.current("客户")