除非满足条件，否则阻止加载表单

Question

我在 VB 中有一个 Windows 窗体应用程序 我想条件是，如果参数是通过命令行传递的，那么表单不应该显示。 我不确定为什么以下代码不起作用 任何建议将不胜感激 谢谢 戴维

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Dim args As String() = Environment.GetCommandLineArgs()
    MsgBox(args.count())
    If args.Count() > 1 Then
        If args(1) = "delete" Then
            If args.Count() = 3 Then
                deletepage(args(2), args(5))
                Close()
            End If
        ElseIf args(1) = "add" Then
            If args.Count() >= 5 Then
                addpage(args(2), args(3), args(4), args(5))
                Close()
            End If
        End If
    End If
    loadnames()
End Sub

消息框出现并显示 5（传递了 5 个参数） 但是随后程序完全忽略了 if 语句，并提出了表单？？

Answer 1

查看您的代码：

If args.Count() = 3 Then
    deletepage(args(2), args(5))

...

您说如果 args 的数量等于 3，则继续尝试访问 args(5)，这将是第 6 个参数。 您也在表单的 Load 事件 which if your OS is a 64 bit OS any unhandled errors will be silently swallowed 中执行此操作，而无需任何通知。