填空题以下语句的输出结果{{U}} 【1】 {{/U}}。
S$= "China"
S$= "Shanghai"。
Print S$
填空题在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程：
Private Sub Form_Load()
Show
Text1.Text=" "
Text2.Text=" "
Text2.SetFocus
End Sub
Private Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer)
Text1.Text=Text1.Text+Chr(KeyCode-4)
End Sub
程序运行后，如果在Text2文本框中输入“eFghi”，则Text1文本框中的内容为{{U}} 【11】 {{/U}}。
填空题在一个窗体上有一个命令按钮CmdMax。单击CmdMax时，窗体上显示“字体由小变大”，字号每次增加2。请填空。 Private Sub Form_Load() Form1.Caption="字体变化示范" CmdMax.Caption="字体变大" End Sub Private Sub CmdMax_Click() ______ Form1.Print"字体由小变大" Fnd Sub
填空题要使标签的背景样式为不透明，应将BackStyle属性设置为{{U}} 【7】 {{/U}}。
填空题要使工具栏控件的某按钮呈按钮菜单的样式，可以在其属性页中设置其______选项为5-tbrDropDown。
填空题设窗体上有—个名称为Combo1的组合框，并有以下程序：
Privale Sub Combol_ KeyPress(KeyAscii As Integer)
If{{U}} 【9】 {{/U}}=13 Then 回车符的ASCII码是13
For k=0 To Combo1. ListCount-1
If Combo1.Text=Combol. List(k)Then
Combo1.Text=" "
Exit For
End If
Next k
If Combo1. Text＜＞" "Then
Combo1. AddItem{{U}} 【10】 {{/U}}
End If
End If
End Sub
程序的功能是：在组合框的编辑区中输入文本后按回车键，则检查列表中有无与此文本相同的项目，若有，则把编辑区中的文本删除，否则把编辑区中文本添加到列表的尾部。请填空。
填空题在奥运会游泳比赛中，一个游泳运动员可以参加多项比赛，一个游泳比赛项目可以有多个运动员参加，游泳运动员与游泳比赛项目两个实体之间的联系是【6】联系。
填空题数据库三级模式体系结构的划分，有利于保持数据库的{{U}} 【4】 {{/U}}。
填空题窗体上有名称为Command1的命令按钮。事件过程及2个函数过程如下：
Private Sub Command1_Click()
Dim x As Integer，y A8 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
Function fy(ByRef a As Integer)
a=a+a
fy=a
End Function
运行程序并单击命令按钮，则窗体上显示的两个值依次是{{U}} [12] {{/U}}和{{U}} [13] {{/U}}。
填空题语句print"25+32=";25+32的输出结果是
________
。
填空题下列语句的输出结果是 【7】 。 Print Format$(1258.6，"000，000.00")
填空题Jackson结构化程序设计方法是英国的M.Jackson提出的，它是—种面向{{U}} 【3】 {{/U}}的设计方法。
填空题应用程序结构指的是组织指令的{{U}} 【6】 {{/U}}，即指令存放的{{U}} 【7】 {{/U}}和指令的{{U}} 【8】 {{/U}}顺序。
填空题下列过程的功能是：用来计算并输出S = 1+1/2+1/3+…+1/100的值。请完善下列程序。 Function SumD(n As Integer)As Single s = 1 i = 1 Do i = i + 1 s = s + 1 / i Loop Until ______ SumD = s End Function Private Sub Form_Click( ) sum1 = SumD(100) Print "sum1 = "; sum1 End Sub
填空题数据的基本单位是 【5】 。
填空题下面的程序是用冒泡法将数组a中的10个整数按升序排列，并将程序补充完整。 Private Sub Command1_Click() Dim a Dim Tmp As Integer a=Array(678 , 45 , 324 , 528 , 439 , 387 , 87 , 875 , 273 , 823) For i=______ For j=______ If a(i)______a(j)Then Tmp=a(i) a(i)=a(j) a(j)=Tmp End If Next j Next i For i=0 To 9 Print a(i) Next i End Sub
填空题在窗体上画一个名为Command1的命令按钮。下列程序的功能是：从输入对话框输入一个正整数n。用随机函数产生n个1～100范围的随机数，然后求出去掉一个最大数和最小数的平均数。根据题意，请完善下列程序：
Private Sub Command1_Click()
Dim ave As Single, max As Integer, i As Integer, n As Integer
Dim min As Integer, Sum As Integer, s As String
Dim t As Integer
s=InputBox("输入一个正整数:")
n=Val(s)
If n＞0 Then
max=n: min=n: Sum=0
For j=1 To n
t={{U}} 【9】 {{/U}}
Print t;
Sum=Sum+t
If t＜min Then
min=t
Elself max＜t Then
max=t
End If
Next j
{{U}} 【10】 {{/U}}
ave=Sum/n
MsgBox"平均值="+Str(ave)，，"去掉最大数和最小数后"
End If
End Sub
填空题在窗体上画一个通用对话框，其名称为CommandDialog1，再画一个命令按钮，其名称为Command1。程序运行时，单击命令按钮，在对话框内只允许显示文本文件。将以下程序补充完整。 Private Sub Command1_Click() CommandDialog1．Filter= 【15】 CommandDialog1．ShowOpen End Sub
填空题图像框和图片框在使用时有所不同，这两种控件中，能作为容器容纳其他控件的是______。
填空题在程序中使用日期型数据时，必须用符号______将日期型数据括起来。