在窗体中有文本框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
热度🔥417
参考答案：A
解析：
【解析】本题考查的是Do循环until结束的条件。本题要找输入值m的除1之外所有的因子，循环结束的条件是k>m。但是不能用k=m或k>=m作为结束条件。例如,如果m输入值为1，循环会一直满足条件，就会形成死循环。因此，本题应选择A选项。
【解析】本题考查的是Do循环until结束的条件。本题要找输入值m的除1之外所有的因子，循环结束的条件是k>m。但是不能用k=m或k>=m作为结束条件。例如,如果m输入值为1，循环会一直满足条件，就会形成死循环。因此，本题应选择A选项。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
