vb.net关闭弹窗 vbs关闭窗口代码

vb.net中怎么关闭现有窗口，然后打开另一个窗口？

登陆按钮里写：

网站建设哪家好，找创新互联建站！专注于网页设计、网站建设、微信开发、小程序制作、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了邢台免费建站欢迎大家使用！

private void button1_Click(object sender, EventArgs e)

{

Form2 fo1 = new Form2();

fo1.Show();

this.Visible=false;

}

第2个窗体的关闭事件里写

private void Form2_FormClosed(object sender, FormClosedEventArgs e)

{

Application.Exit();

}

这样就可以了

me.dispose(); 这个是释放本对象的资源，，有时候直接把这个对象就清理了，，登陆窗体如果是入口窗体的话，，这么写就等于Application.Exit();

直接关整个应用程序了

插红旗噢 我还去vs里敲了一下

VB.net如何设置msgbox可以定时自动关闭？

MessageBox里的Show里没有自动关闭的方法，但是你可以自定义一个MessageBox,MessageBox就是一个窗体，你新建一个窗体Form2，添加一个public属性message和一个定时器timer1,timer1的interval设置成你想要的时间，在Form2的Load事件启动timer1，Timer1_Tick事件里关闭窗口Me.Close(),然后在需要显示Messagebox的时候，在主窗口Form1里设置messge属性，然后用show方法弹出窗口就可以了。

Form1程序：（添加了一个Button1）

Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim f2 As Form2 = New Form2

f2.Message = "提示"

f2.ShowDialog()

End Sub

End Class

Form2程序：(添加了一个Label1显示信息和一个Timer1用于计时，Form2可以自定义成你想要的样式，标题，按钮，窗体样式等)

Public Class Form2

'自定义属性 显示提示信息

Public WriteOnly Property Message As String

Set(value As String)

Label1.Text = value

End Set

End Property

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

Me.Close()

End Sub

Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Timer1.Interval=3000 '定时3秒关闭窗口

Timer1.Enabled = True

End Sub

End Class

代码已在VS2017测试通过。

VB.NET是如何关闭窗体

VB.NET关闭当前窗体me.close()

其它窗体用:窗体名.close()，例如：form2.close()

VB.NET 关闭窗体的问题

this.close() 只是关掉，没有释放，不对 me.close() 应该释放一下 me.Dispose() 给分吧、

本文标题：vb.net关闭弹窗 vbs关闭窗口代码
文章URL：http://cdxtjz.cn/article/docjjjg.html