Question

VB6.0问题（我是菜鸟）

有两个问题:
1、Private Sub Form_Unload(Cancel As Integer)
MsgBox"确认要关闭窗体？",vbYesNo,"警告"
End Sub
这段代码中vbYesNo是什么意思？测试后的确弹出“确认窗体”，但是点是和否都会退出程序，为什么？

2、Private Sub Form_Unload(Cancel As Integer)
Dim a As Single
a = MsgBox("是否要关闭窗体",vbYesNo"警告")
If a = vbNo Then Cancel = True
End sub
这段代码中single是指单精度浮点型变量，这是什么意思？还有，测试后也能出现“确认窗体”，但是点是或否都会退出程序，为什么？

最好能请大家解释一下代码...

Answer 1

第一个问题
因为你只是调用一个msgbox 并没有告诉程序点yes或no需要退出还是不退出
第二个问题
dim a as single这个是画蛇添足，没有这个就对了
因为你定义了a 是single，所以a 永远都不会等于vbno，所以条件永远不会成立

Answer 2

1 没编写代码 msgbox 只是一个对话窗口，按键后的代码还要自己编写
2 因为msgbox返回的是int类型，用single一样可行。VB具有类型转换功能，点否应该不会退出。你的第二个msgbox（）函数写错了。msgbox("",,"")少个逗号
LS vbNo在VB中代表整数7
程序可以运行

Answer 3

1.vbYesNo，是BOX格式，显示YES按扭和NO按扭
2.定义有错误

你这样写就好了：

Private Sub Form_Unload(Cancel As Integer)

If MsgBox("是否退出", vbYesNo + vbQuestion, "询问") = vbYes Then

Else
Cancel = 1
End If

End Sub

Answer 4

第一个没括号的表示代码没有返回值，第二个有括包表示当你选择是或否的时间代码会返回一个值.

Answer 5

测试了下 邂逅的守望正确