呃,做个计划管理,比如写代码
If Forms.ActiveForm IsNot Nothing Then If Forms.ActiveForm.name = "窗口2" Then If 条件 Then msgbox("不能切换") Forms("窗口1").Select End If End If End If