单项选择题

窗体中有文本框Text1和标签Label1。运行程序时单击按钮Command1，输入整数m（m>0），判断m是否为素数，如果是素数，则在Label1中显示"m 是素数"，否则显示"m 是合数"。事件代码如下：Private Sub Command1_Click() Dim result As String m = Val(Me!Text1) result = m & " 是素数" k = 2 Do While k <= m / 2 If m Mod k = 0 Then result = m & " 是合数" Exit Do End If k = k + 1 Loop 【】= resultEnd Sub程序【】处应填写的语句是

A．Me!Label1
B．Me!Label1.Val
C．Me!Label1.Text
D．Me!Label1.Caption

你可能感兴趣的试题

单项选择题

在关系数据库中，用来表示实体间联系的是

A．属性
B．二维表
C．网状结构
D．树状结构

单项选择题

设循环队列的存储空间为Q(1: 35)，初始状态为front=rear=35。现经过一系列入队与退队运算后，front=15，rear=15，则循环队列中的元素个数为

A．15
B．16
C．20
D．0或35

单项选择题

下列链表中，其逻辑结构属于非线性结构的是

A．二叉链表
B．循环链表
C．双向链表
D．带链的栈

单项选择题

有两个关系R和S如下：
则由关系R得到关系S的操作是

A．选择
B．投影
C．自然连接
D．并

单项选择题

公司中有多个部门和多名职员，每个职员只能属于一个部门，一个部门可以有多名职员。则实体部门和职员间的联系是

A．1：1联系
B．m：1联系
C．1：m联系
D．m：n联系

单项选择题

数据字典（DD) 所定义的对象都包含于

A．数据流图（DFD图)
B．程序流程图
C．软件结构图
D．方框图

单项选择题

下列关于栈的叙述中，正确的是

A．栈底元素一定是最后入栈的元素
B．栈顶元素一定是最先入栈的元素
C．栈操作遵循先进后出的原则
D．以上说法均错误

单项选择题

软件需求规格说明书的作用不包括

A．软件验收的依据
B．用户与开发人员对软件要做什么的共同理解
C．软件设计的依据
D．软件可行性研究的依据

单项选择题

下面属于黑盒测试方法的是

A．语句覆盖
B．逻辑覆盖
C．边界值分析
D．路径覆盖

单项选择题

下面不属于软件设计阶段任务的是

A．软件总体设计
B．算法设计
C．制定软件确认测试计划
D．数据库设计

单项选择题

如果要将3KB的纯文本块存入一个字段，应选用的字段类型是

A．文本
B．备注
C．OLE对象
D．附件

单项选择题

若"教师基本情况"表中职称为以下五种之一：教授、副教授、讲师、助教和其他，为提高数据输入效率，可以设置字段的属性是

A．显示控件
B．有效性规则
C．有效性文本
D．默认值

单项选择题

某体检记录表中有日期/时间型数据"体检时间"，若规定在体检30天后复检，建立生成表查询，生成列"复检时间"预给出复检日期，正确的表达式是

A．复检时间:[体检日期]+30
B．复检时间:体检日期+30
C．复检时间:date()-[体检日期] = 30
D．复检时间:day( date())-([体检日期])=30

单项选择题

在"成本表"中有字段：装修费、人工费、水电费和总成本。其中，总成本=装修费+人工费+水电费，在建表时应将字段"总成本"的数据类型定义为

A．数字
B．单精度
C．双精度
D．计算

单项选择题

某体检记录表中有日期/时间型数据"体检日期"，若规定在体检30天后复检，需在本表中建立新字段"复检日期"，并给出预计的复检日期。在下列设计视力中，设置"复检日期"为计算字段，在表达式栏中，正确的表达式是

A．Date()+30
B．[体检日期]+30
C．Date()-[体检日期] = 30
D．Day( date())-([体检日期])=30

单项选择题

在"成绩表"中有字段：平时成绩、期中考试、期末考试和总评成绩。其中，总评成绩=平时成绩＋期中考试×20%＋期末考试×70%，在建表时应将字段"总评成绩"的数据类型定义为（）

A．文本
B．长整型
C．单精度
D．计算

单项选择题

在"教师"表中，若查找"职工编号"是"T00001"或"T00002"的记录，应在查询设计视图的"条件"行中输入

A．T00001 or "T00002"
B．Like ("T00001","T00002")
C．T00001 And "T00002"
D．Like "T00001" And Like "T00002"

单项选择题

体检表中有日期/时间型数据"体检时间"，若规定在体检4周后复检，建立生成表查询，生成列"复检时间"要自动给出复检的日期，正确的表达式是

A．复检时间:DateAdd("w",4,[体检时间])
B．复检时间:DateAdd("ww",4,[体检时间])
C．复检时间:Datediff("w",4,[体检时间])
D．复检时间:Datediff("ww",4,[体检时间])

