设有如下程序: Private Sub Command1_Click() Dim C As Integer, d As Integer c=4 d=InputBox(“请输入一个整数”) Do Whi

admin2010-03-30  29

问题 设有如下程序:    Private Sub Command1_Click()      Dim  C  As  Integer,  d As  Integer      c=4      d=InputBox(“请输入一个整数”)      Do While d>0        If d>c Then          c=c+1        End If        d=InputBox(“请输入一个整数”)      Loop      Print c+d    End Sub    程序运行后,单击命令按钮,如果在输入对话框中依次输入1、2、3、4、5、6、7、8、 9和0,则输出结果是

选项 A、12
B、11
C、10
D、9

答案8

解析 本题是对控制结构的综合考查。Do While……Loop循环的功能是:当指定的“循环条件”为Tree或直到指定的“循环条件”变为True之前重复执行一组语句。考生仔细分析即可做答。考生应该注意:Do...Loop是根据计算条件表达式以决定是否继续执行循环体中的代码;在循环结构中,循环条件必须是一个数值或者值为Tree (非零)或False(零)的表达式,在Do...Loop循环中,只要条件表达式为Tree就执行功能代码块;循环条件为True或非零,循环可以随意执行多少次,如果循环条件一开始便为False,则不会执行语句; Do循环可以嵌套,其嵌套的规则与For-Next循环相同。
转载请注明原文地址:https://jikaoti.com/ti/nXg0FFFM
0

随机试题
最新回复(0)