Question

如何实现让一个窗体不能被关闭(VB编程)

VB编程中,如何实现让一个窗体不能被关闭
比如说右上角的叉叉的关闭按钮不能按 等等其他方法
还有如何实现在该窗体运行时,桌面是锁定的,即鼠标点除该窗体以外的地方均无效.
大虾帮忙啊

Answer 1

这个有个笨方法:
private
sub
command2_click()
select
case
text1.text
case
"form1"
form1.show
case
"form2"
form2.show
case
else
mgsbox
"没有这个窗体名"
end
select
end
sub
前提是把所有关的窗体名都要知道
呵呵

Answer 2

不能关闭，只要才Form＿unload事件中加上，cancel＝1（只要cancel不是0就可以）
第二个问题不太明白，窗体处于最上面？设置鼠标范围？（都要用API函数）

Answer 3

窗体不能被关闭:
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = -1
End Sub

Answer 4

可以把工程该为MDI,父窗口背景为桌面