以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]条件解除  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=54714)
--  作者：荟美绘姿
--  发布时间：2014/8/2 22:46:00
--  [求助]条件解除


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

 

当"处理环节"等于"已提交"时,"案号"和"处罚金额"这两个文本框才能输入,否则这两个文本框就不能输入.

 

这个代码如何编写,在何处编写?

请大侠们指教,谢谢.
--  作者：y2287958
--  发布时间：2014/8/2 22:59:00
--  
http://www.foxtable.com/help/topics/0605.htm
看这里
--  作者：荟美绘姿
--  发布时间：2014/8/2 23:10:00
--  
2楼的,你所说的是对表中的行和列,我所要的是在窗口
--  作者：hws005
--  发布时间：2014/8/3 0:59:00
--  

If e.Col.Name = "处理环节"
    If e.Row("处理环节") = "已提交"
        e.Form.Controls("案号").Enabled = True
        e.Form.Controls("处罚金额").Enabled = True
    Else
        e.Form.Controls("案号").Enabled = False
        e.Form.Controls("处罚金额").Enabled = False
    End If
End If
--  作者：hws005
--  发布时间：2014/8/3 1:04:00
--  

Dim cl  As WinForm.TextBox = e.Form.Controls("处理环节")
If cl.Value = "已提交"
        e.Form.Controls("案号").Enabled = True
        e.Form.Controls("处罚金额").Enabled = True
    Else
        e.Form.Controls("案号").Enabled = False
        e.Form.Controls("处罚金额").Enabled = False
    End If
End If

 

看看哪个是你要的