单项选择题

要调整数据表中信息系1990年以前参加工作教师的住房公积金，应使用的操作查询是

A．生成表查询
B．更新查询
C．删除查询
D．追加查询

单项选择题

下列与表中字段相关的属性中，通过设置可以提高查询速度的属性是

A．默认值
B．有效性规则
C．智能标记
D．索引

单项选择题

在报表的视图中，能够预览显示结果，并且又能够对控件进行调整的视图是（）

A．设计视图
B．报表视图
C．布局视图
D．打印视图

单项选择题

下列可用于创建窗体或修改窗体的视图是

A．设计视图
B．窗体视图
C．数据表视图
D．透视表视图

单项选择题

设计窗体时，可通过设置命令按钮的一个属性来指定按钮上要显示的文字，该属性是

A．名称
B．标题
C．格式
D．图像

单项选择题

报表页眉的作用是

A．显示报表中字段名或对记录的分组名
B．显示报表的标题、图形或说明性文字
C．显示本页的汇总说明
D．显示整份报表的汇总说明

单项选择题

要使打印的报表每页显示 3 列记录，在设置时应选择

A．工具箱
B．页面设置
C．属性表
D．字段列表

单项选择题

窗体中有文本框Text1。运行程序，输入大于0的整数m，单击按钮Command1，程序显示由星号组成的高度为m的等腰三角形。例如，当m=5时，显示图形如下。 * * * * * * * * * * * * * * * * * * * * * * * * 事件代码如下。Private Sub Command1_Click() m = Val(Me!Text1) result = "" For k = 1 To m For n = 1 To k + m - 1 If 【】 Then result = result & " " Else result = result & " " End If Next n result = result + Chr(13) Next k MsgBox result, , "运行结果"End Sub程序【】处应填写的语句是

A．n < m - k + 1
B．n <= m - k + 1
C．n > m - k + 1
D．n >= m - k + 1

单项选择题

登录窗体如图所示。单击"登录"按钮，当用户名及密码正确时则会弹出窗口显示"OK"信息。下列过程不能完成此功能的是

A．Private Sub cmdOK_Click() If txtUser.Value = "zhangs" And txtPW.Value = "123" Then MsgBox "OK" End if End Sub
B．Private Sub cmdOK_Click() If txtUser.Value = "zhangs" Then If txtPW.Value = "123" Then MsgBox "OK" End if End if End Sub
C．Private Sub cmdOK_Click() If txtUser.Value = "zhangs" Then If txtPW.Value = "123" Then MsgBox "OK" End if End Sub
D．Private Sub cmdOK_Click() If txtUser.Value = "zhangs" and txtPW.Value = "123" Then MsgBox "OK" End If End Sub

单项选择题

窗体中有文本框为Text1、Text2和Text3。运行时在Text1中输入整数m，在Text2中输入整数n（m

A．k = IIf(m Mod 2 = 0, m, m + 1)
B．k = IIf(m Mod 2 <> 0, m, m + 1)
C．k = IIf(m Mod 2 > 0, m, m + 1)
D．k = IIf(m Mod 2 < 0, m, m + 1)

单项选择题

窗体中有文本框Text1和标签Label1。运行程序，输入大于0的整数m，单击按钮Command1，程序判断m是否为素数，若是素数，则Label1显示"m 是素数"，否则显示"m 是合数"。事件代码如下：Private Sub Command1_Click() m = Val(Me!Text1) 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 = resultEnd Sub程序【】处应填写的语句是

A．Exit
B．Exit Loop
C．Exit While
D．Exit Do

单项选择题

窗体中有文本框Text1和标签Label1。运行程序时单击按钮Command1，输入整数m（m>0），判断m是否为素数，如果是素数，则在Label1中显示"m 是素数"，否则显示"m 是合数"。事件代码如下：Private Sub Command1_Click() Dim result As String m = Val(Me!Text1) result = m & " 是素数" k = 2 Do While k <= m / 2 If m Mod k = 0 Then result = m & " 是合数" Exit Do End If k = k + 1 Loop 【】= resultEnd Sub程序【】处应填写的语句是

A．Me!Label1
B．Me!Label1.Val
C．Me!Label1.Text
D．Me!Label1.Caption

单项选择题

如果变量 A 是 Boolean 型，则下列赋值语句中，正确的是

A．A = "No"
B．A = .No.
C．A = #TURE#
D．A = 2<10

单项选择题

