VB学习msgbox的问题等

来源:百度知道 编辑:UC知道 时间:2024/06/14 10:05:34
今天我在编写一个程序时,遇到一个消息对话框的问题,就是MSGBOX的使用的方法的问题,在使用msgbox时,我使用的是YESNO人的项目,当单击按扭时,弹出是或否的提示。如何在单击是时结束程序。因为后面的代码我不知道如何来写,请哪位指点一下。
另外有一个问题就是,我想在同一个按扭当中同时设定为暂停和继续使用。当按下暂停时,其他的键值为不可用,并且暂停变为继续使用文字。这个过程我编好了,只是当再次按下继续使用时,如何来让继续使用可以在单击的时候有效。因为我发觉CMD的按扭好像只能使用一次单击事作。再一次调用单击事件使继续使用能有效时,我不晓得该怎么来实现,请各位高手帮帮我,该怎么来写代码。谢谢。因为我是初学者
我编写的是一个知识的测试题.有几个按扭,上一题,下一题,暂停,退出等.当按下暂停的时候,上一题和下一题变为灰色,暂停文字变为继续测试文字,这个我做到了,但是,当显示继续测试的时候,单击它,使继续测试可以使用,下面的代码我就不晓得如何来写了.我试了几次,单击事件好像只能用在第一次暂停的时可以用,可是文字变为继续显示的时候,我在代码栏里选择单击事件,总是回到原来暂停时的代码事件当中去.怎么来让继续测试单击事件的代码成为独立的代码而不和之前的单击连在一起.
谢谢,对了,有什么好的VB学习的资料可以介绍给我.谢谢各位长者师长.

第一个问题
If MsgBox("是否退出程序?", vbQuestion + vbYesNo, "系统提示") = vbYes Then
End
End If
第二个问题
Private Sub Command1_Click()
If Command1.Caption = "暂停" Then
Command1.Caption = "继续测试"
Command2.Enabled = False
Command3.Enabled = False
ElseIf Command1.Caption = "继续测试" Then
Command1.Caption = "暂停"
Command2.Enabled = True
Command3.Enabled = True
End If
End Sub
编了个玩具,代码你自己修改

No1:

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

No2:
Private Sub cmdPause_Click()
With cmdPause
If .Caption = "暂停" Then
.Caption = "继续"
cmdPre.Enabled = True
cmdNext.Enabled = True
Else
.Caption = "暂停"
cmdPre.Enabled = False