如果表单存在句号

Question

从vb.net项目尝试调用在vb6 .dll中创建的表单

如果我最小化我的申请，就会遇到失去形式的问题。所以我发现解决方案不允许我从屏幕上丢失vb6表单（因为它被称为模态）

Private Sub Main_Activated(sender As Object, e As EventArgs) Handles Me.Activated
    Dim lH As Long

    lH = FindWindow(vbNullString, "Predračuni - Stavke")
    SwitchToThisWindow(lH, 3)

    lH = FindWindow(vbNullString, "Osnovni podaci o predračunu")
    SwitchToThisWindow(lH, 3)

    lH = FindWindow(vbNullString, "Odabir šablona za štampu")
    SwitchToThisWindow(lH, 3)

End Sub

现在有时当我关闭vb6表单时，我的应用程序会自行最小化。我想是因为它试图切换到不存在或不存在的窗口？

我能做什么