2. 计算机
  3. 窗体中有文本框Text1和标签Label1。运行程序，输入大于0的整数m，单击按钮Cornmandl，程序判断m是否为素数，若是素数，则Label1显示“m是素数”，否则显示“m是合数”。事件代码如下： Private Sub Commandl_C

窗体中有文本框Text1和标签Label1。运行程序，输入大于0的整数m，单击按钮Cornmandl，程序判断m是否为素数，若是素数，则Label1显示“m是素数”，否则显示“m是合数”。事件代码如下： Private Sub Commandl_C

admin2019-04-13  39
问题 窗体中有文本框Text1和标签Label1。运行程序，输入大于0的整数m，单击按钮Cornmandl，程序判断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!Labell．Caption=result
    End Sub
    程序画线处应填写的语句是(    )。
选项 A、Exit
B、Exit Loop
C、Exit While
D、Exit Do
答案D
解析 本题是考查输入的m是否为素数，素数是指除了1和它本身之外没有别的约数，所以在While循环里只要m对k不能整除，说明k不是m的约数，否则m有小于本身的约数就不是素数，下面就不用再判断了，直接跳出Do循环。Do…While退出时，用Exit Do。
转载请注明原文地址:https://kaotiyun.com/show/tF0p777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)