loadusersetting 报错 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

登录系统后，loadusersetting 事件里的代码报错怎么解决，不明白什么意思，代码如下：

'权限判断

If User.Group <> "管理员" Then

If User.Group = "领导" Then

Dim sit,sit1,sit2,sit3,sit4 As WinForm.StripItem

sit= Forms("主窗口").Strips("工具栏1").Items("kh")

sit1= Forms("主窗口").Strips("工具栏1").Items("fenpei")

sit2= Forms("主窗口").Strips("工具栏1").Items("tj")

sit3= Forms("主窗口").Strips("工具栏1").Items("pf-month")

sit4= Forms("主窗口").Strips("工具栏1").Items("pf-ld")

sit.Enabled = False

sit1.Enabled = False

sit2.Enabled = False

sit3.Enabled = False

sit4.Enabled = True

Else

Dim sit,sit1,sit2,sit3,sit4 As WinForm.StripItem

sit= Forms("主窗口").Strips("工具栏1").Items("kh")

sit1= Forms("主窗口").Strips("工具栏1").Items("fenpei")

sit2= Forms("主窗口").Strips("工具栏1").Items("tj")

sit3= Forms("主窗口").Strips("工具栏1").Items("pf-ld")

sit4= Forms("主窗口").Strips("工具栏1").Items("pf-month")

sit.Enabled = False

sit1.Enabled = False

sit2.Enabled = False

sit3.Enabled = False

sit4.Enabled = True

End If

Else

Dim sit,sit1,sit2,sit3,sit4 As WinForm.StripItem

sit= Forms("主窗口").Strips("工具栏1").Items("kh")

sit1= Forms("主窗口").Strips("工具栏1").Items("fenpei")

sit2= Forms("主窗口").Strips("工具栏1").Items("tj")

sit3= Forms("主窗口").Strips("工具栏1").Items("pf-ld")

sit4= Forms("主窗口").Strips("工具栏1").Items("pf-month")

sit.Enabled = True

sit1.Enabled = True

sit2.Enabled = True

sit3.Enabled = True

sit4.Enabled = True

End If

' 状态栏加载

With Forms("主窗口").Strips("状态栏")

.Items("用户").Text = "登录用户: " & User.Name

.Items("时间").Text = "今天日期: " & Date.today

End With

主题：loadusersetting 报错