VB如何打开或关闭窗体窗口、代码窗口?

选择是,加载和" Msg = Msg & "显示窗体。选择否,不加载窗体," Msg = Msg & "并把它隐藏." Answer = MsgBox(Msg, vbYesNo) ' 获得用户响应。 If Answer = vbYes Then ' 测试应答。 Show ' 如果回答 Yes,则显示窗体。 Else Load Form1 ' 如果回答...
VB如何打开或关闭窗体窗口、代码窗口?
VB使用Unload 语句卸载窗体。
Unload 语句
从内存中卸载窗体或控件。
语法

Unload object

object 所在处是要卸载的 Form 对象或控件数组元素的名称。
说明

当所占内存另有它用,或需要重新设置窗体、控件的属性为初始值时,就有必要卸载窗体或控件。
在卸载窗体前,会发生 Query_Unload 事件过程,然后是 Form_Unload 事件过程。在其中任一过程中设置 cancel 参数为 True 可防止窗体被卸载。若为 MDIForm 对象,先发生 MDIForm 对象的 Query_Unload 事件过程,接着是各 MDI 子窗体 的 Query_Unload 事件过程和 Form_Unload 事件过程,最后是 MDIForm 对象的 Form_Unload 事件过程。
注意 在卸载窗体时,只有显示的部件被卸载。和该窗体模块相关联的代码还保持在内存中。
Unload 语句示例

这个示例使用 Unload 语句来卸载 Form 对象。在运行此例前,在 Form 对象的声明部分粘贴以下代码,然后运行此例并单击该 Form 对象。

Private Sub Form_Click() Dim Answer, Msg ' 声明变量。 Unload Form1 ' 卸载窗体。 Msg = "Form1已被卸载。选择是,加载和" Msg = Msg & "显示窗体。选择否,不加载窗体," Msg = Msg & "并把它隐藏." Answer = MsgBox(Msg, vbYesNo) ' 获得用户响应。 If Answer = vbYes Then ' 测试应答。 Show ' 如果回答 Yes,则显示窗体。 Else Load Form1 ' 如果回答 No,仅加载窗体。 Msg = "Form1现在将加载。选择确定以显示它." MsgBox Msg ' 显示信息。 Show ' 显示窗体。 End IfEnd Sub

2020-03-09

2020-04-30
mengvlog 阅读 28 次 更新于 2025-09-10 17:07:01 我来答关注问题0
  •  武汉誉祥科技 vb怎么打开窗体

    1.首先打开VB软件。2.第一种方法,双击要编写代码的窗体或者控件,就会弹出代码窗口。例如,要编辑“确定”命令按钮的编码,可以双击“确定”命令按钮。3.第二种方法,鼠标右击窗体或者控件,在弹出页面中选择“查看代码”。4.第三种方法,点击“视图”,在“视图”页面中,选择“代码窗口”。在工程资源管理器...

  • Private Sub Form_Click() Dim Answer, Msg ' 声明变量。 Unload Form1 ' 卸载窗体。 Msg = "Form1已被卸载。选择是,加载和" Msg = Msg & "显示窗体。选择否,不加载窗体," Msg = Msg & "并把它隐藏." Answer = MsgBox(Msg, vbYesNo) ' 获得用户响应。

  •  文暄生活科普 vb 如何用代码关闭窗体

    具体使用方法如下:要关闭窗体,你需要在代码中调用Unload语句,其基本语法如下:Unload object 这里的object应替换为你要卸载的Form对象的名称,无论是窗体本身的名称还是控件数组中的元素。当窗体不再需要,或者你需要恢复其初始状态,比如清空数据或重新设置属性,卸载操作就显得很有必要。在VB编程中,unloa...

  •  百度网友bdb9803 vb6.0 关闭窗体,打开窗体。

    Private Sub Command1_Click()Form2.Show Me.Hide End Sub Private Sub Command2_Click()Form3.Show Me.Hide End Sub 'Form2代码 Private Sub Form_Unload(Cancel As Integer)Form1.Show End Sub 'Form3代码 Private Sub Form_Unload(Cancel As Integer)Form1.Show End Sub ...

  •  信必鑫服务平台 VB中怎么实现关闭窗口?

    VB中关闭窗口直接使用Unload就可以。\x0d\x0aUnload语句卸载 Form对象或控件。\x0d\x0a其语法: Unload object \x0d\x0aobject 所在处是要卸载的 Form 对象或控件数组元素的名称。 \x0d\x0a\x0d\x0a例子:点击按钮弹出Form2窗体,关闭自身窗体\x0d\x0aPrivate Sub Command1_Click()\x...

檬味博客在线解答立即免费咨询

代码相关话题

Copyright © 2023 WWW.MENGVLOG.COM - 檬味博客
返回顶部