VB.net如何設(shè)置msgbox可以定時(shí)自動(dòng)關(guān)閉？

MessageBox里的Show里沒(méi)有自動(dòng)關(guān)閉的方法，但是你可以自定義一個(gè)MessageBox,MessageBox就是一個(gè)窗體，你新建一個(gè)窗體Form2，添加一個(gè)public屬性message和一個(gè)定時(shí)器timer1,timer1的interval設(shè)置成你想要的時(shí)間，在Form2的Load事件啟動(dòng)timer1，Timer1_Tick事件里關(guān)閉窗口Me.Close(),然后在需要顯示Messagebox的時(shí)候，在主窗口Form1里設(shè)置messge屬性，然后用show方法彈出窗口就可以了。

創(chuàng)新互聯(lián)不只是一家網(wǎng)站建設(shè)的網(wǎng)絡(luò)公司；我們對(duì)營(yíng)銷、技術(shù)、服務(wù)都有自己獨(dú)特見(jiàn)解，公司采取“創(chuàng)意+綜合+營(yíng)銷”一體化的方式為您提供更專業(yè)的服務(wù)！我們經(jīng)歷的每一步也許不一定是最完美的，但每一步都有值得深思的意義。我們珍視每一份信任，關(guān)注我們的成都網(wǎng)站設(shè)計(jì)、網(wǎng)站制作質(zhì)量和服務(wù)品質(zhì)，在得到用戶滿意的同時(shí)，也能得到同行業(yè)的專業(yè)認(rèn)可，能夠?yàn)樾袠I(yè)創(chuàng)新發(fā)展助力。未來(lái)將繼續(xù)專注于技術(shù)創(chuàng)新，服務(wù)升級(jí)，滿足企業(yè)一站式營(yíng)銷型網(wǎng)站建設(shè)需求，讓再小的品牌網(wǎng)站建設(shè)也能產(chǎn)生價(jià)值！

Form1程序：（添加了一個(gè)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程序：(添加了一個(gè)Label1顯示信息和一個(gè)Timer1用于計(jì)時(shí)，F(xiàn)orm2可以自定義成你想要的樣式，標(biāo)題，按鈕，窗體樣式等)

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 '定時(shí)3秒關(guān)閉窗口

Timer1.Enabled = True

End Sub

End Class

代碼已在VS2017測(cè)試通過(guò)。

vb.net中怎么關(guān)閉現(xiàn)有窗口，然后打開(kāi)另一個(gè)窗口？

登陸按鈕里寫(xiě)：

private void button1_Click(object sender, EventArgs e)

{

Form2 fo1 = new Form2();

fo1.Show();

this.Visible=false;

}

第2個(gè)窗體的關(guān)閉事件里寫(xiě)

private void Form2_FormClosed(object sender, FormClosedEventArgs e)

{

Application.Exit();

}

這樣就可以了

me.dispose(); 這個(gè)是釋放本對(duì)象的資源，，有時(shí)候直接把這個(gè)對(duì)象就清理了，，登陸窗體如果是入口窗體的話，，這么寫(xiě)就等于Application.Exit();

直接關(guān)整個(gè)應(yīng)用程序了

插紅旗噢 我還去vs里敲了一下

VB.NET窗體關(guān)閉事件

Private Sub Form1_FormClosing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs)

MsgBox("窗口即將關(guān)閉....")

End Sub

Else

e.Cancel = True

End If

vb.net如何打開(kāi)一個(gè)新窗體后關(guān)閉上一個(gè)窗體

1、如果上一個(gè)窗體是程序的主窗體（默認(rèn)是程序的第一個(gè)窗體），

則不能關(guān)閉這個(gè)窗體，只能隱藏（Me.Hide()）這個(gè)窗體，否則整

個(gè)程序就被關(guān)掉了。

2、如果上一個(gè)窗體不是程序的主窗體，可以用Me.Close()

關(guān)閉。

VB.NET是如何關(guān)閉窗體

VB.NET關(guān)閉當(dāng)前窗體me.close()

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