为什么我的窗口会一闪而过
工程的主函数一开始就调用一个窗口:
SignIn.Show()
在SignIn里面:
Option Strict Off
Option Explicit On
Friend Class SignIn
Inherits System.Windows.Forms.Form
Private Sub SignIn_Load(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles MyBase.Load
'-----> Get Last Known Screen Position
Me.Visible = True
Me.Left = VB6.TwipsToPixelsX(CSng(GetSetting(My.Application.Info.Title, "Settings", "MainLeft", CStr(0))))
Me.Top = VB6.TwipsToPixelsY(CSng(GetSetting(My.Application.Info.Title, "Settings", "MainTop", CStr(0))))
Me.Width = VB6.TwipsToPixelsX(CSng(GetSetting(My.Application.Info.Title, "Settings", "MainWidth", CStr(5280))))
Me.Height = VB6.TwipsToPixelsY(CSng(GetSetting(My.Application.Info.Title, "Settings", "MainHeight", CStr(2070))))
End Sub
然后程序运行后窗口闪了一下马上就退出了,Debug显示程序exit了。不知道我是哪里应该改进下才好呢?谢谢!