以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]请问,以下控件按钮“打印”的代码应该怎么写? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=143453) |
||||
-- 作者:fengwenliuyan -- 发布时间:2019/11/25 16:07:00 -- [求助]请问,以下控件按钮“打印”的代码应该怎么写? 请问,以下控件按钮“打印”的代码应该怎么写? 若“结算”列显示为“记账”或者“月结”,且“打印”列为true的所有行, 单击控件按钮“打印”时,则打开“窗口1”。 若“结算”列显示为“现金”或内容为空,且“打印”列为false的所有行, 单击控件按钮“打印”时,则打开“窗口2”。
|
||||
-- 作者:有点蓝 -- 发布时间:2019/11/25 16:21:00 -- 例如 Dim r As Row = Tables("出库表窗口_出库表").Current If r IsNot Nothing Then If (r("结算") = "记账" OrElse r("结算") = "月结") AndAlso r("打印") = True Forms("窗口1").Open elseIf (r("结算") = "现金" OrElse r.isnull("结算")) AndAlso r("打印") = false Forms("窗口2").Open End If End If |
||||
-- 作者:fengwenliuyan -- 发布时间:2019/11/25 16:29:00 -- 回复:(有点蓝)例如Dim r As Row = Tables("出库表窗... 谢谢老师 |