某个窗体已编写以下事件过程: Private Sub FormClick() Dim k as Integer, n as Integer, m as Integer n=5 m=1 k=1 Do While k

admin2019-06-28  37

问题 某个窗体已编写以下事件过程:
Private Sub FormClick()
Dim k as Integer, n as Integer, m as Integer
n=5
m=1
k=1
Do While k<=n
m=m*2
k=k+1
Loop
MsgBox(m, vbYesNo + vbQuestion, "结果")
End Sub
打开窗体运行后,单击窗体,弹出的信息框外观样式是(          )。
     

选项 A、 
B、 
C、 
D、 

答案A

解析 Do While语句是先判断条件,如果条件为True,则执行循环体。本题中的条件表达式是k<=n ,而刚开始k=1,n=5,而循环依次k 就加1 ,故一共要执行5 次循环。而m 每执行一次就乘2 ,故一共乘了5 次2。 最后m 的值为32。
    此外,消息框用于在对话框中显示信息,其使用格式为:MsgBox(prompt [ ,buttons] [ ,title] [ ,helpfile, context])。其中,第一个参数是显示在对话框上的内容;第二个参数用于指定显示按钮的数目及形式。使用的图标样式等;第三个参数是对话框标题栏显示的内容。vbYesNo表示对话框中显示"是"和"否"两个按钮,vbQuestion表示显示问号图标。所以此题选A。
转载请注明原文地址:https://jikaoti.com/ti/klo0FFFM
0

最新回复(0)