运行时出错。不知道为什么。请您指教！
Module main
    Public kaishi As New startform
        Public Sub main()
        Application.Run(kaishi)
           End Sub
End Module
我在模块里如上所示这样写的。
在startform窗体中有一个退出按钮，代码就是：
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Application.Exit()
    End Sub
可是运行时点击退出按钮有时出错，大多运行时点退出没问题，不知道这是为什么。多谢了

[em2]