以文本方式查看主题

-  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=70511)

--  作者:qinlao666
--  发布时间:2015/6/23 16:18:00
--  控件判断问题
当打开窗口时,判断控件 textbox 1 是否为空,如果为空则 表允许修改,不为空则禁止修改,我在afterload事件中写如下代码,没效果
if e.form.controls("TextBox 1").Value is nothing then
datatables(“设计方案”).allowedit = TRUE
else
datatables(“设计方案”).allowedit = false
end if

请指教

--  作者:qinlao666
--  发布时间:2015/6/23 16:21:00
--  
当打开窗口时,判断控件 textbox 1 是否为空,如果为空则 窗口中其他绑定表的控件允许修改,不为空则禁止修改,我在afterload事件中写如下代码,没效果
if e.form.controls("TextBox 1").Value is nothing then
datatables(“设计方案”).allowedit = TRUE
else
datatables(“设计方案”).allowedit = false
end if

请指教

--  作者:Bin
--  发布时间:2015/6/23 16:22:00
--  
if e.form.controls("TextBox 1").Text = "" then
datatables(“设计方案”).allowedit = TRUE
else
datatables(“设计方案”).allowedit = false
end if

--  作者:qinlao666
--  发布时间:2015/6/23 16:26:00
--  
我改过TEXT,也不行
--  作者:qinlao666
--  发布时间:2015/6/23 16:27:00
--  
可以了


--  作者:Bin
--  发布时间:2015/6/23 16:27:00
--  
你调试一下看看.是值有问题.还是代码执行了没效果

你改用tables(“设计方案”).allowedit = False 看看

--  作者:jialihaha
--  发布时间:2015/6/23 16:28:00
--  
窗口初始化,控件都是空的
--  作者:Bin
--  发布时间:2015/6/23 16:29:00
--  
看6楼.调试一下就知道了.搞不定就上例子
--  作者:qinlao666
--  发布时间:2015/6/23 16:44:00
--  
老师代码还是不正确




--  作者:Bin
--  发布时间:2015/6/23 16:48:00
--  
看6楼.调试一下就知道了.搞不定就上例子