在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim num As Integer num=1 Do Until num>6

admin2010-03-30  19

问题 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:    Private Sub Command1_Click()      Dim num  As Integer      num=1      Do Until num>6        Print num;        num=num+2.4      Loop    End Sub    程序运行后,单击命令按钮,则窗体上显示的内容是

选项 A、1 3.4  5.8
B、1  3  5
C、1  4  7
D、无数据输出

答案2

解析 本题仍是考查Do循环控制语句。本题中num的初始值为1,每执行一次Do循环,其值加2.4,但要注意,由于num被定义为Integer数据类型,故其值的小数部分都将被省去。直到num的值大于6时,退出循环。由于Print语句放在“num=num+2.4”语句前,故先执行Print语句。本题第一次循环,x先输出1,然后变成3;第二次循环,x先输出3,然后变成5;第三次循环, x先输出5,然后变成7。在进行笫4次循环之前,程序判断x大于6,则退出该循环。故本题答案为B。
转载请注明原文地址:https://jikaoti.com/ti/qrg0FFFM
0

最新回复(0)