关于VB，高手帮忙

来源：百度知道编辑：UC知道时间：2024/05/21 14:10:29

Public Sub PrivsSeting() '权限设置
If IsUserMode = 1 Then ''管理员
BaseManage.Enabled = True
sysManage.Enabled = True
' ZiDianmanage.Enabled = True
BackSettings.Enabled = True

ElseIf IsUserMode = 2 Then
BaseManage.Enabled = False
sysManage.Enabled = False
' ZiDianmanage.Enabled = False
BackSettings.Enabled = False

End If
End Sub
解释下每句话的意思

Public Sub PrivsSeting() '权限设置申明一个公共函数
If IsUserMode = 1 Then ''管理员 '应该是个变量来判断权限
BaseManage.Enabled = True '以下的有可能是按钮，具体看你程序里面是这些名称是什么,意思是使他们可用。
sysManage.Enabled = True
' ZiDianmanage.Enabled = True
BackSettings.Enabled = True

ElseIf IsUserMode = 2 Then'下面是使这些控件不可用，可能权限就不是管理员的时候
BaseManage.Enabled = False
sysManage.Enabled = False
' ZiDianmanage.Enabled = False
BackSettings.Enabled = False

End If
End Sub

关于VB的问题望高手帮忙关于简单VB题目,请高手帮忙.... 关于VB的，请高手帮忙关于VB，VB高手进来~！ vb高手帮忙求VB高手帮忙! VB 高手帮忙 VB 高手来帮忙 VB ，高手帮忙。请vb高手帮忙