2. 计算机
  3. 在窗体中有一个命令按钮Command1，两个文本框Text0和Text1，按钮Command1对应的代码过程如下： Private Sub Command1_Click() Dim m，k As Integer Dim flag As Boolean m＝

在窗体中有一个命令按钮Command1，两个文本框Text0和Text1，按钮Command1对应的代码过程如下： Private Sub Command1_Click() Dim m，k As Integer Dim flag As Boolean m＝

admin2021-04-07  31
问题 在窗体中有一个命令按钮Command1，两个文本框Text0和Text1，按钮Command1对应的代码过程如下：
Private Sub Command1_Click()
Dim m，k As Integer
Dim flag As Boolean
m＝Val(Me!TextO)’输入一个整数
Do While 1
k＝2
flag＝True
D0 While k＜＝m／2 And flag
If m Mod k＝0 Then
flag＝False
Else
k＝k＋1
End If
Loop
If flag Then
Me!Text1＝m’输出计算结果
Exit De
Else
m＝m＋1
End If
Loop
End Sub
运行程序，输入12，单击按钮，程序的输出结果是(    )。
选项 A、13
B、12
C、11
D、其他整数
答案A
解析 根据题目要求，输入一个整数赋值给m；外层Do While循环条件设置为“1”，表示循环条件永远为“真”，第一次执行循环语句时：k＝2；flag：true；内层D0 While k＜＝m／2 And flag循环条件为true，进入内层循环的循环体语句，if m mod k＝0条件为真，执行flag＝false语句，内层循环体语句执行结束，然后判断第二次执行的循环条件Do While k＜＝m／2 And flag循环条件为false，内层循环结束，进入外层循环语句if flag判断条件为false，执行语句m＝m＋1，m的值为13；继续进行外层循环，第二次执行循环语句时：k＝2；flag＝false；内层Do While k＜＝m／2 And flag循环条件为false，内层循环不执行，进入外层循环语句if flag判断条件为true，执行语句Me!Text1＝m，文本框Text1中显示的内容为13，然后执行exit do语句，结束整个循环，所以最终程序输出的结果为13。故选择A选项。
转载请注明原文地址:https://jikaoti.com/ti/dDC0FFFM
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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