打开一个窗口然后把其他窗口都关掉的vb代码

关闭前一个窗口,前一个窗口是不确定的,要怎么写代码???

Form1.Show '打开form1窗体
Unload Form1 '关闭form1窗体
上面是例子,你可以参考。
关于你的问题,你可以直接修改窗体名即可。
窗体名1.Show 打开窗体。
unload空格窗体名2 关闭关闭窗体2
unload空格窗体名3 关闭关闭窗体3
unload空格窗体名4 关闭关闭窗体4
还有不明白的吗?
Dim aa As Object
Set aa = Form2
Unload aa
这样明白吗?
温馨提示:内容为网友见解,仅供参考
第1个回答  2010-12-14
你unload的时候把除你要打开的那个窗体外全写进去就好了

打开一个窗口然后把其他窗口都关掉的vb代码
Unload Form1 '关闭form1窗体 上面是例子,你可以参考。关于你的问题,你可以直接修改窗体名即可。窗体名1.Show 打开窗体。unload空格窗体名2 关闭关闭窗体2 unload空格窗体名3 关闭关闭窗体3 unload空格窗体名4 关闭关闭窗体4 还有不明白的吗?Dim aa As Object Set aa = Form2 Unload...

vb.net中如果打开一个窗体的同时关闭另一个窗体呀
End Sub每次在打开新窗体前先调用关闭窗口公共函数:FrmUnload(CurForm)然后将当前打开窗体名称赋值给变量 CurForm如果还看不懂那我也没办法了!没有悬赏分数的问题一般不会回答的!破例

vb中怎样使一个窗体关闭的时候关闭其他所有窗体
很简单,代码如下:Private Sub Form_UnLoad()End End Sub

vb中想做一个按钮点击一下打开窗口,再点一下关闭窗口!于此循环!如何编辑...
点击form2下的command1,关闭form2窗体;

vb关闭其他程序的指定窗口
为实现VB程序关闭指定窗口的功能,可以使用SendMessage和DestroyWindow两种方法。SendMessage方法通过发送WM_CLOSE消息至窗口,实现窗口关闭。具体操作如下:1. 首先,声明SendMessage函数,参数包括窗口句柄、消息、命令参数和额外参数。WM_CLOSE消息的值为&H10,两个额外参数设置为0。2. 使用SendMessage函数后,...

求高人帮我用VB写个能够强制关闭所有正在运行的程序以及窗口的代码
a2 = icePub_closeForm(str1)3.46icePub_closeFormFromFile l函数原型:int WINAPI icePub_closeFormFromFile(char *strFilename)输入:strFilename 保存窗口标题串的文件,一行一个 输出:VB sample 代码:Private Declare Function icePub_closeFormFromFile Lib "icePubDll.dll" (ByVal strFilename ...

请问vb点击Form2窗口的关闭按钮,同时关闭Form1窗口的代码
不用修改 Private Sub Form2_Unload(Cancel As Integer)Unload Form1 End Sub 另外:Unload 是卸载窗体的意思 Form1.Hide 可以隐藏窗体,但是窗体还是存在的,可以用Form1.Show显示 End 可以结束进程,所以该进程的所有窗体都会关闭,我习惯在Form_Unload的最后加上End,以防程序没有完全退出。

VB返回代码并关闭该窗口代码怎么写
form1 铵钮单击事件里Private Sub Command1_Click()Form2.Show '显示窗体form2 End Subform2 铵钮单击事件里 Private Sub Command1_Click()Unload Form2 '关闭窗体form2 End Sub

VB中关闭窗口的代码有哪些!
用unload就可以,如果只是要隐藏可以用窗体的hide方法。private sub command1_click()unload form2 end sub private sub command1_click()form2.hide end sub

请教vb.net 开新窗口关闭旧窗口
--- 挺长时间没用VB.NET了,在你设置完启动界面为login后,进入login的代码处,在 Public Class Form1下敲入Sub New()也就是初始化。在那里面写入调用welcome的窗口程序 Dim frm as New welcome,还要写一个判断 if frm.showDialog=Windows.Forms.DialogResult.Cancel (里面随你以后工程需要自己添加)...

相似回答
大家正在搜