填空题给定一个程序段:
A$: "Beijing"
B$="shanghai"
C$="jig"
K=InStr(Left(A$, 5) + Right(B$, 4), C$)
运行该程序段后,变量K的值为{{U}} 【13】 {{/U}}。
填空题数据函数Abs(数值表达式)返回数值表达式值的______。
填空题运行以下程序段后,输出结果为{{U}} 【7】 {{/U}}。
For I=1 To 3
Cls
Print"I=",I;
Next
填空题运行以下程序段后,输出结果为{{U}} 【11】 {{/U}}。
a=4:b=2
Print a*(a-b)
填空题VBE属性窗口提供了“按字母序”和________两种属性查看形式。
填空题与结构化需求分析方法相对应的是 【3】 方法。
填空题在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click() a=0 For i=1 to 2 For j=1 To 4 If j Mod 2<>0 Then a=a+1 End If a=a+1 Next j Next i MsgBox a End Sub程序执行后,单击命令按钮,消息框显示的是 【15】 。
填空题数据结构分为线性结构与非线性结构,带链的栈属于 【l】 。
填空题VBA中主要提供了3种数据库访问接口:ODBCAPI、DAO和{{U}} 【13】 {{/U}}。
填空题通过在窗体中插入______,用户就可以很方便地把Access的各个对象联系起来。
填空题在Access中,用户在U【7】/U中可以创建或修改宏的内容。
填空题在VBA中双精度的类型标识是{{U}} 【11】 {{/U}}。
填空题有“数字时钟”窗体如下:在窗口中有“[开/关]时钟”按钮,单击该按钮可以显示或隐藏时钟。其中按钮的名称为“开关”,显示时间的文本框名称为“时钟”,计时器间隔已设置为500。请在空白处填入适当的语句,使程序可以完成指定的功能。DimflagAsIntegerPrivateSubForm_Load()flag=1EndSubPrivateSubFormTimer()'“计时器触发”事件过程时钟=Time'在“时钟”文本框中显示当前时间EndSubPrivateSub开关_Click()'“开关”按钮的单击事件过程If______Then时钟.Visible=Falseflag=0Else时钟.Visible=Trueflag=1EndIfEndSub
填空题已知一个名为“学生”的Access数据库,库中的表“stud”存储学生的基本信息,包括学号、姓名、性别和籍贯。下面程序的功能是:通过下图所示的窗体向“stud”表中添加学生记录,对应“学号”、“姓名”、“性别”和“籍贯”的四个文本框的名称分别为tNo、tName、tSex、tRes。当单击窗体中的“增加”命令按钮(名为Command1)时,首先判断学号是否重复,如果不重复则向“stud”表中添加学生记录;如果学号重复,则给出提示信息。请依据所要求的功能,将如下程序补充完整。DimADOcnAsNewADODB.ConnectionPrivateSubFormLoad()'打开窗口时,连接Access数据库SetADOcn=CurrentProiect.ConnectionEndSubPrivateSubCommand1Click()'增加学生记录DimstrSQLAsStringDimADOrsAsNewADODB.RecordsetSetADOrs.ActiveConnectipn=ADOcnADOrs.Open"Select学号FromStudWhere学号=''+tNo+''IfNotADOrs0[14]Then'如果该学号的学生记录已经存在,则显示提示信息MsgBox''你输入的学号已存在,不能增加!''Else'增加新学生的记录strSQL="InsertIntostud(学号,姓名,性别,籍贯)strSQL=strSQL+"Values("+tNo+","+tName+","+tSex+","+fires+")"ADOcn.Execute[15]MsgBox"添加成功,请继续!"EndIfADOrs.CloseSetAPOrs=NothingEndSub
填空题有如下程序: Option Base 1 Private Sub Form_Click() Dim arr,Sum Sum=0 art=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3=arr(i)/3 Then Sum=Sum+arr(i) End If Next i MsgBox Sum End Sub 程序运行后,单击窗体,消息框的输出结果为______。
填空题在关系运算中,要从关系模式中指定若干属性组成新的关系,该关系运算称为 ______ 。
填空题连接运算是将两个或两个以上的关系根据连接条件生成一个{{U}} 【1】 {{/U}}。
填空题以下是一个比赛的评分系统,假设有8名评委,评分标准是去掉一个最高分和一个最低分,剩余分数的平均分即为选手的得分。试将程序补充完整。
Private sub Form_Click( )
Dim max as integer,min as integer,i as integer,num as integer,sum as integer,avg as single
max=0
min=10
For i=1 to 8
num=val(inputbox("请输入分数" )
if{{U}} 【13】 {{/U}}then max=hum
if{{U}} 【14】 {{/U}}then min=num
sum=sum+num
Next i
sum={{U}} 【15】 {{/U}}
avg=sum/6
Msgbox "最后得分:" & avg
End sub
填空题“______”指定对值的分组方式。可用的选项取决于分组字段的数据类型。如果是按表达式分组,将显示对所有数据类型的所有选项。
填空题在面向对象方法中,类的实例称为 【2】 。
