填空题用VBA编程操作本地数据库时,提供一种DAO数据库打开的快捷方式是CurrentDB( ),而相应也提供一种ADO的默认连接对象是______。
填空题有一个VBA计算程序的功能如下,该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4。3个按钮分别为:清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后,单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Textl、Text2和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中;单击退出按钮则退出。请将下列程序填空补充完整。 Private Sub Commandl_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 Ne!Text4=( 【13】 +Val(Me!Text2)+Val(Me[Text3))/3 【14】 End Sub Private Sub Command3_Click() Docmd. 【15】 End Sub
填空题窗体由多个部分组成,每个部分称为一个节,大部分的窗体只有{{U}} 【11】 {{/U}}。
填空题VBA提供了多个用于数据验证的函数。其中IsDate函数用于合法日期验证;______函数用于判定输入数据是否为数值。
填空题假设一连锁书店的数据库中有3个表:连锁分店信息表STORES(STOR ID,STOR NAME),书籍销售信息表SALES(STOR ID,TITLE ID,QTY)和书籍信息表TITLES (TITLE ID,TITLE)。要查询各分店销售某书的数量,相应的SQL语句应该是:
SELECT STOR_NAME,QTY,TITLE
FROM TITLES,STORES,SALES
WHERE TITLES.TITLE_ID=SALES.TITLE_ID AND{{U}} 【11】 {{/U}}。
填空题运行程序,当窗体加载事件发生: Private Sub Form_Load( ) Dim b As Single Dim t as Integer t=0 b=20 Do t=t+1 b=b/2 Loop Until b<0.5 MsgBox b MsgBox"共循环了"&t&"次" End Sub 此程序运行结果为______。
填空题设有以下窗体单击事件过程。 Privafe Sub FormClick() a=1 For i=1 To 3 Select Case i Case 1,3 a=a+1 Case 2,4 a=a+2 End Select Next i MsgBox a End Sub 打开窗体运行后,单击窗体消息框的输出内容应为______。
填空题有如下程序 a$="Flying":b$="IS":c$="funny!” Printa$+""+LCase$(bS)十+""UCaseS(c$S) End 运行后输出的结果是______。
填空题一个主报表最多只能包含{{U}} 【12】 {{/U}}子窗体或子报表。
填空题控件的类型可以分为:结合型、非结合型与计算型。结合型控件主要用于显示、输入、更新数据库中的字段:非结合型控件______;计算型控件用表达式作为数据源。
填空题设一个关系为R(A,B,C,D,E),它的最小函数依赖集为FD=A→B,A→C,(C,D)→E),则该关系的候选码为______,候选码函数决定E是,______性。
填空题下列软件系统结构图的宽度为【4】。
填空题程序执行结果s的值是{{U}} 【14】 {{/U}}。
Private Sub Command1_click()
i=0
Do
s=i+s
i=i+1
Loop Until i>=4
End Sub
填空题建立表结构的方式有使用______,使用______,使用______。
填空题有一个VBA计算程序的功能如下:该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4,3个按钮分别为:清除(名为 C1) 、计算(名为C2) 和退出(名为C3)。窗体打开运行后,单击“清除”按钮,则清除所有文本框中显示的内容;单击“计算”按钮,则计算在Text1、Text2和Text3三个文本框中输入的3个数字的和并将结果存放在名为Text4的文本框中;单击“退出”按钮则退出程序。请将下列程序填空补充完整。 Private Sub C1_Click() Me!Text1="" Me!Text2="" Me!Text3="" Me!Text4="" End Sub Private Sub C2_Click() If Me!Text1=""Or Me!Text2=""Or Me!Text3=""Then MsgBox“三个文本框都要输入值!” [11] Me!Text4=(Val(Me!Text1) +Val(Me!Text2) + [12] ) End If End Sub Private Sub C3_Click() Docmd. [13] End Sub
填空题假定当前日期为2002年8月25日,星期日,则执行以下语句后,a、b、c和d的值分别是25、8、2002、 【13】 。 a=day(now) b=month(now) c=year(now) d=weekday(now)
填空题Access数据库中,表与表之间的关系分为一对一、______和多对多等3种。
填空题在窗体中添加一个名称为Com1的命令按钮,然后编写如下程序: Private Sub s(ByVal p As Integer) p=p*2 End Sub Private Sub Com1_Click() Dim i As Integer i=3 Call s(i) If i>4 Then i=i^2 MsgBox i End sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
填空题执行下面的程序段后,变量S的值为{{U}} 【13】 {{/U}}。
S=5
For i=2.6 To 4.9 Step 0.5
S=S +i
Next i
填空题Access提供了两种字段数据类型保存文本和数字组合的数据,这两种类型是:文本和 【6】 。