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

admin2021-04-27  30

问题 在窗体中有文本框Text1和Text2。运行程序时,在Textl中输入整数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=" "
    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://jikaoti.com/ti/SVC0FFFM
0

最新回复(0)