vb 如何用代码关闭窗体
我如何在关闭form1的同时 打开form2
（end 代码会关闭整个工程）所以不能用end 展开
VB使用Unload语句卸载窗体。
Unload语句，从内存中卸载窗体或控件。
语法：
Unloadobject
object所在处是要卸载的Form对象或控件数组元素的名称。
说明，当所占内存另有它用，或需要重新设置窗体、控件的属性为初始值时，就有必要卸载窗体或控件。
扩展资料：
有关窗体的语句：
PropertyGet 语句： 声明在窗体属性过程中获取（返回）属性值的名称，参数和代码。
PropertyLet 语句： 声明在窗体属性过程中指定属性值的名称，参数和代码。
PropertySet 语句： 声明在窗体属性过程中设置引用到对象的名称，参数和代码。
Public 语句： 声明公有变量并分配存储空间。
Randomize 语句： 初始化随机数发生器。
ReDim 语句： 声明动态数组变量，并分配或重新分配过程级的存储空间。
参考资料来源：百度百科-Visual Basic
TableDI
2024-07-18 广告
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 If
End Sub
Form2.Show
unload me
