文本框提示

kobe

文件下载
怎样写一代码，才能让它出现消息框，我们单击消息框后窗体不关闭，一定要在文本框里写上内容才允许关闭呢？

zhengjialon

要写在Form的Unload事件里才行：
Private Sub Form_Unload(Cancel As Integer)
If IsNull(文本) = True Then
MsgBox "你都没有填好呢，怎么走了？"
Cancel = -1
End If
End Sub

[此贴子已经被zhengjialon于2002-11-20 17:21:31编辑过]

kobe

谢谢楼上的！