以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助 命令之间的连接  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=14806)
--  作者：0lily
--  发布时间：2011/12/2 21:04:00
--  求助 命令之间的连接
If User.Group = "主管" Then DataTables("表A").AllowEdit = True Else DataTables("表A").AllowEdit = False End If If User.Group = "客户" Then For Each dt As DataTable In DataTables dt.AllowClipBoard = False Next End If 这两个命令同时实现的话要在中间加什么？
--  作者：程兴刚
--  发布时间：2011/12/2 21:15:00
--  
 
If User.Group = "客户" Then
     For Each dt As DataTable In DataTables
         dt.AllowClipBoard = False
     Next
End If
If User.Group = "主管" Then
    DataTables("表A").AllowEdit = True
Else
     DataTables("表A").AllowEdit = False
End If
 
或者
 
If User.Group = "客户" Then
    For Each dt As DataTable In DataTables
        dt.AllowClipBoard = False
    Next
End If
DataTables("表A").AllowEdit = (User.Group = "主管")
[此贴子已经被作者于2011-12-2 21:40:30编辑过]