国家二级(VB)机试模拟试卷329附答案解析

国家二级(VB)机试模拟试卷329

选择题

1.算法的空间复杂度是指( )。(D)

A. 算法程序的长度

B. 算法程序中的指令条数

C. 算法程序所占的存储空间

D. 算法执行过程中所需要的存储空间

解析:算法的空间复杂度是指执行这个算法所需要的内存空间。一个算法所占用的存储空间包括算法程序所占的空间、输入的初始数据所占的存储空间以及算法执行中所需要的额外空间。其中额外空间包括算法程序执行过程中的工作单元以及某种数据结构所需要的附加存储空间。如果额外空间量相对于问题规模来说是常数,则称该算法是原地工作的。在许多实际问题中,为了减少算法所占的存储空间,通常采用压缩存储技术,以便尽量减少不必要的额外空间。

2.在窗体上有一个名称为Command1的命令按钮,并编写有如下事件过程:

Private Sub Command1_Click()

Move 500,500

End Sub

程序执行时,单击命令按钮,实现的功能是( )。(C)

A. 命令按钮移动到距窗体左边界、上边界各500的位置

B. 命令按钮向左、上方向各移动500

C. 窗体移动到距屏幕左边界、上边界各500的位置

D. 窗体向左、上方向各移动500

解析:本题考查Move方法。Move方法移动窗体或控件,并可改变其大小,具体的格式为:[对象.]Move左边距离[,上边距离[,宽度[,高度]]],其中对象可以是除时钟、菜单外的所有控件,省略时默认为窗体。Move方法的功能是:把对象从当前位置移动到左上角坐标为(左边距离,上边距离)的位置,同时根据高度和宽度参数来改变控件的高度和宽度。

3.目录列表框的Path属性的作用是( )。(A)

A. 显示当前驱动器或指定驱动器上的目录结构

B. 显示当前驱动器或指定驱动器上的某目录下的文件名

C. 显示根目录下的文件名

D. 显示该路径下的文件

解析:本题考查目录列表框的常见属性。目录列表框Path属性的功能是包含当前的目录。

4.设在工程中有一个标准模块,并定义了如下类型:

Type Stutype

ino As Integer

strname As String*20

strsex As String*2

smark As Single

End Type

在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1_Click时,在C盘根目录下的随机文件Student.dat中写入一条记录。下列能够完成该操作的是( )。(B)

A. Sub Command1_Click()

Dim student As Studtype

Dim record_no As Integer

record_no=1

With student

.ino=12:.stmame=\

B. Sub Command1_Click()

Dim Student As Stutype

Dim Record_no As Integer

Record_no=1

With Student

.ino=12:.strname=\

C. Private Sub Command1_Click()

Dim Student As Stutype

Dim Record_no As Integer

Record_no=1

Wim Student

.ino=12:.stmame=\

D. Sub Command1_Click()

Dim Student As Stutype

Dim Record_no As Integer

Record_no=1

With Student

.ino=12:.stmame=\

