以文本方式查看主题

-  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=3391)
--  作者：roy78
--  发布时间：2009/7/2 10:52:00
--  [求助]如何理解这一段？
　　这几天埋头苦干看帮助，看着看着怎么突然不理解这一句话了，
Tables("授权表").Visible = (User.Type <> UserTypeEnum.User )
直译为：授权表．是否可见＝　user.类型（返回级别类型）　＜＞　user(普通用户)

看着看着有点看晕，太多了，记不住　呵呵，他爸，解释一下，用通俗的口语解释一下，上面那段．
[此贴子已经被作者于2009-7-2 10:52:36编辑过]
--  作者：shxiaoya
--  发布时间：2009/7/2 10:59:00
--  
User.Type <> UserTypeEnum.User 这是个逻辑判断，用户类型不是普通用户的话，授权表可见
--  作者：roy78
--  发布时间：2009/7/2 11:04:00
--  
以下是引用shxiaoya在2009-7-2 10:59:00的发言：
User.Type <> UserTypeEnum.User 这是个逻辑判断，用户类型不是普通用户的话，授权表可见

Tables("授权表").Visible = (User.Type <> UserTypeEnum.User )
If  User.Type = UserTypeEnum.User Then
    For Each dr As DataRow In DataTables("授权表").Select("用户名 = \'" & User.Name & "\'" )
        If dr.IsNull("列名") Then
            Tables(dr("表名")).Visible = Not dr("不可见")
            Tables(dr("表名")).AllowEdit = Not dr("不可编辑")
        Else
            Tables(dr("表名")).Cols(dr("列名")).Visible = Not dr("不可见")
            Tables(dr("表名")).Cols(dr("列名")).AllowEdit = Not dr("不可编辑")           
        End If
    Next
End If



那加上这段有何意义？

[此贴子已经被作者于2009-7-2 11:05:35编辑过]
--  作者：狐狸爸爸
--  发布时间：2009/7/2 11:07:00
--  
意思是：如果是普通用户，才执行下面的授权代码。
--  作者：shaof
--  发布时间：2009/7/2 11:09:00
--  
判断当前用户是不是普通用户，如果是普通用户执行下面的代码。
--  作者：roy78
--  发布时间：2009/7/2 11:12:00
--  
OK，明白了，呵呵　　帮助太多啊，他爸．．．我要看晕了
[此贴子已经被作者于2009-7-2 11:12:20编辑过]
--  作者：狐狸爸爸
--  发布时间：2009/7/2 11:21:00
--  
以下是引用roy78在2009-7-2 11:12:00的发言：
OK，明白了，呵呵　　帮助太多啊，他爸．．．我要看晕了
[此贴子已经被作者于2009-7-2 11:12:20编辑过]


慢慢来，先不看别的，只看应用篇，以及开发篇中的编程基础和foxtable编程，这两个是重点，理解透彻了，其他都是小问题。
--  作者：sohper
--  发布时间：2009/7/2 12:40:00
--  
哈哈，正是这样，我先看应用，再看编程基础，再看ＦoxTAble编程，再看窗口，开始实操，再看Excel报名,呵呵，还有很多没看，现在觉得比较容易上手了