填空题在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click() Text1.Text = "VB程序设计"
End Sub
Private Sub Text1_Change() Picture1.Print "VB Programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是 _________，而在图片框中显示 的内容是 _________。
填空题已知B的ASCII码为66，以下程序统计由键盘输入的字符串中各英文字母的使用次数
Dim pp (65 To 90)
For i = 65 To 90
pp(i) =0
Next
x$ = InputBox(" Enter a string", x$ )
x$ = UCase$ (x$)
For i = 1 To Len (x$)
n =Asc(Mid$ (x$, i, 1) )
If n＞= 65 And n＜ = 90 Then
{{U}} 【11】 {{/U}}
End If
Next
For i = 65 To 90
Ifpp(i)＞0Then
Print Chr$ (i) ; pp (i)
End If
Next
填空题下列程序弹出对话框中按钮的个数为______。 MsgBox"确认!",vbAbortRetrylgnore+vbMsgBoxHelpButton+vbQuestion,"提示/
填空题长度为n的顺序存储线性表中，当在任何位置上插入一个元素概率都相等时，插入一个元素所需移动元素的平均个数为{{U}} 【1】 {{/U}}。
填空题下面程序段的输出结果是{{U}} 【6】 {{/U}}。
p = 0
s = 0
Do
p = p + 2
s = s + p
Loop While p＜11
Print “s=”; s
填空题如下图所示，在列表框List1中已经有若干人的简单信息，运行时在Text1文本框(即“查找对象”右边的文本框)输入一个姓或姓名，单击“查找”按钮，则在列表框中进行查找，若找到，则把该人的信息显示在Text2文本框中。若有多个匹配的列表项，则只显示第1个匹配项；若未找到，则在Text2中显示“查无此人”。请填空。
Private Sub Commandl_CliCk() Dimk As Integer，n As
Integer，found As Boolean found=False
n=Len{{U}} [8] {{/U}} k=0
Whlek＜LiStl.ListCount And Not found If
Text1=Left$(Listl.List(k)，n)Then Tex2={{U}}
[9] {{/U}} found=True
End If k=k+1 Wend
If Not found Then Text2=“查无此人”
End If End Sub
填空题线性表是最简单的一种数据结构，有顺序和链接两种存储方式。线性表按链接方式存储时，对每个结点的存储包括{{U}} 【1】 {{/U}}两部分。
填空题要选择多个不相邻的控件，按住______或SHIFT键不放，再单击要选择的控件。
填空题窗体上有名称为Command1的命令按钮事件过程及2个函数过程如下：
Private Sub Command1_Click()
Dim x As Integer，y As Integer，z
x=3
y=5
z=fy(y)
Print fx(fx(x)),y
End Sub
Function fx(ByVal a As Integer)
a=a+a
fx=a
End Function
fy=a
Function fy(ByRef a As Integer)
a=a+a
fy=a
End Function
运行程序，并单击命令按钮，则窗体上显示的2个值依次是______和______。
填空题在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label1中显示所选中的项目，如下图所示。请在空白处填入适当的内容，将程序补充完整。PrivateSubForm_Load()List1.AddItem”北京”List1.AddItem“上海“List1.AddItem“河北”EndSubPrivateSubListLDblclick()Label1.Caption=(6)EndSub
填空题下列软件系统结构图的宽度为________
填空题软件的需求分析阶段的工作，可以概括为四个方面： 【4】 、需求分析、编写需求规格说明书和需求评审。
填空题下列程序的功能是：将数据1，2，…，10写入顺序文件Base．txt中，请填空。
Private Sub Form_Click()
Dim i As Integer
Open{{U}} 【11】 {{/U}} As #1
For i=1 To 10
{{U}} 【12】 {{/U}}
Next i
Close #1
End Sub
填空题系统符号常量的定义可以通过______获得。
填空题设有下列循环：
x=1
Do
x=x+2
Print x
Loop Until 【 】
要求程序运行时执行3次循环体，请填空。
填空题以下程序的功能是将多维数组a(1 To m,1 To n)中的元素转移到一个名为b(1 To n*m)的一维数组中，完成该程序。 OptionBase 1 Private Sub Command1_Click(Index As Integer) Dima(1 To 20,1 To 10) Dim b() ReDimb(1 To 200) For i=1 To 20 For j=1 To 10 A(i,j)=i*j Next j Next i Tran a,20,10b End Sub Sub Tran(a()an,n,b()) Dim i As Integer For i=1 To m For j=1 To n ______=a(i,j) Next j Next i End Sub
填空题以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分后的平均分即为景后得分)，如图所示。请填空。PrivateSubCommand1_Click()DimkAsIntegerDimsumAsSingle，maxAsSingle，minAsSinglesum=Text1(0)max=Text1(0)min={{U}}{{U}}{{/U}}{{/U}}Fork={{U}}{{U}}{{/U}}{{/U}}To6Ifmax＜Text1(k)Thenmax=Text1(k)EndIfIfmin＞Textloc)Thenmin=Text1(k)EndIfsum=sum+Textl(k)NextkText2={{U}}{{U}}{{/U}}{{/U}}/5EndSub
填空题在程序中动态地给图片框加载图像文件的函数为______。
填空题新建一个工程，内有两个窗体，窗体Form1上有一个命令按钮Command1，单击该按钮，Form1窗体消失，显示Form2窗体，程序如下，请填空。 Private Sub Command1_Click() Form1.Hide Form2. (12) End Sub
填空题数据库完整性的实现应该包括两个方面：一是系统要提供定义完整性约束条件的功能；二是提供 【5】 的方法。