以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  有这个问题中  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=9660)

--  作者:dd-zdh
--  发布时间:2011/4/30 15:41:00
--  有这个问题中
我想只要输入同意后不管后面接什么别的字符,都能编辑第列,如果是不同意就不能编辑
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目76.table


--  作者:lihe60
--  发布时间:2011/4/30 16:07:00
--  

if e.oldvalue like "*同意*"=fase

e.cancel=true

end if

 


--  作者:lihe60
--  发布时间:2011/4/30 16:11:00
--  

if e.newvalue like "同意*" or e.oldvalue like "同意*"

else

e.cancel=true

end if

if e.newvalue like "不同意*" or e.oldvalue like "不同意*"

e.cancel=true

end if

[此贴子已经被作者于2011-4-30 16:15:48编辑过]

--  作者:lihe60
--  发布时间:2011/4/30 16:36:00
--  
If e.newvalue Like "同意*" Or e.oldvalue Like "同意*"
Else
    e.newvalue="不同意"
End If

--  作者:lihe60
--  发布时间:2011/4/30 16:37:00
--  

select case e.datacol.name

case "第一列"

If e.newvalue Like "同意*" Or e.oldvalue Like "同意*"
Else
    e.newvalue="不同意"
End If

end select

[此贴子已经被作者于2011-4-30 16:37:49编辑过]

--  作者:dd-zdh
--  发布时间:2011/4/30 17:22:00
--  

不好意思,怎么编译不过去呢

 


--  作者:blackzhu
--  发布时间:2011/4/30 17:28:00
--  

If e.Col.Name = "第二列" Then
    If e.Row("第一列") = "不同意" Then
        e.cancel = True
    End If
End If

 

只要是设置为不同意,其余第一列为任何字符第二列均可编辑,因为你第一列做死,也不会出现其他的字符出来。