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

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

admin2020-09-01  76
问题 在窗体中有文本框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)
    resule = ""
    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循环until结束的条件。本题要找输入值m的除1之外所有的因子，循环结束的条件是k>m。但是不能用k=m或k>=m作为结束条件。例如,如果m输入值为1，循环会一直满足条件，就会形成死循环。因此，本题应选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/Pvcp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)