有如下事件程序,运行该程序后输出结果是 Private Sub Command3 3 Click() Dim X As Integer,y As Integer x=1:y=0 Do Until y

admin2017-03-31  39

问题 有如下事件程序,运行该程序后输出结果是
    Private Sub Command3 3 Click()
    Dim X As Integer,y As Integer
    x=1:y=0
    Do Until y<=25
    y=y+x*x  :  x=x+1
    Loop
    MsgBox“x:”&x&“,  y=”&y
    End Sub

选项 A、x=1,y=0
B、x=4,y=25
C、x=5,y=30
D、输出其他结果

答案A

解析 Do Until…Loop循环结构是当条件为假时,重复执行循环体,直至条件表达式为真,结束循环。本题中循环条件是y=0<=25条件为真,即不执行循环体,所以x、y的值即为初始值。
转载请注明原文地址:https://jikaoti.com/ti/i920FFFM
0

最新回复(0)