填空题窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框,事件代码如下:
Private Sub Command1_Click ()
Dim a(10) As Integer , b(10) As Integer
n=3
For i=1 T0 5
a(i)= i
b(n) = 2*n+i
Next i
Me!Text1 = a(n) + b(n)
End Sub
打开窗体,单击命令按钮,文本框Text1中显示的内容是U 【10】 /U。
填空题下面程序的运行结果为【9】。 x=-2.3 y=125 z=Len(Str$(x)+Str$(y)) Print Z
填空题执行下面的程序,消息框里显示的结果是{{U}} 【13】 {{/U}}。
Private Sub Form_Click()
Dim Str As String, K As Integer
Str="ab"
For k=Len(Str) TO 1 Step-1
Str=Str & Chr(Asc(Mid(Str,k,1))+k)
Next k
MsgBox Str
End Sub
填空题有如下程序段。 Public Sub xy (a As Integer,b As Integer) Dim t As Integer Do t=a Mod b a=b:b=t Loop While t MsgBox a End Sub 用Call xy(96,40)调用该通用过程后,输出结果是______。
填空题有一个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=( 【13】 +Val(Me!Text2)+Val(Me!Text3))/3 【14】 End Sub Private Sub Command3 Click() Docmd 【15】 End Sub
填空题若按层次顺序将一棵有n个结点的完全二叉树的所有结点从1到n编号,那么当i为偶数且小于n时,结点;的右兄弟是结点{{U}} 【2】 {{/U}},否则结点;没有右兄弟。
填空题当文本框中的内容发生改变时,触发的事件名称是______。
填空题在窗体上添加一个命令按钮Command1,然后编写如下代码: Private Sub Command1_Click() sum=0 For i=3 To 7 sum=i+2 Next i MsgBox sum+i End Sub 打开窗体后,单击命令按钮,消息框的输出结果是______。
填空题在查询设计视图中,设计查询准则的相同行之间是——的关系,不同行之间是 ______的关系。
填空题在窗体上画一个命令按钮,然后编写如下事件过程:
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,则输出结果是{{U}} 【14】 {{/U}}。
填空题和文件系统相比,数据库系统的数据冗余度 【6】 ,数据共享性 【7】 。
填空题查询设计器分为上下两部分,上半部分是表的显示区,下半部分是 【10】 。
填空题完整报表设计通常由报表页眉、报表页脚、页面页眉、页面页脚、主体、______和组页脚七部分组成。
填空题下列程序的运行结果为{{U}} 【10】 {{/U}}。
A="1"
B="2"
A=Val(A) +Val(B)
B=Val("12")
If A <>B Then Print A-B Else Print B-A
填空题SQL(结构化查询语言)是在数据库系统中应用广泛的数据库查询语言,它包括了数据定义、数据查询、{{U}} 【6】 {{/U}}和{{U}} 【7】 {{/U}}4种功能。
填空题参数传递有 【12】 和按址两种方法。
填空题用户可以在Office电子表格中输入原始数据、______和执行电子表格运算。
填空题下面程序的功能是计算折旧年限。假设一台机器的原价值为100万元,如果每年的折旧率为4%,多少年后它的价值不足50万元。请填空。
y=0
p=100
x=0.04
Do
p=p*(1-x)
y=y+1
Loop Until p<{{U}} 【11】 {{/U}}
MsgBox y
填空题 【8】 是组成查询准则的基本元素。
填空题设一棵完全二叉树共有700个结点,则在该二叉树中有 【1】 个叶子结点。