解析:本题考查文件操作。题目中要求以随机的方式(Random)打开一个文件,打开文件的方法格式为:Open File Name For Random As撑文件号[Len=记录长度],然后以Put方法写入一条记录,方法的格式为:Put[#]文件号,[记录号],变量名。

5.数学式子5+(a+b)x2对应的Visual Basic表达式是 ( )。(C)

A. 5+a+b*2

B. 5+(a+b)2

C. 5+(a+b)*2

D. 5+(a+b)*(a+b)

解析:本题考查数学式与表达式之间的转化。VB中一个表达式写在同一行,不可以省略运算符。括号必须成对出现。

6.当用( )方式打开文件时,如果对文件进行写操作,则写入的数据附加到原文件的后面。(B)

A. Output

B. Append

C. Input

D. Random

解析:本题考查文件的打开方式。以追加的方式打开文件时,每次写入的记录存放在文件的末尾。

7.在窗体上画一个名称为Text1的文本框,然后画3个单选按钮,并用这3个单选按钮建立一个名为Option1的控件数组,程序运行后,如果单击某个单选按钮,则文本框中的字体根据所选择的单选按钮切换,如图1所示。请选择适合空白处的语句( )。

(C)

A. Option Text

B. Index Text

C. Index Font

D. Option Font

解析:本题考查控件数组。Option1数组中每个元素的名字为Option1,依靠不同的Index属性来区分不同的控件。变量a表示选择不同按钮后的不同字体,字体名属性为Font属性集的默认属性(FontName),这里可以直接使用Font属性。

8.算法的空间复杂度是指( )。(A)

A. 算法在执行过程中所需要的计算机存储空间

B. 算法所处理的数据量

C. 算法程序中的语句或指令条数

D. 算法在执行过程中所需要的临时工作单元数

解析:算法的空间复杂度是指算法在执行过程中所需要的内存空间。所以选择A。

9.以下( )操作不能触发滚动条Change事件。(C)

A. 拖动滚动块

B. 单击两端箭头

C. 单击滚动块

D. 单击箭头与滚动块之间的滚动条

解析:本题考查滚动条。单击滚动条的箭头或者滚动条的滑块位置改变(也就是更改其Value属性)都可以触发Change事件,而拖动滑块不但会触发Change事件还会触发Scroll事件。

10.有如下函数过程:

Function f1(x As Integer)As Long

Dim s As Long,i As Integer

s=0

For i=1To x

s=s+i

Next i

f1=s

End Function

在窗体上添加一个命令按钮,名为Command1,并编写事件过程调用该函数,则输出结果为( )。

Private Sub Command1_Click()

Dim i As Integer,sum As Long

For i=1To5

sum=sum+f1(i)

Next i

Print sum

End Sub(B)

A. 25

B. 35

C. 45

D. 55

解析:本题考查函数过程的功能分析。函数f1的主要功能是计算1到x的累加和,也就是计算1+2+…+x。在命令按钮的单击事件中循环程序调用了5次f1函数,sum计算为:1+1+2+1+2+3+1+2+3+4+1+2+3+4+5。因此结果为35。

11.下列有关过程的叙述中错误的是( )。(D)

A. 如果过程被定义为Static类型,则该过程中的局部变量都是Static类型

B. Sub过程中不能嵌套定义Sub过程

C. Sub过程中可以嵌套调用Sub过程

D. 事件过程可以像通用过程一样由用户定义过程名

解析:本题考查过程。一般在VB中控件本身的事件过程名称为“控件名事件”,另外还可以自定义过程,主要有Sub子过程和Function函数过程,过程可以嵌套调用,但不可以嵌套定义。静态过程中所有的局部变量默认为静态变量。

12. 下面程序运行时,若输入\(D)

A. 0

B. 1

C. 2

D. 3

解析:根据题中的程序代码可知,ch为输入字符串的大写状态,第一个For循环是依次取出字母,n为取出字母与\

13.有三个关系R,S和T如下:

(A)

A. 交

B. 差

C. 选择

D. 并

解析:交:RS结果是既属于R又属于S的记录组成的集合,RS得到一个元组,按照属性ABC的顺序是c 3 11,与关系T相同,A选项正确。差:R一S结果是属于R但不属于s的记录组成的集合,R一S得到三个元组,按照属性ABC的顺序是a 112、b 2 11、e 4 15,B选项错误。从关系中找出满足给定条件的元组的操作称为选择。这种操作运算是对单个关系进行,不是两个关系之间的运算,C选项错误。并:RS是将S中的记录追加到R后面,RS得到五个元组,按照属性ABC的顺序是a 1 12、b 2 11、c 3 11、d 3 12、e 4 15,D选项错误。

14.窗体上有Text1、Text2两个文本框,并有以下过程:

Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)

Dim ch As String

ch=LCase(Chr(KeyCode))

Text2.Text=Chr(Asc(ch)+2)

