0),在Text2中显示输出m的全部除1和自身之外的因子。例如,20的因子有2,4,5,10,输出结果为"2,4,5,10,";16的因子为2" />窗体中有文本框为Text1和Text2。运行程序时单击"运行"按钮Command1,在Text1中输入整数m(m>0),在Text2中显示输出m的全部除1和自身之外的因子。例如,20的因子有2,4,5,10,输出结果为"2,4,5,10,";16的因子为2

窗体中有文本框为Text1和Text2。运行程序时单击"运行"按钮Command1,在Text1中输入整数m(m>0),在Text2中显示输出m的全部除1和自身之外的因子。例如,20的因子有2,4,5,10,输出结果为"2,4,5,10,";16的因子为2

admin2021-04-27  29

问题 窗体中有文本框为Text1和Text2。运行程序时单击"运行"按钮Command1,在Text1中输入整数m(m>0),在Text2中显示输出m的全部除1和自身之外的因子。例如,20的因子有2,4,5,10,输出结果为"2,4,5,10,";16的因子为2,4,8,输出结果为"2,4,8,"。
事件代码如下:
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 While 【     】
    Me!Text2 = result
End Sub
程序【  】处应填写的语句是

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

答案B

解析  Do循环是查找m的因子,循环的条件是因子k小于m,因子k初始值为2,循环结束的条件是k增加到m-1结束,即k
转载请注明原文地址:https://jikaoti.com/ti/U2C0FFFM
0

最新回复(0)