我又来了,我的问题就是个多啊

Private Sub Command2_Click()
End
End Sub

Private Sub flat_Click()
MDIForm1.Arrange 2
End Sub

Private Sub MDIForm_Load()
Form1.Show
Form2.Show
Form3.Show
End Sub

Private Sub MDIForm_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Dim msg
msg = "do you want quit?"
If MsgBox(msg, 36, Me.Caption) = 7 Then cannel = True
End Sub

Private Sub newmnufile_Click()
Dim newdoc As New Form2
newdoc.Show
End Sub

Private Sub quit_Click()
Unload MDIForm1

End Sub

我点击多文档上的退出是,它的每个界面都会提示"Do you want quit?"但是为什么我点击了"yes"窗口仍没关闭,只有当父窗体上出现上面的提示时才结束,如果我直接叉掉子窗口时回出现"Do you want to close the window?"我点击"yes"就可以关闭了,难道他们是不一样的吗?
我应该怎么处理这个问题呢?
Private Sub Command1_Click()
FontSize = 20
FontName = "隶书"
Print "this is the first box"
End Sub

Private

我的问题又来了``` 讯雷让我心烦又头痛的问题来了! 我又来问题了 C++ 跟男朋友分手了,觉得他的爱情就是空虚,如今他又来找我,我该接受吗? 我的qq号丢了，我又找回了，可是问题也来了 我的内存又问题 高手来 自从我的QQ丢了又找回来以后 就是女头像 怎么也变不回来了 怎么办啊？ 我的MP3怎么开机后就出问题了，老是显示开机动画，完了又来完了又来，就是进不了歌曲列表，怎么解决啊 我又有问题了 价格问题（商人来） 删回收站的我又来了！！！