画两个form一个是form1,一个是form2,每个form上都个按钮,点击form1的按钮时,显示form2,点击form2按钮时显示form1,不就是这样嘛,代码:form1按钮的单击事件:PrivateSubCommand1_Click()Form2.ShowUnloadMeE...
如果不是主窗体,可以用Form1.Close来关闭。如果实在是想关闭,就得把程序启动设为submain而不是form。再由submain来启动窗体,这样就没有主窗体了。
你要是有两个窗口的话,第一个名为form1,有一个按钮名为command1;第二个名为form2,有一个按钮名为command2,这个写在form1中privatesubform_load()fomr2.showendsubprivatesubcommand1_click()me.hide...
最顶上加一条PrivateDeclareSubSleepLib"kernel32"(ByValdwMillisecondsAsLong)SubAuto_open()Sleep1000'1000毫秒后再打开UserForm窗体UserForm.OpenEndSub找到那个窗体的名称(我这里是举例UserForm)...
PrivateSubUserForm_Terminate()UnloadfrmSub'退出当前窗体前先关闭子窗体EndSub
用unload就可以,如果只是要隐藏可以用窗体的hide方法。privatesubcommand1_click()unloadform2endsubprivatesubcommand1_click()form2.hideendsub
1.输入PrivateSubForm1Click()EndEndSub2.输入PrivateSubCommand1_Click()3.输入UnloadmeEndSub即完成
form2中添加一button按钮,代码为PrivateSubCommand1_Click()UnloadMeEndSub就行了吧,或者添加一button按钮,把其属性cancel改为true,运行按esc就退出了
'执行代码部分PrivateSubCommand1_Click()DimwinHwndAsLongDimRetValAsLong‘变量声明winHwnd=FindWindow(vbNullString,"计算器")'查找指定的窗口,请将“计算器”换为需要关闭的窗口的标题Ifwin...
VB使用Unload语句卸载窗体。Unload语句,从内存中卸载窗体或控件。语法:Unloadobjectobject所在处是要卸载的Form对象或控件数组元素的名称。说明,当所占内存另有它用,或需要重新设置窗体、控件的属性为初始值时,就有必要卸载...