End Sub

程序运行时,在Text1中输入了字母“D”,则Text2中显示的是( )。(C)

A. d

B. D

C. f

D. F

解析:KeyDown事件返回的是键盘的直接状态,KeyCode参数是按键的实际的ASCII码。该码以“键”为准,而不是以“字符”为准,也就是说大写字母与小写字母使用同一个键,它们的KeyCode相同(使用大写字母的ASCII码)。本题中首先在Text1文本框中输入大写字母“D”,即程序的KeyCode参数的值为大写字母“D”的ASCII码值,该值为68.通过转换函数Chr将ASCII码转换为字符“D”,再通过转换函数LCase将大写“D”转换为小写“d”,最后使用Asc函数获取小写“d”的ASCII码,并将其加2,然后转换为字母“f”,所以在Text2文本框中显示的为字符“f”。故选项C正确。

15.编写如下程序代码:

Prirate Sub Command1_Click()

Dim t(10)As Integer

Dim k As Integer,x As Integer

For k=10 To 2 Step-1

t(k)=11—k

Next

x=5

Print t(2+t(x))

End Sub

程序运行后,单击命令按钮Command1,输出结果为( )。(B)

A. 4

B. 3

C. 5

D. 6

解析:程序开始时声明一个一维数组t,整型变量k和x。然后利用For循环给数组t赋值,For循环中循环变量k的初始值为10,终止值为2,步长step为一1。k=10,t(10)=11—10=1;k=9,t(9)=11一9=2;k=8,t(8)=11一8=3;k=7,t(7)=11—7=4;k=6,t(6)=11一6=5;k=5,t(5)=11—5=6:k=4,t(4)=11一4=7:k=3,t(3)=11一3=8;k=2,t(2)=11一2=9;x=5,t(5)=6,t(2+t(5))=t(8)=3,故最终输出表达式的结果为3,B选项正确。本题选择B选项。

16.有下面程序代码:

Private Sub Command1_Click()

Dim a(6)As Integer

For k=0 To 5

a(k)=k*2+1

Next k

proc a,4,0

For k=0 To 6

Print a(k);

Next k

End Sub

Private Sub proe(b()As Integer,n As Integer,x

As Integer)

For k=UBound(b)To n Step一1

b(k)=b(k一1)

Next k

b(k)=X

End Sub

执行Command1_Click事件过程后产生的输出是( )。(C)

A. 1 3 5 4 0 7 9 11

B. 1 3 5 7 0 9 11

C. 1 3 5 0 7 9 11

D. 1 3 5 0 9 11

解析:在过程Command1_Click中定义了一个数组a,第一个For循环的功能是:为数组中的元素赋值,循环执行结束后,a(0)=1;a(1)=3;a(2)=5;a(3)=7;a(4)=9;a(5)=11。接着使用语句proc a,4,0调用过程proc,并传递相应的参数,其中第一个参数为数组名,当用数组作为过程的参数时,使用的是“传地址”的方式,也就是说实参a和形参b指向的是同一个存储空间,对数组b的任何修改本质上都是修改数组a。过程proc中使用UBound函数获得数组下标的上界值,循环变量k的初始值为6,终止值为4。当k=6时,执行语句b(6)=b(5)=11;当k=5时,执行语句b(5)=b(4)=9;当k=4时,执行语句b(4)=b(3)=7,循环结束后执行语句b(3)=0,所以最终数组a中各元素的值依次为:1,3,5,0,7,9,11。C选项正确。本题选择C选项。

17.要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目,则应把该列表框的MultiSelect属性设置为(B)

A. 0 -None

B. 1 -Simple

C. 2 -Extended

D. 3

解析:列表框的Multiselect属性有3个可选值:

O-None:默认值,不能选择多个选项。

1-Simple:在不按任何键的情况下可选择多个选项。

2-Extended:使用Ctrl或Shift键进行分别多选或选择连续多个选项。

