填空题在面向对象程序设计中，从外面看只能看到对象的外部特征，而不知道也无需知道数据的具体结构以及实现操作的算法，这称为对象的{{U}} 【3】 {{/U}}。
填空题以下程序的功能是，产生10个0～1000的随机整数，放入数组Arr中，然后输出其中的最大值。请完善下列程序。 Option Base 1 Private Sub Form_Click() Dim Arr(10)As Integer Dim Max As Integer Randomize For i = 1 To 10 Arr(i)= Int(Rnd * 1000) Next i Max = 【14】 For i = 2 To 10 If 【15】 Then Max = Arr(i) End If Next i Print Max End Sub
填空题要打印出50个在-100～100之间不同的随机整数，并找出第几个是最大数。给定的程序不完整，将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim b() Randomize 【12】 Do x=Rnd If x＞0.5 Then y=1 Else y=-1 t=y*Int(Rnd*100)+1 【13】 Do While k＜j If t ＜＞ b(k)Then k = k + 1 Else Exit Do End If Loop If k=j Then ReDim Preserve b(k) b(k)=t Print b(k)； j=j+1 End If Loop Until j＞50 Print 【14】 Max=b(1) For n=2 To 50 If b(n)＞Max Then 【15】 p = n End If Next n Print "最大数是："；Max Print "位置在第"；p；"个" End Sub
填空题一个算法的时间复杂性是______的函数。
填空题函数Int(Rnd*10)+10的值的范围是______。
填空题测试是保证软件质量的重要措施，一般测试过程所产生的文档应包括：测试计划、测试过程和{{U}} 【4】 {{/U}}。
填空题算法的复杂度主要包括空间复杂度和
________
复杂度。
填空题表达式Str(Len("12345"))+Str(88.8)的值为______。
填空题在C盘当前文件夹下建立一个名为StuData.txt的顺序文件。要求用InputBox函数输入5名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。
Private Sub Form_ Click()
Open “C：StuData.txt” For OutPUt As #1
For i=1 To 5
StuNo=InputBox(“请输入学号”)
StuName=InputBox(“请输入姓名”)
StuEng=Val(InputBox(“请输入英语成绩”))
{{U}} 【15】 {{/U}}
Next i
Close #1
End Sub
填空题有如下事件过程：
Private Sub Form Active ( )
Dim Score (1 to 3) As Integer
Dim i As Integer
Dim t As Variant
Fori=3 To 1 step-1
Score (i) = 2 * i
Next
For Each t In Score
Print t
Next
End Sub
程序运行后窗体上显示的值为{{U}} 【14】 {{/U}}。
填空题下列过程的功能是：用来计算并输出S=1+1/2+1/3+…+1/100的值，请完善下列程序。
Furiction SumD (n As Integer)As Single
s = 1
i = 1
Do
i = i + 1
s = s + 1 / i
Loop Until{{U}} 【12】 {{/U}}
SumD = s
End Function
Private Sub Form Click()
sum1=SumD(100)
Print "sum1="； sum1
End Sub
填空题下列程序的作用是使用字体对话框修改文本框字体的样式，完成下列程序。 Private Sub Command1_Click() CommonDialog1.CanceIError=True On ErrorGo To ErrHandler CommonDialog1.Flags=vbCFEffects Or vbCFBoth CommonDialog1.______ Text1.Font Name=CommonDialog1.FontName Text1.Font.Size=______ Text1.Font.Bold=CommonDialog, FontBold Text1.Font.Italic=CommonDialog1Fontltalic Text1.Font.Underline=______ Text1.FontStrikethru=CommonDialog1.FontStrikethru Exit Sub ErrHandler： End Sub
填空题在窗体上画两个文本框，名字分别为Text1和Text2，然后编写下列程序。程序运行后，如果在文本框 Text2中输入lmn，那么在文本框Text1中显示的内容将是{{U}} 【8】 {{/U}}。
Private Sub Form_Load()
Show
Text1.Text=" "
Text2.Text=" "
Text2.SetFocus
End Sub
Private Sub Text2_KeyPress(KeyAseii As Integer)
Text1.Text=Text1.Text+Chr(KeyAscii-5)
End Sub
填空题【4】 是数据库设计的核心。
填空题以下过程的作用是将26个小写字母逆序打印出来，请填空。
Sub Inverse()
Fori=122 To______
PrintChr$(i)；
Nexti
End Sub
填空题窗体如图所示，其中汽车是名称为Imagel的图像框，命令按钮的名称为Command1，计时器的名称为Timer1，直线的名称为Linel。程序运行时，单击命令按钮，则汽车每0.1秒向左移动100，车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序，以便实现上述功能。1)Timer1的Interval属性的值应事先设置为{{U}}【6】{{/U}}2)PrivateSubCommand1_Click()Timer1.Enabled=TrueEndSubPrivateSubTuner1_Timer()IfImagel.Left＞{{U}}【7】{{/U}}ThenImage1.Left={{U}}【8】{{/U}}-100EndIfEndSub
填空题在窗体上画一个文本框和一个图片框，然后编写口下两个事件过程：
Private Sub Form_Click()
Text1.Text="VB程序设计"
End Sub
Private Sub Text1_Change()
Picture1. Print"VB programming"
End Sub
程序运行后，单击窗体，则在本框中显示的内容是{{U}} 【7】 {{/U}}，而在图片框中显示的内容是{{U}} 【8】 {{/U}}。
填空题随机文件以______为单位读写，二进制文件以______为单位读写。
填空题在数据库的外模式、模式和内模式三级模式的体系结构中，存在两次映像：外模式到模式的映像定义了外模式与模式之间的对应关系：模式到内模式的映像定义了数据库的逻辑结构与 【4】 之间的对应关系。
填空题在窗体上画一个命令按钮Command1，然后编写如下程序：Private Sub Command1_Click() Dim arr()As Integer ReDim arr(3) For i=0 To 3 arr(i)=i Next i x=InputBox(“请输入一个数学”) If Val(x)＞4 Then ReDim arr(4) arr(4)=x End If Me.Print(arr(4)-arr(3))End Sub 程序运行后，单击命令按钮，在输入对话框中输入12，输出结果为 【10】 。