填空题实现数据库操作的DAO技术,其模型采用的是层次结构,其中处于最顶层的对象是 【12】 。
填空题在窗体中的文本框分为结合型和 【6】 两种。
填空题若窗体中已有一个为Command1的命令按钮、一个名为Label1的标签和一个名为Text1的文本框,且文本框的内容为空,然后编写如下事件代码: 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!Label1.Caption=n&"is"&p End Sub 窗体打开运行后,在文本框中输入21,单击命令按钮,则标签显示内容为______。
填空题“设计视图”是创建与设计数据访问页的一个可视化的______。
填空题在数据的存储结构中,不仅需要存储各数据元素的信息,还要存放各元素之间的信息。
填空题 【10】 是窗体上用于显示数据、执行操作、装饰窗体的对象。
填空题在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1 Click()
x=0
n=InputBox(" ")
For i=1 To n
For j=1 To i
x=x +l
Next j
Next i
Print x
End Sub
程序运行后,单击命令按钮,如果输入3,则在窗体上显示的内容是{{U}} 【9】 {{/U}}。
填空题下列程序的运行结果为 【11】 。 A="1" B="2" A=Val (A) +Val (B) B=Val ("12") If A<>B Then Prink A-B Else Print B-A (11)阅读下列程序: Option Base 1 Private Sub Form Click() Dim x(3,3) For j=1 to 3 For k=1 to 3 If j=k then x(j,k)=1 If j<> k then x(j,k)=3 Next k Next j Call fun(x()) End Sub Private Sub fun(a()) For j=l to 3 For k=1 to 3 Print a (j.k); Next k Next j End Sub 运行程序时,输出的结果是 【12】
填空题有一个VBA计算程序的功能如下:该程序用户界面由3个文本框和3个按钮组成,3个文本框的名称分别为Text1、Text2和Text3,3个按钮分别为清除(名为Command1) 、计算(名为 Command2) 和退出(名为Command3) 。窗体打开运行后,单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Text1和Text2两个文本框中输入的数值的和并将结果存放在Text3文本框中;单击退出按钮则退出。请将下列程序填空补充完整。 Private Sub Command1_Click( ) Me!Text1="" Me!Text2="" Me!Text3="" End sub Private Sub Command2 Click( ) If Me!Text1=""Or Me! Text2=""Or Me! Text3=""Then MsgBOx"输入不全" Else Me!Text4=( [13] +Val(Me!Text2)) [14] End Sub Private Sub Command3 Click( ) DocmD [15] End Sub
填空题已经设计出一个表格式表单窗体,可以输出学生表的相关字段信息。请按照以下功能补充设计:改变当前记录,消息框弹出提示“是否删除该记录?”,单击“是”按钮,则直接删除该当前记录;单击“否”按钮,则什么都不做。其效果图如下:单击“退出”按钮,关闭窗体。PrivateSubbtnCancel_Click()DoCmd.CloseEndSubPrivatesub{{U}}{{/U}}()IfMsgBox("是否删除该记录?",vbQuestion+vbYesNo,"确认")={{U}}{{/U}}Then{{U}}{{/U}}EndIfEndSub
填空题Visua1Basic中,允许一个变量未加定义直接使用,这样VB即把它当做某种类型的变量,若使用Dim语句定义这种类型的变量,则在As后面应使用上 【14】 关键字。
填空题在“表”浏览窗口,表中的数据显示顺序,通常是根据______排列的。
填空题设有“a=5,b=6,c=7,d=8”,则执行语句x=IIF((a>B) And(c>D) ,10,20)后,x的值为 ______。
填空题下面程序的输出结果为______。
a=4.5
b=-123
c=Len(Str(B) +Str(A))
Msg Box c
填空题结合型文本框可以从表、查询或______中获得所需的内容。
填空题断点的功能是 【10】 。
填空题在数据表中,将记录定位到第一条记录中的第一字段的快捷键为______。
填空题在Access中,创建主/子窗体有两种方法:一是同时创建主窗体和子窗体,二是将______作为子窗体加入到另一个已有的窗体中。
填空题将活动窗口最小化的宏操作是【11】 。
填空题子过程Test显示如下所示的4×4乘法表。 1*1=1 1*2=2 1*3=3 1*4=4 2*2=4 2*3=6 2*4=8 3*3=9 3*4=12 4*4=16 请在空白处填入适当的语句使子过程完成指定的功能。 Sub Test() Dim i,j As Integer For i=1 To 4 For i=1 To 4 If ______ Then DebugPrint i&"*"&j&"="&i*j&Space(2), End If Next j Debug.Print Next i End sub
