以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]多条件公式 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=54353) |
-- 作者:荟美绘姿 -- 发布时间:2014/7/26 10:42:00 -- [求助]多条件公式 当textbox10与textbox11这两个文本框都为空时,则textbox13中的内容为"结案" 请教这个代码应该如何写 谢谢大侠们! |
-- 作者:荟美绘姿 -- 发布时间:2014/7/26 10:54:00 -- 跪求 |
-- 作者:Bin -- 发布时间:2014/7/26 11:10:00 -- if e.form.controls("textbox10").text<>"" andalso e.form.controls("textbox11").text<>"" then e.form.controls("textbox13").text="结案"
end if |
-- 作者:ybmjy -- 发布时间:2014/7/26 11:16:00 -- Dim tx1 As WinForm.TextBox =e.Form.Controls("TextBox10") Dim tx2 As WinForm.TextBox = e.Form.Controls("TextBox11") Dim tx3 As WinForm.TextBox = e.Form.Controls("TextBox13") If tx1.text ="" And tx2.text="" Then tx3.text = "结案" End If |
-- 作者:Bin -- 发布时间:2014/7/26 11:30:00 -- 以下是引用ybmjy在2014-7-26 11:16:00的发言:
搞错了,以为是不为空. 4楼正解
Dim tx1 As WinForm.TextBox =e.Form.Controls("TextBox10") Dim tx2 As WinForm.TextBox = e.Form.Controls("TextBox11") Dim tx3 As WinForm.TextBox = e.Form.Controls("TextBox13") If tx1.text ="" And tx2.text="" Then tx3.text = "结案" End If |