填空题在下面程序的执行过程中，将要进行{{U}} 【13】 {{/U}}次循环，而在第3次循环输出的数据是{{U}} 【14】 {{/U}}。
Private Sub Command1 Click()
Dim b(-1 To 3)
For i=LBound(b，1)To UBound(b，1)
b(i)=2*i
Print i，b(i)
Next i
End Sub
填空题数据是信息的符号表示，又称载体；信息是数据的{{U}} 【5】 {{/U}}。
填空题排序是计算机程序设计中的一种重要操作，常见的排序方法有插入排序、 【1】 和选择排序等。
填空题对软件是否能达到用户所期望的要求的测试称为 【4】 。
填空题在Visual FoxPro中如下程序的运行结果(即执行命令DO main后)是【15】。
*程序文件名：main.prg
SET TALK OFF
CLOSE ALL
CLEAR ALL
mX=″Visual FoxPro″
mY=″二级″
DO s1
?xY+mX
RETURN
*子程序文件名：s1.prg
PROCEDURE s1
LOCAL mX
mX=″Visual FoxPro DBMS 考试″
mY=″计算机等级″+mY
RETURN
填空题在程序执行闲置循环过程中，程序的控制权被系统占用。若要获得控制权，可以使用一个语句，这样用户可以在获得系统的控制权后进行其他操作，这个语句是{{U}} 【7】 {{/U}}。
填空题有一个事件过程，其功能是：从已存在于磁盘上的顺序文件NM1.txt中读取数据，计算读出数据的平方值，将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。 Private Sub Form_Click() Dim x As Single，y As Single Open "NM1.txt" For Input As #1 Open "NM2.txt "For Input As #2 Do While Not EOF(1) 【10】 Print x y=x^2 【11】 Print y Loop Close #1, S2 End Sub
填空题为了防止用户随意将光标置于控件上，应将控件的______属性设置为False。
填空题设某循环队列的容量为50，如果头指针front=45(指向队头元素的前一位置)，尾指针rear=10(指向队尾元素)，则该循环队列中共有 (1) 个元素。
填空题在窗体上先画一个名为Text1的文本框和—个名为Label1的标签，再画—个名为Op1的有4个单选按钮的单选按钮选项组，其Index属性按季度顺序为0～3(见图1)。在文件sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时，鼠标单击—个单选按钮，则Text1中显示相应季度的销售总额，并把相应的文字显示在标签上。图2是单击“第三季度”单选按钮所产生的结果。请填空。Dimsales(12)AsLongPrivateSubForm_load()Open"sales.txt"ForInputAs#1Fork=1To12Input#1,sales(k)NextkClose#1EndSubPrivateSub{{U}}【12】{{/U}}(IndexAsInteger)DimsumAsLong,kAsInteger,monthAsIntegersum=0month=Index*{{U}}【13】{{/U}}Fork=1To3month=month+1sum=sum+sales(month)NextKLabel1.Caption=Op1(Index).{{U}}【14】{{/U}}&"销售总额"Text1=sumEndSub
填空题一个程序最多可以有{{U}} 【7】 {{/U}}窗体。
填空题执行如下程序段后，intsum的值为______。 Private Sub Command1_Click() sum=0 For i=1 To 18 Step 2 For j=2 To 6 If(i Modj)＜＞0 Then sum=sum+j Next Next Print sum End Sub
填空题属性窗口分为4个部分，这4个部分分别是______。
填空题设有一个10个元素的数组，下列程序将该数组的第一个元素与第十个元素交换，第二个元素与第九个元素交换……，第五个元素与第六个元素交换，请补充完该程序。 Private Sub Commnd1_Click() Dim a(1 To 10)As Integer Dim i As Integer Dim p As Integer Dim t As Integer Dim j As Integer For i=1 To 10 a(i)=i Next i For j=1 To 5 【9】 【10】 【11】 Next j For i=1 To 10 Print a(i) Next i End Sub
填空题随机文件使用Put语句写数据，使用{{U}} 【15】 {{/U}}语句读数据。
填空题在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_ Click()
Dim art(1 To 10) As Integer
For i = 1 To 10
Art(i) = Int (Rnd * 100)
Next i
Max = arr(1)
Min = arr(1)
For i = 2 To 10
If arr(i)＞ Max Then
______
End If
If arr(i) ＜ Min Then
______
End If
Next i
Print "Max = "; Max, "Min = "; Min
End Sub
以上程序的功能是，由程序产生10个100以内的随机整数，放入数组arr中，然后输出这10个数的最大值Max和最小值Min，请填空。
填空题建立随机文件Workers．dat。存取职工的姓名和职工号，然后把该文件中的数据读出显示。请在空白处填入适当的语句。
Type Worker
name As String*8
number As Integer
End Type
Open"e:/Workers．dat"For Random As #1 Len=Len(Workerl)
Workerl．name="zn"：Worker1．number=100#
{{U}} 【8】 {{/U}}
Close #1
Open"Workers．dat"For Random As #1 Len=Len(Worker1)
{{U}} 【9】 {{/U}}
Print"Worker1："，Worker1．name
Print "Worker1："，Worker1．number
Close #1
填空题在窗体上画两个组合框，其名称分别为Combo1、Comb02，然后画两个标签，名称分别为Label1、Label2，如图所示。程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。PrivteSubCombo1_Click()CallShowltem(Comb01.Label1)EndSubPrivateSubCombo2_Click()CallShowltem(Combo2.Labe12)EndSubPublicSubShowhem(tmpComboAsComboBox，tmpLabdAsLabel)，{{U}}【10】{{/U}}Caption={{U}}【11】{{/U}}.TextEndSub
填空题在一个窗体上有一个命令按钮，CmdMax。单击CmdMax时，窗体上显示“字体由小变大”，字号每次增加2。请填空。 Private Sub Form_Load() Form1.Caption=“字体变化示范” CmdMax.Caption=“字体变大” End Sub Private Sub CmdMax_Click() 【8】 Form1.Print“字体由小变大” End Sub
填空题在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：
Private Sub Form_Load( )
Text1.Text="计算机"
End Sub
Private Sub Text1_Change( )
Picturel.Print"等级考试"
End Sub
程序运行后，在文本框中显示的内容是{{U}} 【10】 {{/U}}，而在图片框中显示的内容是{{U}} 【11】 {{/U}}。