以文本方式查看主题

-  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
--  [求助]多条件公式


图片点击可在新窗口打开查看此主题相关图片如下:捕获.png
图片点击可在新窗口打开查看

当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的发言:
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

搞错了,以为是不为空. 4楼正解