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

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

admin2018-08-17  56
问题 在窗体中有文本框Text1和Text2。运行程序时，在Text1中输入整数m(m＞0)，单击Commandl“运行”按钮，程序能够求出m的全部除1之外的因子，并在Text2中显示结果。例如，18的全部因子有2，3，6，9，18，输出结果为2，3，6，9，1 8，；28的全部因子为2，4，7，14，28，输出结果为2，4，7，14，28，。事件代码如下：
    Private Sub Commandl Click()
        m=Val(Me!Text1)
        resule=“”
        For k==2 To ________
          If m Mod k=0 Then
            result=result＆k＆“，”
          End If
        Next k
        Me!Text2=result
    End Sub
    程序画线处应填写的语句是(    )。
选项 A、m
B、k＜m
C、k＜=m
D、m一1
答案A
解析 本题考查的是For循环，只要k满足条件就一直循环。本题要找输入值m的除1之外所有的因子，循环结束的条件是k＞m，因此k的取值为2，…，m一1，m。括号内应该填写一个数值，因此B和C选项不正确，D选项应去除m本身。因此，A选项符合题意。
转载请注明原文地址:https://kaotiyun.com/show/pxMp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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