主题：在菜单中不能使用检测活动窗口的函数吗？

想在菜单中使用检测活动窗口的内部函数，但没有效果，请问是什么原因？

函数代码：

Dim frm As WinForm.Form = Forms.ActiveForm
If frm IsNot Nothing Then
    If frm.Name ="窗口2"  Or  frm.Name ="窗口3" Then
        MessageBox.Show("已打开:" & frm.Name & "窗口,请先关闭","提醒")
        Return  Nothing
    Else
         MessageBox.Show("没有打开必须关闭的窗口,可以继续","提醒")
    End If
End If

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:检测窗口自定义函数.table

嗯，应该可以了。在实际项目中，所检测的窗口都是“主窗口”，应该可以检测的。

这样就可以用函数去代替一段代码，大大提高效率，减少代码长度。