18.下列与队列结构有关联的是(D)

A. 函数的递归调用

B. 数组元素的引用

C. 多重循环的执行

D. 先到先服务的作业调度

解析:队列的修改是依先进先出的原则进行的,D正确。

19.在窗体上有一个名称为Commandl的命令按钮,并编写有如下事件过程:

Private Sub Command l_Click()

Move 500,500

End Sub

程序执行时,单击命令按钮,实现的功能是( )。(C)

A. 命令按钮移动到距窗体左边界、上边界各500的位置

B. 命令按钮向左、上方向各移动500

C. 窗体移动到距屏幕左边界、上边界各500的位置

D. 窗体向左、上方向各移动500

解析:本题考查Move方法。Move方法移动窗体或控件,并可改变其大小,具体的格式为:[对象.]Move左边距离[,上边距离[,宽度[,高度]]],其中对象可以是除时钟、菜单外的所有控件,省略时默认为窗体。Move方法的功能是:把对象从当前位置移动到左上角坐标为(左边距离,上边距离)的位置,同时根据高度和宽度参数来改变控件的高度和宽度。

20.下面为单精度实型(即单精度浮点型)变量的是(C)

A. x$

B. x&

C. x!

D. x#

解析:$:字符串型, &:长整型,!:单精度实型,#:双精度实型。

21.在窗体上画一个名称为Textl的文本框,然后画3个单选按钮,并用这3个单选按钮建立一 个名为Optionl的控件数组,程序运行后,如果单击某个单选按钮,则文本框中的字体根据 所选择的单选按钮切换,如图1所示。请选择适合空白处的语句( )。

(C)

A. Option Text

B. Index Text

C. Index Font

D. Option Font

解析:本题考查控件数组。Optionl数组中每个元素的名字为Optionl,依靠不同的Index属性来区分不同的控件。变量a表示选择不同按钮后的不同字体,字体名属性为Font属性集的默认属性(FontName),这里可以直接使用Font属性。

22.判断复选框是否被选中的属性为(C)

A. Selected

B. Checked

C. Value

D. Index

解析:复选框组常用于提供多重选择,Value属性值决定每个复选框的选中状态:0为未选、1为选中、2为不可用(以灰色呈现)。选C)。

23.下列不能打开工具箱窗口的操作是( )。(B)

A. 执行“视图”菜单中的“工具箱”命令

B. 按Alt+F8键

C. 单击工具栏上的“工具箱”按钮

D. 按Alt+V,然后按Alt+X键

解析:打开工具箱窗口的操作方法有:执行“视图”菜单中的“工具箱”命令;单击工具栏上的“工具箱”按钮;按Alt+V,然后按Alt+X键。

24.一个栈的初始状态为空。现将元素1、2、3、4、5、A、B、C、D、E依次入栈,然后再依次出栈,则元素出栈的顺序是(  )。(B)

A. 12345ABCDE

B. EDCBA54321

C. ABCDE12345

D. 54321EDCBA

解析:栈是先进后出的原则组织数据,所以入栈最早的最后出栈,所以选择B。

