例如我们可以在BeforeOpenProject事件中 设置下面的代码：

If UKey.Start() Then
    If UKey.Encrypt1("abc") <> "2F7EFE3A0632AE5C" Then
        MessageBox.Show("请插上XX公司提供的UKey!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
        e.Cancel = True
    End If
Else
    MessageBox.Show("启动UKey失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    e.Cancel = True
End If

这样用户只有插上你提供的UKey，才能打开你开发的程序。

疑问

这样，别人只需对上述代码爆破，Ukey就无效了啊，VB的代码最容易被破解

要是没有其他的代码防止 绕过Ukey，Ukey的安全性 真的难以保障啊