Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
下载信息 [文件大小: 下载次数: ] | |
![]() |
if e.oldvalue like "*同意*"=fase
e.cancel=true
end if
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
select case e.datacol.name
case "第一列"
If e.newvalue Like "同意*" Or e.oldvalue Like "同意*" Else e.newvalue="不同意" End If |
end select
不好意思,怎么编译不过去呢
If e.Col.Name = "第二列" Then
If e.Row("第一列") = "不同意" Then
e.cancel = True
End If
End If
只要是设置为不同意,其余第一列为任何字符第二列均可编辑,因为你第一列做死,也不会出现其他的字符出来。