主题：请问如何设置强制性软件升级?

If Syscmd.Project.Update(False,True) = False Then '如果没有升级

    Forms("导航").open()

If User.Type <> UserTypeEnum.Developer '隐藏表标题(普通登录者不显示表标题,但开发者登录时显示)

    TableCaptionVisible = False

End If

DataTables("监造基本信息表").DataCols("监造流水号").RaiseDataColChanged()

DataTables("监造物资明细表").DataCols("监造流水号").RaiseDataColChanged()

Tables("监造放行单表.监造物资明细表").Visible = False

Tables("监造日志.监造物资明细表.监造周报").Visible = False

Tables("监造日志.监造物资明细表.图纸工艺文件及进度状态表").Visible = False

Tables("监造日志.监造物资明细表.原材料及外购外协件检验表").Visible = False

Tables("监造物资明细表").Grid.AllowFiltering = True '启动表的内置筛选功能

Tables("监造基本信息表").Grid.AllowFiltering = True '启动表的内置筛选功能

Tables("监造周报").Grid.AllowFiltering = True '启动表的内置筛选功能

Tables("监造日志").Grid.AllowFiltering = True '启动表的内置筛选功能

Tables("监造放行单表").Grid.AllowFiltering = True '启动表的内置筛选功能

Tables("人员信息表").Grid.AllowFiltering = True '启动表的内置筛选功能

End If