以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  多个字段  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=159778)

--  作者:qazlinle6
--  发布时间:2021/1/8 11:34:00
--  多个字段
If e.Form.Controls("TextBox1").Text = "已进货"  Then    
    
    Forms("销进货品名明细").Controls("SplitContainer4").panel1.Collapsed = True
    Forms("销进货品名明细").Controls("SplitContainer4").panel2.Collapsed = False
    e.Form.Controls("TextBox1").Text = "已销售"       加个已退回 
Else
    Forms("销进货品名明细").Controls("SplitContainer4").panel1.Collapsed = False
    Forms("销进货品名明细").Controls("SplitContainer4").panel2.Collapsed = True
    
    e.Form.Controls("TextBox1").Text = "已进货 "       加个已退货

End If




--  作者:有点蓝
--  发布时间:2021/1/8 11:45:00
--  
11
[此贴子已经被作者于2021/1/8 11:44:59编辑过]

--  作者:有点蓝
--  发布时间:2021/1/8 11:45:00
--  
这个意思?e.Form.Controls("TextBox1").Text = "已销售,已退回 "       加个已退回