25.执行语句 Print Right$(Mid$(\(A)

A. DEF

B. EFG

C. FG

D. BCDEF

解析:字符串截取函数Mid$(s,n1,n2)从字符串s的第n1个字符开始,向后截取n2个字符,Right(s,n)截取字符串s右边的n个字符。Mid$(\

26.编写如下程序:

Private Sub Command1_Click()

Dim a(2, 3)

For i = 0 To 2

For j = 0 To 3

a(i, j) = InputBox(\(B)

A. 1 4 3 2 5 8 7 6 9 12 11 10

B. 1 4 3 4 5 8 7 8 9 12 11 12

C. 3 2 1 4 7 6 5 8 11 10 9 12

D. 3 2 3 4 7 6 7 8 11 10 11 12

解析:第一个For的多重循环,将输入的12个整数赋值给数组a(2,3),a[0,0]=1, a[0,1]=2,a[0,2]=3;a[1,0]=4,a[1,1]=5,a[1,2]=6;a[2,0]=7,a[2,1]=8, a[2,2]=9;a[3,0]=10,a[3,1]=11,a[3,2]=12;。第二个For循环,将数组a的第4列的值赋值给第2列;故输出结果如B所示,B正确。

27.为了使组合框成为下拉式列表框,应把其Style属性设置为(C)

A. 0

B. 1

C. 2

D. 3

解析:Style属性:决定组合框的外观样式。可以取0、1和2这3个值。0:Dropdown ComboBox,称为\

28.下面描述中不属于数据库系统特点的是(C)

A. 数据共享

B. 数据完整性

C. 数据冗余度高

D. 数据独立性高

解析:数据库系统的特点为高共享、低冗余、独立性高、具有完整性等,C错误。

29.某二叉树的中序序列为BDCA,后序序列为DCBA,则前序序列为(C)

A. DCBA

B. BDCA

C. ABCD

D. BADC

解析:二叉树遍历可以分为3种:前序遍历(访问根结点在访问左子树和访问右子树之前)、中序遍历(访问根结点在访问左子树和访问右子树两者之间)、后序遍历(访问根结点在访问左子树和访问右子树之后)。本题中中序序列为BDCA,后序序列为DCBA,可知A为根结点,BDC为左侧结点,C是B右子结点,D是C右子结点,故前序序列为ABCD,C选项正确。

30.双精度浮点数的类型说明符为(B)

A. %

B. #

C. &

D. @

解析:%:整型,#:双精度实型,&:长整型,@:货币型。

31.设有如图所示窗体和以下程序:

(A)

A. 文本框中无内容,焦点在文本框中

B. 文本框中为\

C. 文本框中为\

D. 文本框中为\

解析:题目程序的功能为,当单击命令按钮时,Text1失去焦点,激发Text1的LostFocus事件,在此事件中,程序判断文本框中字符串是否为\

32.设窗体上有Text1、Text2两个文本框,并编写了下面的程序代码:

Private Sub Text1_KeyPress(KeyAscii As Integer)

If \(A)

A. 11

B. 16

C. Visual Basic 6.0

D. visual basic 6.0

解析:Text1_KeyPress过程中,先把输入的字符串中大小字母变成小写字母。当按下回车键后,执行For循环统计小写字母的个数。退出循环后把n值赋给Text2。选A)。

33.窗体上有名称为Command1的命令按钮,名称分别为List1、List2的列表框,其中List1的MultiSelect属性设置为1(Simple),并有如下事件过程:

Private Sub Command1_Click()

  For i=0 To List1.ListCount-1

    If List1.Selected(i)=True Then

      List2.AddItem Text

    End If

  Next

End Sub

上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时,发现不能达到预期目的,应做修改,下列修改中正确的是(  )。(C)

A. 将For循环的终值改为List1.ListCount

B. 将List1.Selected(i)=True 改为List1.List(i).Selected=True

C. 将List2.AddItem Text 改为List2.AddItem List1.List(i)

D. 将List2.AddItem Text 改为List2.AddItem List1.ListIndex

解析:题目程序不能将List1中的选中项添加到List2中,List2.AddItem Text一行有误,应该改为List2.AddItem List1.List(i)才能使List1中每个选中的行添加到List2中。列表框控件的List属性保存了列表框中所有值的数组,可以通过下标访问数组中的值。

34.下面正确使用动态数组的是(  )。

(A)

A.

B.

C.

D.

解析:动态数组的使用时,先在窗体层、标准模块或过程中声明一个没有下标的数组(括号不能省略),不指定维数。然后,在过程中用ReDim语句定义带下标的数组,给出数组的维数。注意:用ReDim定义的数组,只能改变数组元素的个数,不能改变数组的维数和数据类型。

本题选项B、C中ReDim语句改变了数组的数据类型,故错误。选项D中声明数组时有下标,应该没有下标,故也错误。选项A正确。

35.下面不属于软件需求分析阶段主要工作的是(A)

A. 需求变更申请

B. 需求分析

C. 需求评审

D. 需求获取

解析:需求分析阶段的工作可概括为4个方面:①需求获取。②需求分析。③编写需求规格说明书。④需求审评。

36.鼠标拖放控件要触发两个事件,这两个事件是(  )。(A)

A. DragOver事件和DragDrop事件

B. Drag事件和DragDrop事件

C. MouseDown事件和KeyDown事件

D. MouseUp事件和KeyUp事件

解析:当鼠标拖动控件到目标对象上,不松开鼠标时,触发目标对象的DragOver事件;松开鼠标时,就会触发目标对象的DragDrop事件。故选A。

37.构成计算机软件的是(D)

A. 源代码

B. 程序和数据

C. 程序和文档

D. 程序、数据及相关文档

解析:软件指的是计算机系统中与硬件相互依赖的另一部分,包括程序、数据和有关的文档,选D。

38.编写如下程序:

Private Sub Command1_Click()

Dim n As Long, s As String

n = InputBox(\(B)

A. 6 5 4 3 2 1

B. 5 6 3 4 1 2

C. 6 4 2 5 3 1

D. 6 1 5 2 4 3

解析:Print语句对输入的数值n=123456进行处理并打印。第一条语句打印n的十位数,第二条语句打印n的个位数。然后n被求余

39.负责数据库中查询操作的数据库语言是(  )。(C)

A. 数据定义语言

B. 数据管理语言

C. 数据操纵语言

D. 数据控制语言

解析:数据定义语言:负责数据的模式定义与数据的物理存取构建;数据操纵语言:负责数据的操纵,包括查询及增、删、改等操作;数据控制语言:负责数据完整性、安全性的定义与检查以及并发控制、故障恢复等功能。

40.一个栈的初始状态为空。现将元素1,2,3,A,B,C依次入栈,然后再依次出栈,则元素出栈的顺序是(C)

A. 1,2,3,A,B,C

B. C,B,A,1,2,3

C. C,B,A,3,2,1

D. 1,2,3,C,B,A

解析:栈的修改是按后进先出的原则进行的,所以顺序应与入栈顺序相反,故选C。

基本操作题

请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

41.在名称为Form1的窗体上画一个名称为CD1的通用对话框,通过属性窗口设置CD1的初始路径为C:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。

[操作步骤]

步骤1:新建一个“标准。EXE”工程,选择[工程]→[部件]命令,在弹出的“部件”对话框的列表中选中“MicroSoft Common DiMog Control6.0”项目,单击“确定”按钮。

步骤2:在窗体Form1上画一个通用对话框,其相关属性设置如表12—7所示。

[*]

步骤3:编写Form1的Iroad事件,加入下面的代码:

CD1.ShowSave

步骤4:按要求将文件保存至考生文件夹中。

解析:通用对话框的InitDir属性用于为打开或另存为对话指定初始的目录,如果此属性没有指定,则使用当前目录。

通用对话框的初始路径由InitDir属性设置,默认文件名由FileName属性设置,标题由DialogTitle属性设置。

42.在名称为Form1的窗体上设计一个菜单。要求在窗体上添加名为menu0,标题为“菜单命令”的主菜单,再添加两个名称分别为“menu1”、“menu2”,标题分别为“不可用菜单项”、“上一菜单项可用”的子菜单,并且使程序运行时,menu1子菜单不可用,menu2子菜单已经选中(运行时的效果如图3所示)。

[操作步骤]

步骤1:新建一个“标准EXE”工程,打开VB菜单设计器设计菜单,各菜单项及属性设置如表12—8所示。

[*]

步骤2:打开代码编辑窗口,编写“上一菜单项可用”命令的Click事件过程。

参考代码:

Private Sub menu2_Click()

menu1.Enabled=True

End Sub

步骤3:按要求将文件保存至考生文件夹中。

解析:①VB中的菜单是通过菜单编辑器来设计的。菜单编辑器中的基本设置项有:“标题”项,对应出现在菜单中的显示内容;“名称”项,系统识别菜单项的唯一关键字(不能重复);“索引”项,用于设置菜单数组中各元素的索引号;“快捷键”项,是一个下拉列表框,用于设置菜单项的快捷键;“帮助上下文”项,设置当鼠标移动到某菜单项上按<Fl>键时显示的帮助信息在帮助文件中的对应位置;Visible(可见)项,用于设置控件或菜单项在程序运行时是否可见,值为True表示可见,值为False表示不可见;Enabled(有效)项,用于设置控件或菜单项在程序运行时是否有效,值为True时表示有效,值为False时表示无效(显示为灰色)。通过编辑按钮区的七个按钮可对菜单进行添加、插入、删除、提升(设置为上一级菜单)、缩进(设置为下一级菜单)、上移、下移等操作。

②文本框的Text属性用于设置或返回其显示的文本内容。

本题原程序设计思路:在“上一菜单项可用”命令的单击事件过程中,通过语句设置“不可用菜单项”命令的Enabled属性值为True。

简单应用题

43.在考生文件夹下有一个工程文件sjt4.vbp,其窗体上有两个标题分别为“添加”和“退出”的命令按钮,一个内容为空的列表框List1。请画一个标签,其名称为Label1,标题为“请输入编号”;再画一个名称为Text1,初始值为空的文本框,如图7所示。程序功能如下:

[操作步骤]

步骤1:打开考生文件中的本题工程文件sjt4.vbp,如表12—5在窗体中画出控件并设置其相关属性。

[*]

步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。

参考代码:

List1.AddItem\

解析:若要在系统启动时,自动向列表框添加一个编号信息“a0001”,需要在窗体的Load事件中调用列表框的AddItem方法向列表框中添加列表项。

在“添加”按钮的单击事件中,需要判断输入的值是否在列表框中已存在,为了实现这个功能,需要遍历整个列表框,其循环条件为For i=0 To List1.ListCount-1;在循环中首先令ListIndex属性值为i,这样第i个列表项的内容就是列表框的Text属性值,可以与文本框中的内容进行比较,若已经存在则弹出提示信息,并退出事件过程,若循环结束后还没有重复,则调用列表框的AddItem方法将文本框的内容加入列表框。

在“退出”按钮的单击事件过程中,使用End语句结束整个程序的运行。

综合应用题

44. 在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮和初始文本为空、名称分别为Text1和Text2的两个文本框,如图所示。

程序功能如下:

①单击“读数据”按钮,则将考生文件夹下in5.dat文件的内容(该文件中仅含有字母和空格)显示在Text1文本框中(此过程已给出)。

②在Text1文件框中选中内容后,单击“统计”按钮,则统计选中文本中出现次数最多的字母(不区分大小写),以大写形式将这些出现次数最多的字母显示在Text2文本框内。

请将“统计”按钮Click事件过程中的注释符去掉,最后将程序按原文件名存盘。

【操作步骤】

步骤1:打开本题工程文件。

步骤2:分析并编写程序代码。

程序提供代码

Option Base 1

Dim x As String, max n As Integer

Private Sub Command1_Click()

Open App.Path & \

解析:

资源下载《国家二级(VB)机试模拟试卷329附答案解析.doc》 文档下载价格为10下载币,请先
将本套试题Word文档或文章下载到电脑,方便收藏和打印
资源下载
《国家二级(VB)机试模拟试卷329附答案解析.doc》
试题含答案和解析word文档下载价格:10 下载币
《国家二级(VB)机试模拟试卷329附答案解析.doc》
试题含答案和解析word文档VIP优惠:免费
将本套试题Word文档或文章下载到电脑,方便收藏和打印
0

评论0

没有账号? 注册  忘记密码?