VB中unload卸栽事件怎么用，卸载后又怎么重新装入窗体？

显示全部楼层 · 2010-8-2 11:08:52

请举一个代码的例子，卸载后又怎么重新装入窗体？
Private Sub Form_Unload(Cancel As Integer)
End Sub
我不知道中间该怎么填？到底是什么意思？

千问 · 2010-8-2 11:08:52

卸载：Me.Unload（） '卸载当前窗体重新装入窗体：窗体名．Show[0/1]默认值为0，表示以非模态形式显示窗体，即能通过鼠标将焦点转移到其他窗体上。一个例子：用户单击一个名为Cmdsport的按钮，则显示一个名为Frmsport的对话框，在该对话框中提供一个运动项目列表。Private Sub Cmdsport_Click()Load Frmsport
’首先加载窗体Frmsport!Lstsport．AddItem"足球"
’为窗体中的列表框控件添加项目Frmsport!Lstsport．AddItem"篮球"

千问 · 2010-8-2 11:08:52

unload指窗体卸载完成后，注意是完成后。因此，再次不能设置询问用户是否关闭窗体的Msg对话框。不过可以在这个过程中插入磁盘文件写入，另一个窗体的装载。比如：open "C:\1.txt" for output as #1'对C:\1.txt文件写入数据write #1 ,"form1 已经卸载"close #1form2.show'

千问 · 2010-8-2 11:08:52

如果是主窗体，那么做两个程序，主程序退出时运行另一个程序，然后那个程序在运行主程序并退出，如果不是主窗体，那么弄个时钟，在那个窗体退出是运行时钟，再由时钟运行那个窗体

千问 · 2010-8-2 11:08:52

主窗体用unload就是退出了。Private Sub Form_Unload(Cancel As Integer)这个是在程序退出时做的动作。Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)这个是在触发了关闭按钮之后所要做的动作。他可以防止程