填空题36.{{U}} {{/U}}与列表框类似,其主要区别是它同时具有文本框及一个下拉列表。它的一个优点是,它只需要在窗体上保留{{U}} {{/U}}的一个值所占的空间。
填空题黑盒测试是功能测试,用黑盒技术设计测试用例有4种方法:等价类划分、______、错误推测和因果图法。
填空题查询设计器分为上下两部分,上半部分是表的显示区,下半部分是 {{U}}【10】 {{/U}}。
填空题如图6-3所示是一个数据访问页的“设计”视图,图圈出的部分是______。
填空题若窗体中已有一个名为Command1的命令按钮、一个名为Label 1的标签和一个名为Text 1的文本框,且文本框的内容为空,然后编写如下事件代码: Private Function f(x As Long) As Boolean If x Mod 2=0 Then f=True Else f=False End If End Function Private Sub Command1_Click( ) Dim n As Long n=Val(Me!text1) p=IIf(f(n) ,“Even number”,“Odd number”) Me!Label 1.Caption=n&“is”&p End Sub 窗体打开运行后,在文本框中输入21,单击命令按钮,则标签显示内容为______。
填空题用树型结构表示实体类型及实体间联系的数据模型称为【 】;用二维表格表示实体类型及实体间联系的数据模型称为【 】。
填空题一个Access数据库对应于操作系统中的______个文件,其文件扩展名为______。
填空题Access中的事件主要有__________、__________、窗口事件和操作事件等。
填空题关系数据库中,各表之间可以相互关联,表之间的这种联系是依靠每一个独立表内部的________建立的。
填空题在Access中,数据类型主要包括:自动编号、文本、备注、数字、日期/时间、 【7】 、是/否、OLE对象、超级链接和查询向导等。
填空题在模块中执行宏的命令是使用DoCmd对象的 【10】 方法。
填空题在数据库逻辑结构的设计中,将E-R模型转换为关系模型应遵循相关原则。对于三个不同实体集和它们之间的多对多联系m:n:p,最少可转换为{{U}} 【4】 {{/U}}个关系模式。
填空题Visual Basic中,允许一个变量未加定义直接使用,这样VB即把它当做变体类型的变量。若使用Dim语句定义这种类型的变量,则在As后面应使用{{U}} 【8】 {{/U}}关键字。
填空题执行下面的程序,消息框里显示的结果是______。 Private Sub Form_Click() Dim Str As String Str="" S="Access" For i=Len(S)To 1 Step-1 Str=Str&Mid(S,i,i) Next i MsgBox Str End Sub
填空题Access中,VBA通过数据库引擎可以访问的数据库有以下三种类型:本地数据库、外部数据库和 【9】 。
填空题在窗体上添加一个命令按钮(名为Commandl),然后编写如下事件过程:
Private Sub Commandl_Click()
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
打开窗体运行后,单击命令按钮,消息框的输出结果是【 】。
填空题数据库中有“学生成绩表”,包括“姓名”、“平时成绩”、“考试成绩”和“期末总评”等字段。现要根据“平时成绩”和“考试成绩”对学生进行“期末总评”。规定:“平时成绩”加“考试成绩”大于等于85分,则期末总评为“优”,“平时成绩”加“考试成绩”小于60分,则期末总评为“不及格”,其他情况期末总评为“合格”。 下面的程序按照上述要求计算每名学生的期末总评。请在空白处填入适当的语句,使程序可以完成指定的功能。 Private Sub Command0_Click() Dim db As DAO.Database Dim rs As DAO.Recordset Dim pscj,kscj,qmzp As DAO.Field Dim count As Integer Set db=CurrentDb() Set rs=db.OpenRecordset("学生成绩表") Set pscj=rs.Fields("平时成绩") Set kscj=rs.Fields("考试成绩") Set qmzp=rs.Fields("期末总评") count=0 Do While Not rs.EOF ______ If pscj+kscj>=85 Then qmzp="优" ElseIf pscj+kscj<60 Then qmzp="不及格" Else qmzp="合格" End If rs Update count=count+1 ______ Loop rs.Close db.Close Set rs=Nothing Set db=Nothing MsgBox "学生人数:" & count End Sub
填空题在一棵二叉树中,假定度为2的结点有5个,度为1的结点有6个,则叶子结点数有 ______ 个。
填空题在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl Click() Do Until b<0 a=InputBox("输入a的值") a=Val(a) b=InputBox("输入b的值") b=Val(b) a=a +b Loop Print a End Sub 程序运行后,依次输入5,4,3,2,1,0,-1,-2,则输出结果是 【14】 。
填空题学生教学管理系统、图书管理系统都是以{{U}} 【6】{{/U}} 为基础和核心的计算机应用系统。
