VB
Allen 2021-11-04 20:57:56 3309 0 0 0 0
VB,如何实现关闭窗体时判断,如果条件符合就中断,就是不让关闭的功能。例如:如果text1.text=0点程序右上叫的X时可以关闭如果大于0,点关闭的时候要提示,并且不关闭窗体。实现很简单:只要在unloa…

如何实现关闭窗体时判断,如果条件符合就中断,就是不让关闭的功能。

例如:

如果text1.text=0

点程序右上叫的X时可以关闭

如果大于0,点关闭的时候要提示,并且不关闭窗体。


实现很简单:只要在unload事件中,添加cancel=-1,即可。

代码如下:

Private Sub Form_Unload(Cancel As Integer)
    If Val(Text1.Text) > 0 Then
        MsgBox "不许关闭!", vbCritical, "温馨提示"
        Cancel = -1
        Exit Sub
    End If
End Sub    

end


【版權聲明】
本文爲原創,遵循CC 4.0 BY-SA版權協議!轉載時請附上原文鏈接及本聲明。
原文鏈接:https://tdlib.com/am.php?t=nrLK9pX7F3m2
Tag: VB
我也要發一個   ·   返回首頁   ·   返回[VB]   ·   前一個   ·   下一個
歡迎評論
未登錄,
請先 [ 註冊 ] or [ 登錄 ]
(一分鍾即可完成註冊!)
返回首頁     ·   返回[VB]   ·   返回頂部