填空题如果需要在宏中设置属性值,则首先需要添加{{U}} 【9】 {{/U}}操作,将其操作的Item操作参数设为一个表达式,该表达式引用要设置的属性。
填空题在关系数据库的基本操作中,从表中取出满足条件的元组的操作称为 【6】 。
填空题使用查询向导创建交叉表查询的数据源必须来自{{U}} 【9】 {{/U}}个表或查洵。
填空题在双链表中,每个结点有两个指针域,一个指向前驱结点,另一个指向{{U}} 【2】 {{/U}}。
填空题运行下面程序,其输出结果(str2的值)为 【13】 。 Dim str l,str2 As String Dim I As Integer str l= “abcdef” For l To Len (strl) Step2 str2=UCase (Mid (strl,I ,1))十str2 Next MsgBoxstr2
填空题操作查询共有4种类型,分别是删除查询、 【6】 、追加查询和生成表查询。
填空题某次大奖赛有7个评委同时为一位选手打分,去掉一个最高分和一个最低分,其余5个分数的平均值为该名参赛者的最后得分。请填空完成规定的功能。 Sub command1_click() Dim mark!,aver!,i%,max1!,min1! aver=0 For i=1 To 7 Mark=InputBox("请输入第"& i & "位评为的打分") If i=1 then maxl=mark:mini=mark Else If mark<minl then minl=mark ElseIf mark>max1 then ______ End If End If ______ Next j aver=(aver-max1-mini)/5 MsgBox aver End Sub
填空题在Visual FoxPro中参数传递的方式有两种,一种是按值传递,另一种是按引用传递,将参数设置为按引用传递的语句是:
SET UDFPARMS{{U}} 【4】 {{/U}}
填空题多字段排序时,排序的优先级是{{U}} 【11】 {{/U}}。
填空题Access中的备注数据类型最多可以存储 【10】 字符。
填空题在下面的程序中,要求循环体执行四次,请填空。
Private Sub Command l-Click ()
x=l
Do While{{U}} 【13】 {{/U}}
x=x+2
Loop
End Sub
填空题窗体中有两个命令按钮:“显示”(控件名为cmdDisplay) 和“测试”(控件名为cmdTest) 。以下事件过程的功能是:单击“测试”按钮时,窗体上弹出一个消息框。如果单击消息框的“确定”按钮,隐藏窗体上的“显示”命令按钮;单击“取消”按钮,关闭窗体。按照功能要求,将程序补充完整。
Private Sub cmdTest Click( )
Answer={{U}} [14] {{/U}}(“隐藏按钮”,vbOKCancel)
If Answer=vbOK Then
cmdDisplay.Visible={{U}} [15] {{/U}}
Else
Docmd.Close
End If
End Sub
填空题下图所示的窗体上有一个命令按钮(名称为Command1)和一个选项组(名称为Framel),选项组上显示“Framel”文本的标签控件名称为Labell,若将选项组上显示文本“Frame1”改为汉字“性别”,应使用的语句是【6】。
填空题字段有效性规则是在给字段输入数据时所设置的 。
填空题表操作共有三种视图,分别是设计视图、打印视图和 【10】 视图。
填空题Access中,超级链接地址最多包含三部分:Displaytext、 【7】 、Subaddress。
填空题返回给定日期1~7的值。表示给定日期是一周中的哪一天的函数为______。
填空题在创建报表的过程中,可以控制数据输出的内容、输出对象的显示或打印格式,还可以在报表制作的过程中,进行数据的 【7】 。
填空题 【9】 是在输入或删除记录时,为维持表之间已定义的关系而必须遵循的规则。
填空题有一个VBA计算程序的功能如下,该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4。3个按钮分别为:清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后,单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Text1、Text2和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中;单击退出按钮则退出。请将下列程序填空补充完整。
Private Sub Command1_Click()
Me!Text1=" "
Me!Text2=" "
Me!Text3=" "
Me!Text4=" "
End Sub
Private Sub Command2_Click()
If Me!Text1=" " Or Me!Text2=" " Or Me!Text3=" "Then
MsgBox"成绩输入不全"
Else
Me!Text4=({{U}} 【13】 {{/U}}+Val(Me!Text2)+Val(Me!Text3))/3
{{U}}【14】 {{/U}}
End Sub
Private Sub Command3 Click()
Docmd{{U}} 【15】 {{/U}}
End Sub
