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

admin2021-07-08  24

问题 在窗体中有文本框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 = ""
    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/Jm90FFFM
0

最新回复(0)