窗体中有文本框为Text1和Text2。运行程序时单击"运行"按钮Command1，在Text1中输入整数m（m>0），在Text2中显示输出m的全部除1和自身之外的因子。例如，20的因子有2,4,5,10，输出结果为"2,4,5,10,"；16的因子为2,4,8，输出结果为"2,4,8,"。事件代码如下：Private Sub Command1_Click() m = Val(Me!Text1) resule = "" k = 2 Do If m Mod k = 0 Then result = result & k & "," k = k + 1 Loop While 【】 Me!Text2 = resultEnd Sub程序【】处应填写的语句是

A．k > m
B．k < m
C．k >= m
D．k <= m

单项选择题

在窗体中有文本框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 = resultEnd Sub程序【】处应填写的语句是

A．m
B．k < m
C．k <= m
D．m - 1

单项选择题

在窗体中变量m对应的文本框为Text1，"运行"按钮Command1对应的事件代码如下：Private Sub Command1_Click() Dim result As String m = Val(Me!Text1) result = "" For k = 1 To m For n = 1 To k + m - 1 If n < m - k + 1 Then result = result & " " Else result = result & " *" End If Next n result = result + Chr(13) Next k MsgBox result, , "运行结果"End Sub单击运行按钮后，输入m的值为5，程序的运行结果是

A．由星号组成的高为5的等腰三角形
B．由星号组成的高为5的等腰梯形
C．由星号组成的边长为5的平行四边形
D．由星号组成的边长为10的平行四边形

单项选择题

窗体中有文本框Text1、Text2和Text3。运行时在Text1中输入整数m，在Text2中输入整数n（m

A．k = IIf(m Mod 2 = 1, m, m + 1)
B．k = IIf(m Mod 2 <> 1, m, m + 1)
C．k = IIf(m Mod 2 > 1, m, m + 1)
D．k = IIf(m Mod 2 < 1, m, m + 1)

单项选择题

窗体中有文本框为Text1和Text2。运行程序，在Text1中输入整数m（m>0），单击"运行"按钮Command1，将m分解为质因子之积，并在Text2中给出结果。例如，18=233，输出结果为"2,3,3,"；28=227，输出结果为"2,2,7,"。事件代码如下：Private Sub Command1_Click() m = Val(Me!Text1) resule = "" k = 2 Do While m > 1 If m Mod k = 0 Then result = result & k & "," m = m / k Else 【】 End If Loop Me!Text2 = resultEnd Sub程序【】处应填写的语句是

A．k = k + 1
B．k = 1
C．m = m - k
D．m = m / k

单项选择题

窗体中有文本框Text1。运行程序，输入大于0的整数m，单击按钮Command1，程序显示由星号组成的高度和上底均为m的等腰梯形形。例如，当m=5时，显示图形如下。 * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 事件代码如下。Private Sub Command1_Click() m = Val(Me!Text1) result = "" For k = 1 To m For n = 1 To 【】 If n < m - k + 1 Then result = result & " " Else result = result & " " End If Next n result = result + Chr(13) Next k MsgBox result, , "运行结果"End Sub程序【】处应填写的语句是

A．k + 2 * m - 2
B．k + 2 * m
C．k + m - 1
D．k + m

单项选择题

体中有文本框Text1、Text2和Text3。运行程序时，输入整数m和n（n>0），单击按钮Command1计算下列表达式的值： SUM=m+(m-1)/2+(m+2)/3+(m-3)/4+…+(m+(-1)n+1(n-1))/n在Text3给出结果，事件代码如下：Private Sub Command1_Click() Dim sum As Double m=Val(me!Text1) n=Val(me!Text2) sum=0 For k=1 to n sum=sum+(【】)/k Next k Me!text3=sumEnd Sub程序【】处应填写的语句是：

A．m + IIf(k Mod 2 = 0, -k + 1, k - 1)
B．m + IIf(k Mod 2 = 0, k - 1, -k + 1)
C．IIf(k Mod 2 = 1, m - k + 1, m + k - 1)
D．IIf(k Mod 2 < 0, m + k - 1, -m + k - 1)

单项选择题

窗体中有文本框Text1、Text2和Text3。运行程序时，输入整数m和n（n>0），单击按钮Command1计算下列表达式的值： SUM=m-(m+1)/2+(m+2)/3-(m+3)/4+…+(-1)n+1(m+n-1)/n在Text3给出结果，事件代码如下：Private Sub Command1_Click() Dim sum As Double m=Val(me!Text1) n=Val(me!Text2) sum=0 For k=1 to n sum=sum+【】/k Next k Me!text3=sumEnd Sub程序【】处应填写的语句是：

A．IIf(k Mod 2 = 0, -(m + k - 1), (m + k - 1))
B．IIf(k Mod 2 = 0, (m + k - 1), -(m + k - 1))
C．IIf(k Mod 2 > 0, -(m + k - 1), (m + k - 1))
D．IIf(k Mod 2 < 0, (m + k - 1), -(m + k - 1))