回 帖 发 新 帖 刷新版面

主题:看似正确的问题

为什么这样无法将form1窗体关闭呀?
在form1中的代码:
dim f2 as new form2
f2.show()
me.close()
就这样的,为什么没用呢??

回复列表 (共7个回复)

沙发

我用button,填上你的代码,单击button后,首先执行f2.show()然后me.close()及执行fom1关闭。效果就是form2闪一下,form1随之关闭。
不是很明白搂主说的意思啊。怎么会form1不关闭呢/整个工程都能关闭的

板凳

在form1中的代码:
dim f2 as new form2
f2.show()
me.hide()


在窗体切换的时候,最好不要把.show 和.close 一起用
用.hide函数隐藏就行了。

3 楼

搂主的写法错误,你可以设置个断点看看,执行到
f2.show()
下面的程序是不执行的,所以没法关闭。
其次自己关闭自己就很没有意思,自己都不存在了,那还能做什么事情啊,哈哈
如果想实现这个代码,用一个class来控制打开和关闭,自己可以去试试了

4 楼

如何重载窗体上的最小化,最大化,关闭事件呢?

比如当点击关闭时,会提示:是否确定关闭系统?

5 楼

[quote]如何重载窗体上的最小化,最大化,关闭事件呢?

比如当点击关闭时,会提示:是否确定关闭系统?[/quote]利用CLOSING事件

 Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        Dim aa As Short
        aa = MsgBox("close form?", MsgBoxStyle.YesNo, "ASKING")
        If aa = 6 Then
            e.Cancel = False
        Else
            e.Cancel = True
        End If
    End Sub

6 楼

me.close是错的,只能是me.hide().

7 楼

me.disponse

我来回复

您尚未登录,请登录后再回复。点此登录或注册