在窗体中有文本框Text1和Text2。运行程序时,在Text1中输入整数m(m>0),单击Command1“运行”按钮,程序能够求出m的全部除1之外的因子,并使用Text2显示结果。例如,18的全部因子有2,3,6,9,18,输出结果为2,3,6,9,1

admin2018-01-25  28

问题 在窗体中有文本框Text1和Text2。运行程序时,在Text1中输入整数m(m>0),单击Command1“运行”按钮,程序能够求出m的全部除1之外的因子,并使用Text2显示结果。例如,18的全部因子有2,3,6,9,18,输出结果为2,3,6,9,18,;28的全部因子为2,4,7,14,28,输出结果为2,4,7,14,28,。事件代码如下:
    Private Sub Command1_Click()
    m=Val(Me!Text1)
    result=" "
    k=2
    Do
    If m Mod k=0 Then result=result&k&"."
    k=k+1
    Loop Until【    】
    Me!Text2=result
    End Sub
    程序【    】处应填写的语句是(    )。

选项 A、k>m
B、k=m
C、k>=m
D、k<m

答案A

解析 根据题意,Do…Loop循环用来判断m的因子,每次执行循环都用一个小于m的数k去整除m,如果能够整除,则说明k是m的因子。故当k<m的时候执行循环;当k>m的时候循环结束。
转载请注明原文地址:https://kaotiyun.com/show/JXMp777K
0

最新回复(0)