请教关闭窗口问题 - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → 请教关闭窗口问题

标题：请教关闭窗口问题

只看楼主

boboxiong

等　级：新手上路
帖　子：89
专家分：0
注　册：2007-4-23

楼主

问题点数：0 回复次数：8

请教关闭窗口问题

想问一下，一个窗口只留一个关闭按钮，然后点击此按钮怎么写程序能弹出提示来？

搜索更多相关主题的帖子: 窗口　

2007-10-26 14:17

boboxiong

等　级：新手上路
帖　子：89
专家分：0
注　册：2007-4-23

第 2 楼

得分:0

2007-10-26 14:23

boboxiong

等　级：新手上路
帖　子：89
专家分：0
注　册：2007-4-23

第 3 楼

得分:0

没人告诉我/。

2007-10-26 14:29

jfei1314

等　级：新手上路
帖　子：16
专家分：0
注　册：2007-10-24

第 4 楼

得分:0

Private Sub Command1_Click()

MsgBox "关闭窗口", vbOKOnly, "提示"
End
End Sub
用这个是不是能满足你的要求？

2007-10-26 14:45

taozl

等　级：新手上路
帖　子：36
专家分：0
注　册：2007-9-14

第 5 楼

得分:0

请问楼上：这个Command1是自己添加的关闭按钮，不是指窗体上的红 X 吧

2007-10-26 14:58

boboxiong

等　级：新手上路
帖　子：89
专家分：0
注　册：2007-4-23

第 6 楼

得分:0

就是，我问的是点窗口右上角的红X

2007-10-26 15:12

boboxiong

等　级：新手上路
帖　子：89
专家分：0
注　册：2007-4-23

第 7 楼

得分:0

噢

2007-10-26 15:13

boboxiong

等　级：新手上路
帖　子：89
专家分：0
注　册：2007-4-23

第 8 楼

得分:0

我会了，谢谢，在窗口的UNLOAD函数里面添加上面的提示就OK了。

2007-10-26 15:14

心中有剑

等　级：新手上路
威　望：5
帖　子：611
专家分：0
注　册：2007-5-18

第 9 楼

得分:0

form_unload 里面写
if msgbox("你是否确定退出",vbyesno)=vbyes then
cancel=false
end if

2007-10-26 15:30

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-180960-1-1.html