避免装载多份应用程序

  • 来源: 互联网 作者: 若水   2008-03-17/16:44
  •  你的程序可能只支持单一用户,那么怎么来避免多用户同时使用它吗?你可以利用App对象的 PrevInstance 属性来轻易达到你的目的。
    我们可以在程序打开时加入以下代码来验证:
    If App.PrevInstance Then
    MsgBox ("程序已经运行,不能再次装载。"), vbExclamation
    Unload Me
    End If

    评论 {{userinfo.comments}}

    {{money}}

    {{question.question}}

    A {{question.A}}
    B {{question.B}}
    C {{question.C}}
    D {{question.D}}
    提交

    驱动号 更多