网站建设资讯

NEWS

网站建设资讯

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关闭窗口代码
当前链接:http://cdweb.net/article/docjjjg.html