窗体中有文本框Textl和标签Labell。运行程序,输人大于0的整数m,单击按钮Command1,程序判断m是否为素数,若是素数,则Label1显示“m是素数”,否则显示“m是合数”。事件代码如下: Private Sub Commandl_Cl

admin2019-02-19  28

问题 窗体中有文本框Textl和标签Labell。运行程序,输人大于0的整数m,单击按钮Command1,程序判断m是否为素数,若是素数,则Label1显示“m是素数”,否则显示“m是合数”。事件代码如下:
    Private Sub Commandl_Click()
    m=Val(Me!Textl)
    result=m&"是素数"
    k=2
    Do While k<=m/2
    If m Mod k=0 Then
    result=m&"是合数"
    【    】
    End If
    k=k+1
    Loop
    Me!Label1.Caption=result
    End Sub
    程序【    】处应填写的语句是(    )。

选项 A、Exit
B、Exit Loop
C、Exit While
D、Exit Do

答案D

解析 依照题意,空白处添加的语句应该是满足条件便退出循环。Exit Do用来提前中断并退出Do While循环。
转载请注明原文地址:https://kaotiyun.com/show/eh0p777K
0

最新回复(0)