vb.net窗体不关闭 vb窗体关闭代码

用VB.Net编程，设计窗体时给窗体添加按钮，怎样才能点击这个“确定”按钮但不关闭窗体

都不会关闭，除非你在按钮的Click事件处理中添加了Me.Close() 代码。

相关问答

Q1: VB.NET 窗体关闭问题 用的是vs2013

首先这个应该放在 FormClosing 事件中。

其次vb.net窗体不关闭，因为你 Else 之后没有忽略窗体关闭vb.net窗体不关闭的请求。

应该再加一句 e.Cancel = Truevb.net窗体不关闭，表示告诉系统，vb.net窗体不关闭我取消关闭窗体这个操作vb.net窗体不关闭了。

Q2: vb.net如何打开一个新窗体后关闭上一个窗体

1、如果上一个窗体是程序vb.net窗体不关闭的主窗体（默认是程序的第一个窗体）vb.net窗体不关闭，

则不能关闭这个窗体vb.net窗体不关闭，只能隐藏（Me.Hide()）这个窗体，否则整

个程序就被关掉了。

2、如果上一个窗体不是程序的主窗体，可以用Me.Close()

关闭。

Q3: vb.net窗体关闭的问题！

Private Sub frmNotepad_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing

Call subexit()

End

End Sub

Sub subexit()

Dim frmNew As frmNotepad

frmNew = ActiveForm

If frmNew.Text = "未定标题 - 记事本" Then

If frmNew.rtb.Text = "" Then

Else

Dim result As New MsgBoxResult 'result提示对话框yes,no,cancel

result = MsgBox("未定标题 文件的文字已经改变。" Chr(10) Chr(10) "想保存文件吗？", MsgBoxStyle.YesNoCancel + MsgBoxStyle.Exclamation, "记事本")

If result = MsgBoxResult.Yes Then 'result.Yes表示保存，清空内容，打开新页面

Dim fileSave As New SaveFileDialog

Dim re As New DialogResult 're提示对话框OK，cancel

fileSave.FileName = "*.txt"

fileSave.Filter = "文本文档(*.txt)|*.txt|所有文件|*.*"

re = fileSave.ShowDialog()

If re = DialogResult.OK Then 're.OK表示成功保存，清空内容，打开新页面

filename = fileSave.FileName

Dim fstream As FileStream

Dim sw As StreamWriter

Try

'frmNew.Text = filename.Substring(filename.LastIndexOf("\") + 1) "- 记事本"

fstream = New FileStream(filename, FileMode.Create, FileAccess.ReadWrite)

sw = New StreamWriter(fstream, System.Text.Encoding.Default)

sw.BaseStream.Seek(0, SeekOrigin.End)

sw.Write(rtb.Text)

sw.Flush()

Catch ex As Exception

MsgBox("保存文件失败")

Finally

sw.Close()

End Try

ElseIf re = DialogResult.Cancel Then 're.cancel表示不保存，不改变任何结果

End If

ElseIf result = MsgBoxResult.No Then 'result.no表示不保存，清空内容

rtb.Text = ""

End If

End If

Else

If rtb.Text.Compare(rtb.Text, compareStr) 0 Then

Dim result As New MsgBoxResult

result = MsgBox(filename + " 文件的文字已经改变。" Chr(10) Chr(10) "想保存文件吗？", MsgBoxStyle.YesNoCancel + MsgBoxStyle.Exclamation, "记事本")

If result = MsgBoxResult.Yes Then

Dim fstream As FileStream

Dim sw As StreamWriter

Try

'frmNew.Text = filename.Substring(filename.LastIndexOf("\") + 1) "- 记事本"

fstream = New FileStream(filename, FileMode.Create, FileAccess.ReadWrite)

sw = New StreamWriter(fstream, System.Text.Encoding.Default)

sw.BaseStream.Seek(0, SeekOrigin.End)

sw.Write(rtb.Text)

sw.Flush()

Catch ex As Exception

MsgBox("保存文件失败")

Finally

sw.Close()

End Try

ElseIf result = MsgBoxResult.No Then

rtb.Text = ""

End If

End If

End If

End Sub

Q4: VB.net 点击显示新窗口 如何新窗口不关闭时 点击后不重复创建窗口 显示已加载的窗口

这样写，每次点击按钮事件都会创建一个新的form。

你想要的效果是主窗口生命周期内，子form是一个。

根据这个你再考虑下怎么实现。比如主form加载时创建子form。点击事件中去获取子form的焦点。

Q5: VB.NET 如何让窗体自动关闭?

如果是单个窗体vb.net窗体不关闭的话vb.net窗体不关闭，这段代码是没有问题vb.net窗体不关闭的．请注意”但任务栏上仍有显示”是不是form1的vb.net窗体不关闭？

vb.net窗体不关闭的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb窗体关闭代码、vb.net窗体不关闭的信息别忘了在本站进行查找喔。