有一个数列，它的前3个数为0，1，1，此后的每个数都是其前面3个数之和，即0，1，1，2，4，7，13，24，…要求编写程序输出该数列中所有不超过1000的数。某人编写程序如下：Private Sub Form Click（　　）Dim i As Intender，a As Integer，b As IntegerDim C As Integer，d As Integera=0：b=1：c=1d=a4-b4-ci=5While d<=1C00Print d；a=b：b=c：c=dd=a+b+ci=i+1WendEnd Sub运行上面的程序。发现输出的数列不完整，应进行修改。以下正确的修改是（　　）。

试卷相关题目

• 1下列关于函数过程的叙述中，正确的是（　）。

  A.函数过程形参的类型与函数返回值的类型没有关系

  B.在函数过程中，过程的返回值可以有多个

  C.当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递

  D.如果不指明函数过程参数的类型，则该参数没有数据类型

  开始考试点击查看答案
• 2设有如下程序段：Dim a(10)…For Each X In aPrint X；Next x在上面的程序段中，变量X必须是（　　）。

  A.整型变量

  B.变体型变量

  C.动态数组

  D.静态数组

  开始考试点击查看答案
• 3要求生产10个随机整致，存放在数组arr中。从键盘输入要删除的数组元素的下标，将该元素中的数据删除，后面元素中的数据依次前移，并显示删除后剩余的数据。现有如下程序：Option Base 1Privare Sub Command1 Click（　　）Dim arr(10)As IntegerFor i=1To 10循环1Arr(i)，=Int(Rnd*100)Print arr(i)；Next ix=InputBox("输入1—10的一个整数：")For i=X+1 To 10循环2arr(i-1)=arr(i)Next iFor i=x-1 To 10 循环3Print arr(i)Next iEnd Sub程序运行后发现显示的结果不正确，应该进行的修改是（　　）。

  A.产生随机数时不使用Int函数

  B.循环2的初值应为i= x

  C.数组定义改为Dim a(11)As Integer

  D.循环3的循环终值应改为9

  开始考试点击查看答案
• 4执行语句Dim X，Y As Integer后，（　）。

  A.X和Y均被定义为整型变量

  B.X和Y均被定义为变体类型变量

  C.X被定义为整型变量，Y被定义为变体类型变量

  D.X被定义为变体类型变量，Y被定义为整型变量

  开始考试点击查看答案
• 5若窗体上的图片框中有一个命令按钮，则此按钮的Left属性是指（　　）。

  A.按钮左端到窗体左端的距离

  B.按钮左端到图片框左端的距离

  C.按钮中心点到窗体左端的距离

  D.按钮中心点到图片框左端的距离

  开始考试点击查看答案
• 6假定用下面的语句打开文件：Open"Filcl．txt"For Input As#1则不能正确读文件的语句是（　　）。

  A.Input#1，ch$

  B.Line Input#1，ch$

  C.ch$一Input$(5，#1)

  D.Read#1，ch$

  开始考试点击查看答案
• 7设窗体上有一个命令按钮数组，能够区分数组中各个按钮的属性是（　　）。

  A.Name

  B.Index

  C.Caption

  D.Left

  开始考试点击查看答案
• 8在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Public Enum Sa=4b=3End EnumPrivate Sub Command1 Click（　）Dim x As Integerx=aIf x>=3 Then MsgBox"Pass!"End Sub运行程序，其结果是（　）。

  A.运行错误．因为Enum定义有错

  B.运行错误．因为x=a类型不匹配

  C.运行正常结束，不显示任何信息

  D.运行正常．显示内容为“Pass!”的信息框

  开始考试点击查看答案
• 9层次型、网状型和关系型数据库划分原则是（　　）。

  A.记录长度

  B.文件的大小

  C.联系的复杂程度

  D.数据之间的联系方式

  开始考试点击查看答案
• 10下列关于文件的叙述中，错误的是（　　）。

  A.使用Append方式打开文件时，文件指针被定位于文件尾

  B.当以Input打开文件时，如果文件不存在，则自动建立一个新文件

  C.顺序文件的各个记录的长度可以不同

  D.随机文件打开后，既可以进行读操作，也可以进行写操作

  开始考试点击查看答案