|
发表于 2020-2-1 05:54:01
|
显示全部楼层
用多线程操作。
引入命名空间
Imports System.Threading
写个方法
Private Sub FormStart()
Application.Run(New NewForm) '*运行1个新的程序窗口
End Sub
然后在你LoginForm的进入那个按钮下写下面的语句
Dim thread As New Thread(New ThreadStart(AddressOf FormStart)) '*定义新的线程来打开窗体
thread.Start()
Application.Exit() '*关闭登陆窗体
以上所有代码都是写在LoginForm中
|
|