LoadUserSetting

打开系统或者切换用户之后执行，可以在此针对用户进行权限方面的设置。
此事件无e参数，因为通过系统变量User可以直接返回登录用户。

我想咨询，窗口内的表、

按钮代码如下  上面的权限控制也会有效吗

If dr IsNot Nothing Then

    e.Form.Controls("CheckedComboBox选择列").value = dr("数据列")

    Dim cmd As New SQLCommand

    Dim dt As DataTable

    cmd.ConnectionName = dr("数据源") \'数据源

    cmd.CommandText = "SELE CT DISTI NCT " & dr("数据列") & " From " & e.form.TableName & " WHERE 公司名称 = \'" & User.Group & "\'"

    dt = cmd.ExecuteReader()