填空题如果存在如下过程：
Private Function FMax( a( ) As Integer)
Dim First As Integer, Last As Integer, i As Integer
First = LBound(a)
Last = UBound(a)
Max = a(First)
For i = First To Last
If a (i)＞Max Then Max=a (i)
Next
FMax = Max
End Function
Private Sub Commandl Click( )
ReDim m (1 To 4) As Integer
re(1) =20: m(2) =30: m(3) =50: m(4) =100
c = FMax(m)
Print c
End Sub
单击命令按钮，其输出结果为{{U}} 【13】 {{/U}}。
填空题数据库模型提供了两层映像功能，内模式到模式间的映像使得数据存储结构改变时，逻辑结构不变，因而相应的应用程序也不必改变，这是数据库的 【5】 独立性。
填空题用二维表的形式来表示实体之间联系的数据模型叫做
________
。
填空题若已在窗体中加入一个通用对话框，要求在运行时，通过ShowOpen打开对话框时只显示扩展名为.doc的文件，则对通用对话框的Filter属性正确的设置是______。
填空题在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Click()
Textl.Text="VB程序设计"
End Sub
Private Sub Textl_Change()
Picturel.Print"VB programming"
End Sub
程序运行后，单击窗体，则在文本框中显示的内容是{{U}} 【7】 {{/U}}，而在图片框中显示的内容是{{U}} 【8】 {{/U}}。
填空题在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1。程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示，请填空。PrivateSubOption1_Click(IndexAsInteger)SelectCase______Case0a=“宋体”Case1a=“黑体”Case2a=“楷体_GB2312”EndSelectText1.______=aEndSub
填空题软件测试分为白箱(盒)测试和黑箱(盒)测试。基本路径测试方法属于______ 测试。
填空题在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： Private Sub Command1_Click() Text1．Text="计算机" Text2．Text=Text1．Text Text1．Text="等级考试" End Sub 程序运行后，单击命令按钮，两个文本框(Text1和Text2)中的内容分别为 【6】 和 【7】 。
填空题表达式Len(Six(1.3))Mod2的值为______。
填空题执行下面的程序段，x的值为【 】。
Private Sub Command1_Click()
For i=1 To 9
a=a + i
Next i
x=Val(i)
MsgBox x
End Sub
填空题问题处理方案的正确而完整的描述称为{{U}} 【1】 {{/U}}。
填空题语句Static x(7，8)As Double定义了{{U}} 【13】 {{/U}}个元素。
填空题在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1)，然后编写如下几个事件过程：PrivateSubFormLoad()Timer1.Enabled=FalseTimer1.Interval={{U}}{{U}}{{/U}}{{/U}}EndSubPrivateSubFormClick()Timer1.Enabled={{U}}{{U}}{{/U}}{{/U}}EndSubPrivateSubTimerlTimer()Label1.Caption={{U}}{{U}}{{/U}}{{/U}}EndSub程序运行后，单击窗体，将在标签中显示当前时间，每隔1s变换一次(见图10-11)。请填空。
填空题下面的程序实现矩阵的转置(即行列互换)。阅读程序并填空。 Option Base 1 Private Sub Form_Click() m=InputBox(“输入行数”):n=InputBox(“输入列数”) (11) a(mn)As Integer,b(n,m)As Integer For I=1 to m For i=1 to n a(I,j)=Int(Rnd*90)+10 Next:next For I=1 to m Forj=1 to n b(j,I): (12) Next:Next End Sub
填空题数据库逻辑结构在计算机存储空间中的存放形式称为数据的 【2】 。
填空题表达式14/5*2的值是______。
填空题把一个磁盘文件的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入另一个磁盘文件，请填空完成程序。 在窗体上建立一个文本框，在属性窗口中把该文本框的MultiLine属性设置为 True，然后编写如下的事件过程： Prlvate Sub Form_Click() Open"D:/test1.txt"For Input As # 1 Text1.FontSize＝14 Text1.FontName=“幼圆” Do While Not EOF(1) 【13】 whole$=whole$+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text＝ 【14】 Close Open"D:/test2.txt"For Output As # 1 Print # 1, 【15】 Close End Sub
填空题下列事件过程的功能是：建立一个名为Data1的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为1，2，3，…，90。请在空白处填入适当的内容，将程序补充完整。 Private Type Ang K As Integer Sinx As Single Cosx As Single End Type _________________________'定义Ang类型的变量Ksc Private Sub Form_Click() Dim Y As Single Open "C:/Datal.txt" For Random As #1 Len = 10 Put #1, 1, Ksc Y = 3.14159 / 180 For i = 1 To 90 Ksc. K=i ______= Sin(i*Y)'给变量Ksc的正弦函数值赋值 Ksc.Cosx = Cos(i*Y) Next i Close #1 End Sub
填空题在过程定义中出现的变量名叫做{{U}} 【13】 {{/U}}参数，而在调用过程时传送给过程的常数、变量、表达式或数组叫做{{U}} 【14】 {{/U}}参数。
填空题在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_click() Dim a(1 To 10) Dim p(1 To 3) k=5 For i=1 To 10 a(i)=i Next i For i=1 To 3 p(i)=a(i*i) Next i For i=1 To 3 k=k+p(i)*2 Next i Print k End Sub 程序运行后，单击命令按钮，输出结果是 【13】 。