项目使用系统自带的文件管理器，打开项目初次使用时，报错：Object variable or With block variable not set.
此主题相关图片如下：微信截图_20191214194910.jpg
计划管理---隐藏文件管理器的管理----代码如下：
Dim frm = System.windows.forms.form.activeform
If frm IsNot Nothing Then
If frm.Text = "文件管理器" Then
Dim obj = frm.Controls("FileManager").Controls("SplitContainer1").panel2.Controls("FlowLayoutPanel1")
If _usergroup <> "管理员" AndAlso _usergroup <> "超级管理员" Then
obj.controls("Manager").visible = False
obj.controls("add").visible = False
obj.controls("delete").visible = False
obj.controls("clear").visible = False
obj.controls("folder").visible = False
Else
obj.controls("Manager").visible = True
obj.controls("add").visible = True
obj.controls("delete").visible = True
obj.controls("clear").visible = True
obj.controls("folder").visible = True
End If
End If
End If
请老师帮忙看一下，如何改一下代码。谢谢！
[此贴子已经被作者于2019/12/15 16:56:26编辑过]
加好友 
发短信
Post By：2019/12/14 19:54:00 [显示全部帖子]
