当前位置：文档之家› vb复习题4

vb复习题4

第一卷客观题

第一题：是非题（共10分，每项1分）

1. 单选项和复选框能够响应Click事件，但通常不需要编写事件过程。A

A.对

B.错

2. 窗体的Moveabel属性设为False时，不能改变窗体的大小，只能移动窗体。B

A.对

B.错

3. 当窗体上有多个控件时，一般只有一个控件是当前控件，对控件的所有操作都是针对当前控件进行的。A

A.对

B.错

4. 变量名是以字母或汉字开头，由字母、汉字、数字或下划线组成，长度可以任意的字符序列。B

A.对

B.错

5. 在程序运行过程中，变量中的值不会改变，而常量中的值会被改变。B

A.对

B.错

6. 数组作为过程参数时，使用的是地址传送方式。A

A.对

B.错

7. 在事件驱动的应用程序中，代码是按照预定的路径执行的。B

A.对

B.错

8. 函数过程和子过程的区别是子过程结束将返回值过程值，函数过程结束不必返回函数值。B

A.对

B.错

9. 用户在“文件打开”通用对话框中选择一个文件时，对话框控件的FileName属性含有所选文件名字。A

A.对

B.错

10. VB6.0只能运行在Windows 2000下，不能运行在Windows 98下。B

A.对

B.错

第二题、单选题（共45分，每项1.5分）

11. 在Visual Basic中，最简单的数据类型包括___A___。

A.整型、实型、布尔型、字符型

B.整型、实型、字符型

C.整型、实型、逻辑型

D.实型、逻辑型、字符型

12. 如果要使一个窗体从屏幕上和内存中完全消失，所要使用的语句是___D___。

A.Hide

B.Show

C.Load

D.Unload

13. 假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为__A____。

A. MenuItem. Enabled=False

B.MenuItem. Enabled=True

C.MenuItem. Visible=True

D.Menultem. Visible=False

14. 下面四项中，__A____是VB中的数值变量。

A.ABC

B.E+2

C."True"

D.1.35E-2

15. 在随机文件中___C___。

A.文件中的内容是通过随机数产生的

B.文件中的记录号是通过随机数产生的

C.可对文件中的记录根据记录号随机地读写

D.文件的每条记录的长度是随机的

16. 在VB中要将一个窗体装载到同存中进行预处理，但不显

示，应该使用语句__B____。

A.Form.Show

B.Form.Load

C.Form.Hide

D.Form.Unload

17. 文本框没有_D____属性。

A.Enabled

B.Visible

C.BackColor

D.Caption

18. 在顺序文件中__D____。

A.文件中按每条记录的记录号从小到大排序

B.文件中按每条记录的长度从小到大排序

C.文件中按记录的某关键数据项的从小到大的顺序

D.记录是按写入的先后顺序存放的，读出也是按写入的先后

顺序读出

19. If结构的结束语句是__C____。

A.End Select

B.End Sub

C.End If

D.End Do

20. 复选框的Value属性为1时，表示＿B＿＿。

A.复选框未被选中

B.复选框被选中

C.复选框内有灰色的勾

D.复选框操作方式“错误”

21. 为减少语句的使用，将一个窗体加载到内存中并显示出来，

所使用的语句或方法是__C____。

A.Load

B.Unload

C.Show

D.Hide

22. 如果列表框（List1）中只有一个项目被用户选定，则执行

Debug．Print List1Selected（List1.ListIndex）语句的结果是＿A ＿＿。

A.在Debug窗口输出被选定的项目的索引值

B.在Debug窗口输出True

C.在窗体上输出被选定的项目的索引值

D.在窗体上输出True

23. 下面语句语法正确的是__B____。

A.a=1 b=2 c=3

B.a=1:b=2:c=3

C.a=1,b=2,c=3

D.a=1;b=2;c=3

24. 数学表达式x>y>z的正确VB逻辑表达式是__D____。

A.x>y And

B.x>y>z

C.x>y And >z

D.x>y And y>z

25. 文本框（Text1）中有选定的文本，执行Text1.SelText=”

Hello”的结果是＿A＿＿。

A.“Hello”将替换掉原来选定的文本

B.“Hello”将插入到原来选定的文本之前

C.Text1.SelLength为5

D.文本框中只有“Hello”

26. 如果文本框的Enabled属性设为False，则＿A＿＿。

A.文本框的文本将变成灰色，并且此时用户不能将光标置于

文本框上

B.文本框的文本将变成灰色，用户仍然能将光标置于文本框

上，但是不能改变文本框中的内容

C.文本框的文本将变成灰色，用户仍然能改变文本框中的内

容

D.文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容

27. 表达式Int(23.4)+Round(-35.5)的计算结果为__C____。

A.-11

B.-12.1

C.-13

D.-12.5

28. 表达式3>4 And 7=5的返回值为__D____。

A.0

B.True

C.-1

D.False

29. 下列说法错误的是__B____。

A.在同一模块不同过程中的变量可以同名。

B.不同模块中定义的全局变量不可以同名。

C.引用另一模块中的全局变量时，必须在变量名前加模块名。

D.同一模块中不同级的变量可以同名。

30. 下面关于打印对话框属性的说法错误的是__C____。

A.Copies属性指定打印的份数。

B.HDC属性指定分配给打印机的句柄，用来识别对象的设备环境。

C.FromPage属性指定要打印文档的页范围。使用该属性时必须把Flags属性设置为1。

D.Max和Min属性用来显示FromPage和ToPage的范围，其中Min指定允许的起始页码，Max指定允许的最后页码。

31. 记录长度最大可取的值是__A____字节。

A.32767

B.32768

C.65535

D.65536

32. 使用Public x声明一个全局的变量时，该语句应放在__C____。

A.过程中

B.窗体模块的通用声明段

C.标准模块的通用声明段

D.窗体模块或标准模块的通用声明段

33. 在Visual Basic中，用于获得字符串S最左边4个字符的函数是___A___。

A.Left(S,4)

B.Left(1,4)

C.LeftStr(S)

D.LeftStr(S,4)

34. 计时器的时间间隔是＿A＿＿。

A.以毫秒计

B.以分计

C.以秒计

D.以小时计

35. 文件号最大可取的值为__B____。

A.255

B.511

C.512

D.256

36. 在Visual Basic中，语句Print 3>9的输出结果为__D____。

A.0

B.1

C.-1

D.False

37. 用来设置粗体字的属性是。C

A.Font1Italic

B.FontName

C.FontBold

D.FontSize

38. VB 工程中的每一个窗体都是独立的___B___。

A.类

B.对象

C.数据库

D.方法

39. Print #1，STR1$中的Print是__A____。

A.顺序文件的写语句

B.在窗体上显示的方法

C.子程序名

D.打印命令

40. 框架内的所有控件是＿A＿＿。

A.随框架一起移动、显示、消失和屏蔽

B.不随框架一起移动、显示、消失和屏蔽

C.仅随框架一起移动

D.仅随框架一起显示和消失

第三题、简单程序（共15分，每项1.5分）

41. 执行下面程序段后，变量c$的值为__D____。

a$= "Visual Basic Programming"

b$= "Quick"

c$=b$ & Ucase(Mid$(a$,7,6)) & Right$(a$,12)

A.Visual BASIC Programming

B.Quick Basic Programming

C.QUICK Basic Programming

D.Quick BASIC Programming

42. 运行下面程序后，在弹出的消息窗口中显示的是__C____。

Private Sub Form_Click()

Dim counter

counter=0

While counter<20

counter=counter+1

Wend

MsgBox counter

End Sub

A.0

B.21

C.20

D.19

43. 执行下面程序段后，变量a的值为_____C_。

For I=1 To 3

For j=1 To I

For k=j To 3

a=a+1

Next k

Next j

Next I

A.3

B.9

C.14

D.21

44. 写出下面过程运行后显示的结果。B

Public Sub a(n As Integer, ByVal m As Integer)

x = x Mod 10

y = y \ 10

End Sub

Private Sub Command1_Click()

Dim x As Integer, y As Integer

x = 4

y = 12

Call a(x, y)

Print x+y

End Sub

A.8

B.16

C.12.4

D.5.2

45. 以下程序的输出结果是___B___。

Private Sub Command1_Click()

a=1234

b$=Str$(a)

c=Len(Trim(b))

print c;LenB(b)

End Sub

A.3 8

B.4 10

C.5 10

D.4 8

46. 执行下面程序段后，变量x的值为___A___。

x=5

For I=1 To 20 step 2

x=x+I\5

Next I

A.21

B.22

C.23

D.24

47. 以下程序的输出结果是_D_____。

Private Sub Command1_Click()

Dim sum As Integer

sum%=19

sum=2.32

Print sum%,sum

End Sub

A.19 2.32

B.19 19

C.2.32 2.32

D.2 2

48. 下列程序运行后，其结果为___D___。

Dim char As Byte

Open “D:\Abc.dat” For Binary As #1

Open “A:\Myfile.dat” For Binary As #2

Do While Not Eof(1)

Get #1, ,char

Put #2, ,char

Loop

Close #1,#2

A. 将A盘上的文件Myfile.dat复制到D盘，文件名改为Abc.dat。

B.将A盘上的文件Myfile.dat复制到D盘

C. 将D盘上的文件Abc.dat复制到A盘

D.将D盘上的文件Abc.dat复制到A盘，文件名改为Myfile.dat

49. 下列程序运行后，其结果为___A___。

Private Sub Form_Click ( )

Filename=“c:\testfile.txt”

Open filename For Output As #1

Print #1,“ABCD我是一个学生”

Close #1

Open filename For Input As #1

MsgBox Input(8,1)

Close #1

End Sub

A.在通用对话框中显示“ABCD我是一个”

B.在通用对话框中显示“ABCD我是”

C.在窗体中显示“ABCD我是一个”

D.在窗体中显示“ABCD我是”

50. 以下程序的输出结果是___D___。

Private Sub Command1_Click()

a=100

s=s+a

a=a+1

Loop Until a>100

print a

End Sub

A.100

B.120

C.201

D.101

第二卷主观题

填空题（共30分，每项2分。注意：填两个空的题的时候，要按照从上至下，从左至右的顺序添入答题卡！）

1. 请用正确的内容填空。以下程序用随机函数模拟掷骰子，统

计掷50次骰子出现各点的次数。

Private Sub Form_Click()

Dim d(6)

For I=1 To 50

n= _int(rnd*6+1)_____

d(n)=d(n)+1

Next I

For I= To 6

Print I;"点出现";d(I);"次"

Next I

End Sub

2. 请用正确的内容填空。

下面程序的作用是利用随机函数产生10个(1～200)

之间的随机整数，打印其中7的整数倍的数并求其和。

Private Sub Form_Click()

For I=1 To 10

x=Int(Rnd*200+1)

If x %7=0______ Then

k1=k1+x

Print x

End If

Next I

Print "k1=";k1

End Sub

3. 下面程序运行时，内层循环的循环总次数是___6_____。

For m = 1 To 3

For n = 0 To m - 1

Next n

Next m

4. 在C盘根目录下建立一个名为Student.dat的顺序文件。

要求用InputBox函数输入10名学生的学号（StuNo）、姓名（StuName）和性别（StuSex）。

Private Sub Form_Load ( )

Open “C:Student.dat” For Output As #1

For I=1 to 10

StuNo=InputBox(“请输入学号”)

StuName= InputBox (“请输入姓名”)

StuSex= InputBox (“请输入性别”)

_write#1.____ ,StuNo,Stuname,StuSex

Next I

Close #1

End Sub

5. 执行下面的程序段后，s的值为____7________

Private Sub Form_Click()

Static s As Integer

s = 5

For I = 1.4 To 2.1 Step 0.6

s = s + 1

Next I

Print s

End Sub

6. 请用正确的内容填空。以下程序的运行结果为：

Private Sub Form_Click()

a="ABCD"

For m= _ 1 To 2__

Print Tab(5-m); _ Right$(a, m)_____

Next m

End Sub

9. 函数odd用于判断一个数是否是奇数。当单击命令按钮时，产生

[1,9]之间的随机数，调用odd过程，判断该数是否为奇数。如果是则显示“奇数”，否则显示“偶数”。

Private Sub odd(n As Integer)

Print n;

If n/2<>n\2 Then

Print "奇数"

Else

_print “偶数”_____

End If

End Sub

Private Sub Command1_Click()

Dim x As Integer

Randomize

x =__int(rnd*9+1)____

odd x

End Sub

10. 以下程序的功能是：生成20个200到300之间的随机整数，

输出数的位置能被5整除的数并求出它们的和。请填空。

Private Sub Commandl_C1ick()

For I＝1 To 20

x＝Int( _rnd_____*200+100)

If I Mod 5 ＝0 Then

Print x

S＝S+ __x____

End If

Next I

Print "Sum＝";S

End Sub

第一卷客观题

第一题：是非题（共10分，每项1分）

1. 用户控件和系统控件都可以加载到工具箱上，并且永久保留。

2. 在VB中，可通过函数Shell调用DOS或Windows下的可执

行程序。A

3. 窗体的Moveabel属性设为False时，不能改变窗体的大小，

只能移动窗体。B

4. " "是一个字符串，而""不是一个字符串。B

5. 变量名是以字母或汉字开头，由字母、汉字、数字或下划线

组成，长度可以任意的字符序列。B

6. 单选项和复选框能够响应Click事件，但通常不需要编写事件

过程。A

7. 在事件驱动的应用程序中，代码是按照预定的路径执行的。A

8. 函数过程和子过程的区别是子过程结束将返回值过程值，函

数过程结束不必返回函数值。B

9. ActiveX技术是一种共享程序数据和功能的技术。A

10. 在Not、Or、And三个运算符中，运算符And的的优先级最

高。B

第二题、单选题（共45分，每项1.5分）

11. 下列不能打开菜单编辑器的操作是___D___。

A.按Ctrl+E

B.单击工具栏中的“菜单编辑器”按钮

C.执行“工具”菜单中的“菜单编辑器”命令

D.按Shift + Alt + M

12. 已编译的控件部件的扩展名是＿＿A＿。

A. .OCX

B. .VBP

C. .EXE

D. .CTL

13. 表达式a+b=c是___D___。

A.赋值表达式

B.字符表达式

C.算术表达式

D.关系表达式

14. 要想在过程调用后返回两个结果，下面的过程定义语句合法

的是___D___。

A.Sub Proc1(ByVal n,Byval m)

B.Sub Proc1(ByVal n, m)

C.Sub Proc1(n,Byval m)

D.Sub Proc1(n, m)

15. 下列说法错误的是____C__。

A.在多重窗体中一定要有一个窗体为启动窗体。

B.在多重窗体中，如果没有指定启动窗体，则默认首先设计的窗体为启动窗体。

C.启动窗体能在运行程序时自动显示出来，其它窗体有些也能自动显示出来。

D.启动窗体通过“工程”菜单中的“工程属性”命令来指定。

16. 文本框没有__D___属性。

A.Enabled

B.Visible

C.BackColor

D.Caption

17. 利用菜单编辑器设计菜单时，如果要在菜单中加入一个分隔符，菜单分隔符的标题必须设置为_B_____。

A.+

B.-

C.*

D./

18. 语句Print Format("HELLO", "<")的输出结果是___B___。

A.HELLO

B.hello

C.He

D.he

19. 组合框的Style属性决定组合框的类型和行为，它的值为2时，其显示形式和功能是＿＿C＿。

A.下拉列表框，并允许用户输入不属于列表框中的选项

B.简单组合框，并允许用户输入不属于列表框中的选项

C.下拉列表框，不允许用户输入不属于列表框中的选项

D.简单组合框，不允许用户输入不属于列表框中的选项

20. 将数据项“China”添加到列表框（List）中成为第一项应使用＿A＿＿语句。

A.List1.AddItem”China”，0

B.List1.AddItem”China”，l

C.List1.AddItem 0，”China”

D.List1.AddItem 1，”China”

21. VB表达式Cos(0)+Abs(-1)+Int(Rnd(1))的值是__B____。

A.1

B.2

C.0

D.-1

22. Integer类型的数据由___B___字节组成。

A.1

B.2

C.3

D.4

23. 假如列表框（List1）有4个数据项，那么把数据项“China”添加到列表框的最后，应使用＿＿B＿语句。

A. List1.AddItem3，”China”

B.List1.AddItem”China”，List1.ListCount-1

C.List1.AddItem”China”，3

D.List1.AddItem”China”，List1.ListCount

24. 如果列表框（List1）中只有一个项目被用户选定，则执行Debug．Print List1Selected（List1.ListIndex）语句的结果是＿A ＿＿。

A.在Debug窗口输出被选定的项目的索引值

B.在Debug窗口输出True

C.在窗体上输出被选定的项目的索引值

D.在窗体上输出True

25. 在Visual Basic中，语句Print 3>9的输出结果为__D____。

A.0

B.1

C.-1

D.False

26. 表达式Int(23.4)+Round(-35.5)的计算结果为___C___。

A.-11

B.-12.1

C.-13

D.-12.5

27. 为减少语句的使用，将一个窗体加载到内存中并显示出来，

所使用的语句或方法是__C____。

A.Load

B.Unload

C.Show

D.Hide

28. 下面关于顺序文件的描述，正确的是___C___。

A.每条记录的长度必须相同

B.可通过编程对文件中的某条记录方便地修改

C.数据以ASCII码形式存放在文件中，所有可通过文本编辑软

件显示

D.文件的组织结构复杂

29. 下列关于通用对话的描述错误的是__C____。

https://www.doczj.com/doc/8118097479.html,mandDialog1.ShowFont显示字体对话框。

B.在打开或另存为对话框中，用户选择的文件名和路径可以经

FileName属性返回。

C.在打开或另存为对话框中，用户选择的文件名和路径可以经

FileTitle属性返回。

D.利用通用对话框可显示和制作帮助对话框。

30. 用语句Dim a(-3 to 5) As Integer定义的数组的元素个数是

___C___。

A.7

B.8

C.9

D.10

31. 如果文本框的Enabled属性设为False，则＿＿A＿。

A.文本框的文本将变成灰色，并且此时用户不能将光标置于文

本框上

B.文本框的文本将变成灰色，用户仍然能将光标置于文本框

上，但是不能改变文本框中的内容

C.文本框的文本将变成灰色，用户仍然能改变文本框中的内容

D.文本框的文本正常显示，用户能将光标置于文本框上，但是

不能改变文本框中的内容

32. 使用Public x声明一个全局的变量时，该语句应放在

____C__。

A.过程中

B.窗体模块的通用声明段

C.标准模块的通用声明段

D.窗体模块或标准模块的通用声明段

33. 在Visual Basic中，用于获得字符串S最左边4个字符的函

数是___A___。

A.Left(S,4)

B.Left(1,4)

C.LeftStr(S)

D.LeftStr(S,4)

34. MsgBox函数的返回值的类型为____B__。

A.整数

B.字符串

C.逻辑值

D.日期值

35. VB 工程中的每一个窗体都是独立的__B____。

A.类

B.对象

C.数据库

D.方法

36. 下面关于随机文件的描述，不正确的是__B____。

A.每条记录的长度必须相同

B.一个文件中记录号不必惟一

C.文件的组织结构比顺序文件复杂

D.可通过编程对文件中的某条记录方便地修改

37. 为了防止用户随意将光标置于控件之上，应该进行＿＿D＿

设置。

A.将控件的TabIndex属性设置为0

B.将控件的TabStop属性设置为True

C.将控件的TabStop属性设置为False

D.将控件的Enabled属性设置为False

38. VB中的工具栏可以从___C___菜单上的“工具栏”命令中移进或移出。

A.工具

B.编辑

C.视图

D.调试

39. 用来设置粗体字的属性是。C

A.Font1Italic

B.FontName

C.FontBold

D.FontSize

40. 在VB的集成环境中创建VB应用程序时，除了工具箱窗口、窗体设计窗口、属性窗口外，必不可少的窗口是____C__。

A.窗体布局窗口

B.立即窗口

C.代码窗口

D.监视窗口

第三题、简单程序（共15分，每项1.5分）

41. 执行下面程序段后，变量a的值为__C____。

For I=1 To 3

For j=1 To I

For k=j To 3

a=a+1

Next k

Next j

Next I

A.3

B.9

C.14

D.21

42. 下列程序段的运行结果。D

Private Sub Form_Load()

ListCityName.AddItem ”北京”

ListCityName.AddItem ”上海”

ListCityName.AddItem ”广州”

End Sub

A.在文本框中增加“北京”、“上海”和“广州”三个初始条目

B.在组合框中增加“北京”、“上海”和“广州”三个初始条目

C.在列表框中把“北京”、“上海”和“广州”三个初始条目清除

D.在列表框中增加“北京”、“上海”和“广州”三个初始条目

43. 从键盘输入一个实数mm，利用字符串函数对输入的数进行处理，如果输出的内容不是字符则输出“END“，程序的输出结果是___C___。

Private Sub Command1_Click()

mm=Val(InputBox("请输入一个实数"))

n$=Str$(mm)

p=InStr(n, ".")

If p>0 Then

Print Mid(n,p)

Else

Print "END"

End If

End Sub

A.用字符方式输出数据mm

B.输出数据的整数部分

C.输出数据的小数部分

D.只去掉数据部分的小数点，保留所有数码输出

44. 执行下面程序段后，变量x的值为___A__。

x=5

For I=1 To 20 step 2

x=x+I\5

Next I

A.21

B.22

C.23

D.24

45. 当输入4时，以下程序的输出结果是____B__。

Private Sub Command1_Click()

x=InputBox(x)

If x^2<15 Then y=1/x

If x^2>15 Then y=x^2+1

Print y

End Sub

A.4

B.17

C.18

D.0.25

46. 单击命令按钮之后，下列程序代码的执行结果为。B

Private Function p(n As Integer)

For I = 1 To n

Sum = Sum + I

Next I

p = Sum

End Function

Private Sub Command1_Click()

s = p(1) + p(2) + p(3) + p(4)

Print s;

End Sub

A.10

B.20

C.24

D.28

47. 下面的程序运行后，将产生__C____的结果。

Private Sub Form_load()

Dim Str As String, Anum As Integer

Open "D:\Myfile.dat" For Output As #1

str1 = "ABCDEFG"

str2 = 12345

Print #1, Str, Anum

Write #1, Str, Anum

Close #1

End Sub

A.建立一个"D:\Myfile.dat"的文本文件

B.建立一个"D:\Myfile.dat"的文本文件，并写入一行数据，还

在窗体上显示一行数据

C.建立一个"D:\Myfile.dat"的文本文件，并写入两行数据

D.打开一个"D:\Myfile.dat"的文本文件，并读出两行数据

48. 以下程序的输出结果是____D__。

Private Sub Command1_Click()

Dim sum As Integer

sum%=19

sum=2.32

Print sum%,sum

End Sub

A.19 2.32

B.19 19

C.2.32 2.32

D.2 2

49. 以下程序的输出结果是__A____。

Option Base 1

Private Sub Command1_Click()

Dim a(10),p(3) As Integer

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

A.33

B.28

C.35

D.37

50. 运行下面程序后，在窗体中显示的是___D___。

Private Sub Form_Click()

a$="*": b$="$"

For k=1 To 3

x$=String$(Len(a$)+k,b$)

Print x$;

Next k

End Sub

A.、*** ** ****

B.*$*$*$

C.1*$2*$3*$

D.、$$$$$$$$$

第二卷主观题

填空题（共30分，每项2分。注意：填两个空的题的时候，要按照从上至下，从左至右的顺序添入答题卡！）

1. 在窗体frmform1中添加一个通用对话框控件CommonDialog1，

运行时，首先使用CommonDialog1打开一个标准的颜色对话框，

用于设置对象颜色，其次使用CommonDialog1打开一标准的字体对话框，

用于设置对象的字体、字形和字号效果。

Private Sub Form_Load()

CommonDialog1.Action = 3

Text1.BackColor = CommonDialog1.Color

CommonDialog1. _flags=1_____

CommonDialog1=4

Text1.FontName = CommonDialog1.FontName

Text1.Font.Size = CommonDialog1.FontSize

End Sub

2. 下面程序运行时，内层循环的循环总次数是__6______。

For m = 1 To 3

For n = 0 To m - 1

Next n

Next m

3. 编写一个求最大公约数的函数，并调用该函数，程序如下：

Function gcd(ByVal a As Integer,ByVal b As Integer) As Integer

Dim re as integer

Do While b<>0

re=a mod b

a=b

b=re

Loop

gcd=a

End Function

Sub Command1_Click()

Dim x As Integer,y As Integer, z As integer

X=96

Y=64

_z=gcd(x,y)_____

Print “结果=”;z

End Sub

4. 窗体中有一公共对话框Comdialog1和一个命令按钮

Command1，

当单击按钮时打开颜色对话框。请将程序补充完整。

Private Sub Command1_Click( )

ComDialog1.__showcolor_______

End Sub

5. 请用正确的内容填空。以下程序找出50以内所有能构成直角

三角形的整数组。

Private Sub Form_Click()

For x=1 To 50

For y=x To 50

z=Sqr(x*x+y*y)

If _x+z>y_____ Then Print x; y; z

Next y

Next x

End Sub

6. 假定建立了一个工程，该工程包括两个窗体，

其名称(Name 属性)分别为Form1和Form2，启动窗体为Form1。

在Form1画一个命令按钮Command1，程序运行后，

要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请在将程序补充完整。

Private Sub Command1_Click()

unload ______Form1

Form2. __show____

End Sub

7. 以下程序的功能是：把当前目录下的顺序文件smtext1.txt的内容读入内存，并在文本框Text1中显示出来。请填空。Private Sub Command1_Click()

Dim inData As String

Text1.Text = ""

Open ".\smtext1.txt"__for input____As #1

Do While __not eof(1)____

Input #1, inData

Text1.Text = Text1.Text & inData

Loop

End Sub

9. 以下程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。

Option Base 1

Private Sub Command1_Click()

Dim arr1, Max as Integer

arr1 = Array(12, 435, 76, 24, 78, 54, 866, 43)

_Max_____= arr1(1)

For I = 1 To 8

If arr1(I) > Max Then _Max=arr(I)_____

Next I

Print "最大值是: "; Max

End Sub

10. 请用正确的内容填空。下面程序用“选择”法将数组a中的10个整数按升序排列。

Option Base 1

Private Sub Form_Click()

Dim a

a = Array(678, 45, 324, 528, 439, 387, 87, 875, 273, 823)

For I=1 To 9

For j= __I+1____ To 10

If a(I)>a(j)______Then

t=a(I): a(I)=a(j): a(j)=t

End If

Next j

Next I

For I=1 To 10

Print a(I);

Next I

End Sub

VB习题及答案

1. _________________ GBK 字符集共有 C 汉字。 A 、6000 多 B 、10000 多 C 、20000 多 D 、30000 多 2. 美国标准信息交换码（ASCII 码）中，共有128个字符，包括___B_ 32个控制字符。 A 、52 B 、96 C 、116 D 、101 3. 在计算机中，西文字符最常用的编码是 __C ―。 A 、原码 B 、反码 C 、ASCII 码 D 、补码 4?下列四个选项中，按照其 ASCII 码值从小到大排列的是 A Q A 、数字、英文大写字母、英文小写字母 B 、数字、英文小写字母、英文大写字母 C 、英文大写字母、英文小写字母、数字 D 英文小写字母、英文大写字母、数字 5?下列字符中，其 ASCII 编码值最大的是__B ________ Q A 、9 B 、D C 、A D 、空格 6. 中文标点符号“。”在计算机中存储时占用 —B_个字节。 A 、1 B 、2 C 、3 D 、4 7. GBK 是汉字内码的一种扩充规范，下面叙述中错误的是 _B _ Q A. 它共有20000多个汉字 B. 、它使用双字节表示，字节的最高位均为 0 C. 、它与GB2312保持向下兼容 D 它不但有简体字，也有繁体字 &汉字从录入到打印，至少涉及三种编码，汉字输入码，字型码和 _D A 、BCD 码 B 、ASCII 码 C 、区位码 D 、机内码 9. 在下列汉字编码标准中，不支持繁体汉字的是 _A Q 个可打印字符和其原因不可能

A、GB2312 B、GBK C、BIG5 D、GB18030 10.在利用拼音输入汉字时，有时虽正确输入拼音码但却找不到所要的汉字, 是A ______ Q A 、计算机显示器的分辨率不支持该汉字的显示 B 、汉字显示程序不能正常工作 C 、操作系统当前所支持的汉字字符集不含该汉字 D 、汉字输入软件出错 11 ?将字符信息输入计算机的方法中，目前使用最普遍的是_A _ 。 A、键盘输入 B 、笔输入. C语音输入D、印刷体识别输入 12?汉字的键盘输入方案数以百计，能被用户广泛接受的编码方案应_C _ 。 A、必须易学易记 B可输入字数多 C.、易学易记，效率要高 D重码要少，效率要高 13. ________________ MP3音乐采用 C 编码方法。 A、MPEG-1层1 B、MPEG-1 层2 C 、MPEG-1 层3 D、MPEG-2audio 14.Windows操作系统中的“帮助”文件，为方便用户使用，提供了超文本功能，超文本采用的信息组织形式为_C _______ 。 A 、线性结构 B 、层次结构 C 、网状结构 D 、顺序结构 15?使用计算机进行文本编辑与文本处理是常用的两种操作，下列不属于文本处理的是_ C_。 A.、文本检索 B 、字数统计 C文字输入 D 、文语转换

vb考试题及答案

1．下列不是VB常量的是 B 。 A）3.14 B）′Name ′ C)#10/18/2007# D)True 2．确定控件在窗体上位置的属性是 C 。 A）Width 和Height B）Width 和Top C）Top 和Left D）Top 和Height 3．数学表达式1≤X＜10表示成正确的VB表达式为 B 。 A）1≤X＜10 B）X＞=1 And X＜10 C) X＞=1 Or x＜10 D) X＞=1 And ＜10 4. 下面的__ B ___语句可以实现：先在窗体上输出大写字母A，然后在同一行的第10列输出小写字母b。 A）Print "A";Tab(9);"b" B）Print "A";Spc(8);"b" C）Print "A";Space(10);"b" D）Print "A";Tab(8);"b" 5. 下列控件中，不能改变大小的控件是 D 。 A）TextBox B）Label C）Frame D）Timer 6．Visual Basic过程的编写是在 D 中进行的。 A）窗体窗口B）工程资源管理器窗口C）属性窗口D）代码编辑窗口 7. 在Visual Basic中，声明全局变量应该用 D 关键字。 A）Dim B）Private C）Static D）Public 8. 在Visual Basic表达式中，运算符的运算顺序为 A 。 A）算术运算符—>字符串运算符—>关系运算符—>逻辑运算符 B）逻辑运算符—>关系运算符—>字符串运算符—>算术运算符 C）字符串运算符—>算术运算符—>关系运算符—>逻辑运算符 D）关系运算符—>逻辑运算符—>算术运算符—>字符串运算符 9. 下列属于非法调用的函数是 A 。 A）sqr(-5) B)Sgn(-5) C)Exp(-5) D)Int(-5) 10. 下列能够正确输出”a=8”形式的语句是 B 。 A）print a=3+5 B）pirnt “a=”;3+5 C）print “a=3+5”D）print a=;3+5 11. 下列符号中，可以用作VB变量名的是 C 。 A）x.y.z B)3xyz C)x_yz D)Integer 12. 可以删除字符串两端空格的函数是 A 。 A）Trim B）Rtrim C）Ltrim D）Mid 13. 函数Int(Rnd*80)+1是在 D 范围内产生随机整数。 A）[0，80] B）[0，79] C）[1，79] D）[1，80]

九江学院VB期末考试题目及详细答案

九江学院期末考试复习题（政法A1111）第一套一、判断题 1、Visual Basic?序开发的特点是面向对象的事件驱动。（J 2、Print_Text 是一个不合法的变量名。（为 3、窗体的AutoRedraw属性实现了屏幕图像的重建。（翌 4、设置字体大小应使用Font属性（为 5、Sub过程可以实现嵌套调用（寸 6、IIF函数中的三个参数都不能省略。（寸 7、块结构条件语句以End If结束，而单行结构条件语句没有End旧（明 8、当终值小于初值时，步长为负数。（5 9、执行While-Wend循环时，如果一开始条件就不成立，则语句块一次也不会执行。（寸 10、关于数组的引用，在程序中，凡是简单变量可以出现的地方都可以出现数组元素的引用（/）二、单项选择题 1. Print Format （123, ” ###说执行之后的结果为 A）# 123B） 123C） 123# D） # # # # 【答案】B 2. 下面可以表示注释语句开头的为 A）R e B R C Rem。dim 【答案】C 3. 下列选项中窗体载入事件为 A) Load 事件B) Click事件C) DblClick事件D) Unload 事件

【答案】A 4. Timer控件可以使用下列哪种事件 A) Click事件B) Timer 事件C) Dblclick 事件D) Change事件【答案】B 5. 在InputBox函数中哪一个参数是必须的 A) Prompt B) Buttons C) Title D) Context 【答案】A 6. 以下叙述中错误的是： A)如果过程被定义为Static类型，则该过程中的局部变量都是Static类型 B) Sub过程中不能嵌套定义Sub过程 C) Sub过程可以嵌套调用Sub过程 D) 事件过程可以像通用过程一样由用户定义过程名【答案】C 乙要填加一个标准模块，可使用“ 单中的添加模块”命令。 A)文件B)视图C)工程D)工具【答案】C 8 .在块结构条件语句If-Then / Endif中 (A) 必须至少有一个Elseif语句 (B )可以有任意多个ElseIf-Then语句 (C)如果没有Else语句，运行时将出现错误

VB期末考试试题及答案

二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value

7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的 D 。 A、在标题项中输入&，然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"）从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click C. Frm1_Click D. Me_Click 17、窗体的hide属性的含义是 A 。 A.隐藏 B.展现 C.装入 D.卸载 18、若要设置定时器控件的定时时间，需设置的属性是 C 。 A．Enabled B．Value C．Interval D．Text 19、能够改变复选框中背景颜色的属性是 C 。

程序设计语言VB_习题集(含答案)

《程序设计语言VB》课程习题集一、单选题 1. Visual Basic是一种面向（）的程序设计语言。 A. 用户 B. 事件 C. 程序 D. 对象 2.在Visual Basic6.0中规定工程文件的扩展名是（）。 A. vbp B. for C. frm D. bas 3. Visual Basic6.0中规定窗体文件的扩展名是（）。 A. for B. frm C. vbp D. bas 4.如何使一个标签或按钮控件在运行时不可用（）。 A. 把它的Visible属性设置成False B. 把它的Visible属性设置成True C. 把它的Enabled属性设置成False D. 把它的Enabled属性设置成True 5.控件的字体可在属性窗口的（）属性中调整？ A. Font B. Color C. Text D. Caption 6.若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是（）。 A. Value B. Cancel C. Default D. Enabled 7.在VB中，记录对象数据的是（）。 A. 方法 B. 事件 C. 属性

8.在文本框上显示文本的属性是（）。 A. Value B. Text C. Print D. Enabled 9. InputBox函数返回值的类型为（）。 A. 字符串 B. 数值 C. 变体 D. 数值或字符串（视输入的数据而定） 10.设有语句：a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是（）。 A. 字符串"20" B. 字符串"120" C. 默认值100 D. 数值120 11.下列控件中可用于接受用户输入文本，又可用于显示文本的是（）。 A. Label控件 B. TextBox控件 C. Timer控件 D. CommandButton控件 12.语句PRINT "25*4"的输出结果是（）。 A. 25*4 B. "100" C. 100 D. 出现错误信息 13.只能用来显示字符信息的控件是（）。 A. 文本框 B. 标签框 C. 图片框 D. 图像框 14.下列可作为Visual Basic变量名的是（）。 A. A%A B. 4A C. ?xy D. Stemp 15.下列哪个符号不能作为VB中的变量名（）。 A. timefly

vb练习题及答案.doc

vb 练习题及答案【篇一：vb 习题(含答案)】 lass=txt>1 、vb 程序中，通常不会产生错误提示的是( )。（1 分） a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。（1 分） a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中，正确的说法是( )。（1 分） a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能，可以通过按下功能键( )得到帮助。（ 1 分） a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。（ 1 分） a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。（ 1 分） a、0 b 、1 c、2 d 、5 7、文本框没有( )属性（1 分） a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。（ 1 分） a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中，定义x 为变体型变量的是( )。（1 分） a、dim x as double b 、dim x c、dim x! d 、x%=23

25、设有如下变量声明：dim testdate as date ，为变量testdate 正确赋值的表达方式是( )。（1 分） a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句，a=beijing :b=shanghai :print a,b 对其输出结果的描述中，正确的是( )。（1 分） a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a ：a=b: b=t 执行后( )。（1 分） a、a 值为3，b 值为3 b 、a 值为3，b 值为5 c、a 值为5，b 值为5 d 、a 值为5，b 值为3 28、下列语句中，正确的是( )。（1 分） a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后， y 结果是( )。（1 分） a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) ，将显示一个输入对话框，在对话框的输入区中显示的信息是( )。（1 分） a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮，先后在两个输入对话框中输入123 和321 ，窗体显示的内容是( )。（1 分） a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后，所产生的消息框的标题是 ( )。（1 分） a、aaa b 、bbb

VB期末考试模拟题1讲解

【HNCE网上考试系统 v9.6】本套软件使用权属于：郑州大学考试课程: 考试时间:100分钟考场:第一考场考试日期:2013.05.24 考号：姓名：剩余时间：99:42 保存交卷退出帮助 A B C D A B C D A B C D A B C D A B C D A B C D

A B C D A 命令 B 命令 C 命令 D 命令 A B C D A B C D A B C D A B C D A B

C D A B C D A B C D A 模块文件 B 件的属性 C 源文件 D 包含多个工程文件及属于该工程的其他文件 A 该窗体文件并没有被删除 B 窗体文件被删除 C 程仍然包含这个窗体 D A B C D A B C D

A B C D A B C D A可以实现交换两个变量值，而S2不能 B 个变量值，而S1不能 C 现交换两个变量值 D 现交换两个变量值 A B C D A B C D A 过程调用后均不保存值 B 有变量都是Static型的变量 C 所有变量都是Private型的变量 D 所有变量都是非全局Public A 用Dim语句或Static语句声明的变量 B 明它的过程

C Static语句声明的 D 程执行完毕后就被释放了 A B C D A B C D A B C D A B C D 声明段 A B C D A B C D A B

C D A B C D A B C D A B C D A 同 B Sub过程不可以 C 值，而Function过程能通过过程名返回值 D 或直接使用过程名调用，而 A工程中可以有多个窗体，但最多只能有一个窗体作为启动窗体 B 声明Public类型的变量来传递数据 C 大化、最小化或正常（保持设计时大小）等三种状态 D A 菜单 B 过程代码都放在窗体文件中 C 名必须相同 D 是设计阶段时显示的位置

vb期末考试试题

第1题（1.0分）题号:227 表达式1 and 0的值【1】.答案：1). False 第2题（1.0分）题号:222 把整数0赋给一个逻辑型变量,则逻辑变量的值为【1】. 答案：1). False 第3题（1.0分）题号:60 a 和b 中有仅只有一个为1,相应的Visual Basic逻辑表达式为【1】. 答案：1). a=1 xor b=1 第5题（1.0分）题号:244 设x为一个两位数,将x个位数和十位数交换后所得两位数VB的表达式是【1】. 答案：1). (x mod 10) * 10 + int(x/10) 第7题（1.0分）题号:226 表达式32\7 MOD 3^2 的值是【1】. 答案：1). 4 第8题（1.0分）题号:288 文件按照存取方式及其组成结构可以分为顺序文件和【1】. 答案1). 随机文件或随机第9题（1.0分）题号:319 Option Base 1的作用是确定数组的下界为【1】. 答案：1). 1 第1题（1.0分）题号:236 所有的VB 的变量,都有隐含说明字符和强调声明两种方法来定义. 答案：N 第2题（1.0分）题号:246 ActiveX控件是扩展名为*.ocx的独立文件,使用时需用 "工程"/"部件"载入或移去. 答案：Y 第3题（1.0分）题号:289 框架控件和形状控件都不能响应用户的鼠标的单击事件. 答案：Y 第4题（1.0分）题号:350 在窗体模块的声明部分中用Private声明的变量的有效范围是其所在的工程. 答案：N 第5题（1.0分）题号:354 在框架控件上放置的控件可以移动到框架控件的外面. 答案：N 第6题（1.0分）题号:231 可以用"&","+"合并字符串,但是用在变异变量时,"+"可能会将两个数值加起来.答案：Y 第8题（1.0分）题号:247 Circle方法绘制扇形或圆弧图形时,图形的形状不仅与起始角、终止角的大小相关,而且与起始角、终止角的正或负相关.答案：Y 第9题（1.0分）题号:330 有一个程序在属性窗口中设置了它的窗体字体大小为10号,而程序代码若设置了它的窗体字体大小为20号,那么当程序运行后实际的窗体字体大小为20号.答案：Y 第10题（1.0分）题号:225 Visual Basic程序的运行可以从Main()过程启动,也可以从某个窗体启动. 答案：Y 第1题（1.0分）题号:319 能够改变窗体边框线类型的属性是(). A:FontStyleB:BorderStyleC:BackStyleD:Bord er 答案：B 第2题（1.0分）题号:822 以下()对象不具有Clear方法. A:列表框B:组合框C:剪贴板D:图片框答案：D 第3题（1.0分）题号:258 常量-0.00013579的科学计数法是(). A:-1,3579E+0.4B:.00013579C:-13.579E-5D:-1.3579E-0.4 答案：C 第4题（1.0分）题号:230 vb 应用程序是分层管理的,其最高的层次为(). A:工程B:模块C:窗体D:过程答案：A 第5题（1.0分）题号:837 用户可以通过设置菜单项的()属性值为FALSE来使该菜单项不可见. A:HideB:CheckedC:VisibleD:Enabled答案：C 第6题（1.0分）题号:334 若要使标签控件显示时,不覆盖其背景内容,

vb试题及答案

VB试卷一、单项选择题(每题2分,共40分) 1. 窗体的标题栏显示内容由窗体对象的属性决定。 A) BackColor B)BackStyle C)Text D)Caption 2. 窗体的示意图标可用属性来设置。 A) Picture B) Image C) Icon D) MouseIcon 3. 窗体的控制菜单的有无由窗体对象的属性决定。 A) ControlBox B) MinButton C) MaxButton D) BorderStyle 4. 若要取消窗体的最大化功能，则可设置属性为False来实现。 A) ControlBox B) MinButton C) MaxButton D) Enabled 5. 以下4个选项，不属于VB的工作模式。 A) 编译 B) 设计 C) 运行 D) 中断 6. 窗体的边框样式由窗体对象的属性来设置。 A) BackStyle B) BorderStyle C) WindowState D) FillStyle 7. 若要以程序代码方式设置在窗体中显示文本的字体大小，则可用窗体对象的属性来实现。 A) FontName B) Font C) FontSize D) FontBold 8. 命令按钮的标题文字由属性来设置。 A) Text B) Caption C) Name D) (名称) 9. VB是面向对象的程序设计，以下4个选项，不属于面向对象的三要素。 A) 变量 B) 属性 C) 事件 D) 方法 10. 若要将某命令按钮设置为默认命令按钮，可设置属性为True来实现。 A) Value B) Cancel C) Default D) Enabled 11. 若要使命令按钮不可见，可设置属性为False来实现。 A) Value B) Enabled C) Visible D) Cancel 12. 运行程序时，系统自动执行窗体的事件。 A) load B) click C) unload D) GotFocus 13. 若要设置文本框最大可接收的字符数，可通过属性来实现。 A) MultiLine B) Length C) Max D) MaxLength 14. 若要使某命令按钮获得控制焦点，可使用方法来设置。 A) Refresh B) SetFocus C) GotFocus D) Value 15. 若要使命令钮可响应事件，可通过设置属性的取值来实现。 A) Visible B) Enabled C) Default D) Value 16. 在运行时，若要调用某命令按钮的Click事件过程，可设置该命令按钮对象的属性为True来实现。 A) Enabled B) Value C) Default D) Cancel 17. 标签框的边框，由属性的设置值决定。

大一VB期末考试试卷及答案

大一VB期末考试试卷及答案 1．在代码中引用一个控件时，应使用控件的（ b ）属性。 A．Caption B．Name C．Text D．Index 2．设变量x = 4，y = -1，a = 7，b = -8,下面表达式（ a ）的值为“假”。 A．x+a <= b-y B． x > 0 AND y < 0 C．a = b OR x>y D． x+y > a+b AND NOT (y < b) 3．表达式Int(Rnd*71)+10产生的随机整数范围是（ c ）。 A．（10，80） B．（10，81） C．[10，80] D．[10，81] 4．函数Sgn(3.1416)的返回值是（ c ）。 A．-1 B．0 C．1 D．以上都不对 5．67890属于（ d ）类型数据。 A．整型 B．单精度浮点数 C．货币型 D．长整型 6．下列变量名中正确的是（ d ）。 A．3S B．Print C．Select My Name D．Select_1 7．下列赋值语句（ a ）是有效的。 A．sum = sum -sum B．x+2 = x + 2 C．x + y = sum D．last = y / 0 8．以下的控件或方法具有输入和输出双重功能的为（ b ）。 A．Print B．Textbox C．Optionbutton D．Checkbox 9．若要获得列表框中被选中的列表项的内容，可以通过访问（ d ）属性来实现。 A．Name B．ListIndex C．ListCount D．Text 10．下列代码的运行结果为（ b ）。 Private Sub command1_click() Dim m(10)

VB期末考试试题及答案 (1)

第一部分：客观题一、单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（） A、工程资源管理器窗口 B、工具箱窗口 C、属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（）方法来实现。Ａ、RefreshＢ、SetfocusＣ、GotfocusＤ、Value 4、下列不可作为VB变量名的是（） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是（） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（）。

n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（）Ａ、ClickＢ、MouseDownＣ、MouseUpＤ、DblClick 9、下列为整型变量的是（） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是（） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0 C、x Mod 2 =0 And y Mod 2=0 D、x Mod 2 =1 And y Mod 2 =1 12、在通用声明中给出Option Base 1语句，则数组a包含（）个数组元素。 Dim a(3, -2 To 1, 5) As Integer A、60 B、75 C、120 D、13

vb题库及答案

| 最新VB题库及答案一、选择题第1部分 1、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是 A、Private Sub Text1_Change() = "计算机等级考试" End Sub ] B、Private Sub Command1_Click() Caption = "计算机等级考试" End Sub C、Private Sub Form_Click() = "计算机等级考试" End Sub D、Private Sub Command1_Click() = "计算机等级考试" { End Sub 2、在一行内写多条语句时，每个语句之间用（）符号分隔。 A、 , B、： C、. D、； 3、下面（）是合法的变量名。 A、X_YZ B、123ABC C、INTEGER D、X-Y ] 4、下面（）是合法的字符常量。 A、 ABC$ B、“ABC” C、‘ABC’ D、 ABC 5、表达式16/4 - 2^5*8 MOD 5\2的值为（）。 A、14 B、 4 C、20 D、2 6、设a=”MicrosoftVisualBasic”，则以下使变量的b值为”VisualBasic”的语句是 A、b=Left(a,10) B、b=Mid(a,10) — C、b=Right(a,10) D、b=Mid(a,11,10) 7、设a="a"，b="b"，c="c"，d="d"，执行语句x = IIf((a < b) Or (c > d), "A",

VB期末考试复习题目

如果要将窗体中的某个命令按钮设置成运行时无法显示，应该设置它的属性。类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。能够获得一个文本框中被选取文本的内容的属性是。以下属于Visual Basic合法的数组元素是。设置命令按钮的属性时，只有将属性设置为1，Picture属性才有效，否则无效。 VB有三种工作模式，它们分别是___________模式。下列函数中，________函数返回的值是数值型的。类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。以下控件中没有Print方法是( ) 以下叙述中错误的是 ( ) A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 B）保存Visual Basic程序时，应分别保存窗体文件及工程文件 C）Visual Basic应用程序只能以解释方式执行 D）事件可以由用户引发，也可以由系统引发下列数组声明语句中的数组a包含了_________个数组元素。( ) Dim a(4,-1 to 1,0 to 3) 复选框的Value属性为0时，表示( ) 复选框的Value属性为2时，表示( ) 主过程通过参数传递将一个参数传递给子过程A，并能够通过参数传递返回一个结果，下列子过程的正确定义以下不属于Visual Basic系统的文件类型是。 A）.frm B）.bat C）.vbg D）.vbp 按变量名的定义规则，是合法定义的变量名。结构化程序由三种基本结构组成，下面属于三种基本结构之一的是_______ 执行以下程序段后，变量c$的值为________。 a$="Visual Basic Programming"

VB期末考试试题

第一部分：客观题 1、单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（） A、工程资源管理器窗口 B、工具箱窗口 C、属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（）方法来实现。Ａ、Refresh Ｂ、Setfocus Ｃ、Gotfocus Ｄ、Value 4、下列不可作为VB变量名的是（） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是（） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（）。 n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（）Ａ、Click Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick 9、下列为整型变量的是（） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是（） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0

VB试题及答案

以下答案由叶阿飞童鞋友情提供。 1. 何谓VB对象，他们都是可见的吗？每种分别举两个例子。窗口以及窗口中的每一个部件。不都可见；可视：窗口、菜单、按钮等；不可视：公共对话框、定时器等。 2.何谓对象的成员，分别加以说明。属性，方法和事件。 ·属性：对象的数据（设置和特性），例如，颜色、大小、位置等。 ·方法：一种可在对象上操作的过程，例如，移动等。 ·事件：对象可识别的动作，例如，单击鼠标和按下键盘键。可编写代码来响应事件。 3.何谓事件驱动和事件过程。说明并举例。只有在窗口中有关位置进行键盘输入或单击鼠标，程序才会作出响应的程序运行方式称为事件驱动方式。{所谓事件驱动就是利用事件来触发消息，系统再对相应的消息进行处理的一个机制（网上找的，不是书上的，不能确定是否正确）}。 ·vb应用程序中的某个事件被触发时，对象就会对该事件做出响应，响应某个时间后所执行的代码段就是事件过程。 4.VB集成开发环境的工作模式有哪些？分别说明每一种工作模式所能完成的功能。 <1>设计模式：创建应用程序的大多数工作都是在设计时完成的。在设计时，可以设计窗体、绘制空间、编写代码并使用“属性”窗口来设置或查看属性设置值。 <2>运行模式：代码正在运行的时期，用户可与应用程序交流，可查看代码，但不能改动它。 <3>中断模式：程序在运行的中途被停止执行。在中断模式下，用户可查看各变量及不是属性的当前值，了解程序执行是否正常。还可以修改程序代码，检查、调试、重置、单步执行或继续执行程序。 5.VB集成开发环境的控件种类有哪些？每一种分别举例说明。 <1>内部控件。主要有标签、文本框、命令按钮等。 <2>ActiveX控件。如数据绑定网络控件、数据绑定绑定组合框控件等 <3>可插入的对象。主要指microsoft office中的excel工作表或ppt幻灯片等。 6·何谓VB控件，向窗体中添加控件的方法有哪些？举例说明。在窗体上用于输入、输出信息的图形或文字符号称为控件。 <1>单击工具箱中的控件图标，可以看到鼠标指针变成十字指针，然后在窗体的空白处按住鼠标左键拖动鼠标到合适的位置放开，即可画出对应的控件。 <2>双击工具箱中的控件图标，即可将控件添加到窗体中。以下答案由妞仔仔童鞋友情提供。 7.试述VB编程步骤，对每一步进行必要的解释。创建工程→界面设计→属性设置→ 代码编辑→文件保存→程序运行和调试。创建工程启动Visual Basic 6.0 后，在“新建工程”对话框中选择“标准EXE”文件，单击“确定”按钮。此时，工程资源管理器窗口中显示已创建了一个工程，默认名字为“工程1” 并创建了一个窗体，默认名称为“Form1” 。界面设计新建窗体后，利用工具箱可以在窗体上依次添加控件对象。选择工具箱中的标签，通过双击或鼠标拖动将其对象拖放在窗体的合适位置；属性设置控件对象的默认属性值显然不能满足程序的要求，因此，我们要对每一个控件对象通过属性窗口设置属性。代码编辑应用程序进行到现在仅仅只做了一个空壳，当程序运行，我们单击任何命令按钮，并没有事情发生，这是因为我们还没有进行最重要的一个步骤——代码编辑。根据题目要求，我们要

vb经典题目及答案

1、在考生文件夹下有工程文件wy7、vbp及窗体文件wy7、frm,该程序就是不完整的,请在有？号的地方填入正确的程序代码,然后删除？及所有注释符号(即 '号),但不能修改其它部分。修改后的程序文件都保存,存盘时不得修改文件夹与文件名。本题描述如下: 在窗体上有一个名为Text1的文本框,有三个命令按钮,名称分别就是C1、C2与C3,标题分别就是"读入"、"加密"与"存盘"。要求程序运行后,点击"读入"按钮,将文本文件in7、txt(该文件在考生文件夹下)中的文本信息读入文本框Text1中;点击"加密"按钮将Text1中的英文字母加密转换,并将转换后的结果显示到Text1中。转换方式为转换成该字母对应字母表中后两个位置的字母。例如,转换前的字母就是"a",则转换后的就是"c",转换前就是"E",转换后就是"G";点击"存盘"按钮, 则将转换后的文本框中的文本保存到out7、txt 文件中(该文件保存到考生文件夹下)。 Private Sub C1_Click() Dim strinfo As String Open "in7、txt" For Input As 1 Input #1, strinfo Close #1 Text1、Text = strinfo End Sub Private Sub C2_Click() Dim strchange As String Dim i As Integer For i = 1 To Len(Text1、Text) strchange = strchange + Chr(Asc(Mid(Text1、Text, i, 1)) + 2) Next Text1、Text = strchange End Sub Private Sub C3_Click() Open "out7、txt" For Output As 1 Print #1, Text1、Text Close #1 End Sub 2、(1)在考生文件夹下有工程文件wy5、vbp及窗体文件wy5、frm,该程序就是不完整的,请在有？号的地方填入正确内容,然后删除？及所有注释符(即'号),但不能修改其它部分。存盘时不得改变文件名与文件夹。本题描述如下: 在窗口中有一个RichText文本框控件(名称为rtx1)与一个文本框控件(名称为Text1),两个命令按钮,名称分别为Command1与Command2,标题分别为"加入WY01、TXT"、"统计字符个数"。要求程序运行后,单击command1将考生文件夹下的wy01、txt的内容显示到rtx1中;单击"统计字符个数"按钮统计Text1中有多少个字符,将结果显示在Text1中。

VB期末考试题库及答案

试卷方案：201105 Visual Basic 期末考试方案一、单项选择_共50题（选：20题*1’=20分）第1题以下有关对象属性的说法中，错误的是___________. A. 工具箱中的控件并不是VB 中所有的控件 B. 若将Frame 的Enabled 属性设置为False ，则不能使用放置在Frame 里面的控件 C. 对象的Name 属性在运行时不能改变 D. 对象的所有属性都可以在属性窗口中设置第2题数学表达式 ||27sin 3 y x e x +++ 的VB 算术表达式为_______ . A. Sin(27)+Sqr(x+Exp3)/(x+y) B. Sin(27*3.14159/180)+Sqr(x+Exp(3))/Abs(x+y) C. Sin(27*3.14159/180)+Sqr(x+e^3)/Abs(x+y) D. Sin(27*pi/180)+Sqr(x+Exp(3)/Abs(x+y) 第3题下列有关对象的叙述中,正确的是______ A. 对象由属性，事件和方法构成 B. 对象的所有属性既可以在属性窗口设置，又可以在程序运行时用赋值语句设置 C. 对象的事件一定就是由VB 预先设置好的人工干预的动作 D. 对象的方法是对象响应某个事件后执行的一段程序代码第4题表达式CInt(4.5)+Cint(-4.51)+Int(4.9)+Int(-4.1)+Fix(-1.9)+0 Mod 2的运算结果是___. A. 1 B. -1 C. –2 D. –3 第5题下列关于菜单的说法中,错误的是__________. A. 每一个菜单项就是一个对象，并且可设置自己的属性和事件 B. 菜单项不可以响应DblClick 事件 C. VB6.0允许创建超过四级的子菜单 D. 程序执行时，如果要求菜单项是灰色，不能被用户选择，则应设置菜单项的Enabled 属性为False 第6题以下关于数组的说法中,错误的是__________. A. 使用了Preserve 子句的Redim 语句，只允许改变数组最后一维的上界 B. 对于动态数组, Redim 语句可以改变其维界但不可以改变其数据类型 C. Erase 语句的功能只是对固定大小的数组进行初始化 D. Lbound 函数返回值是指定数组某一维的下界第7题设a=3,b=2,c=1,运行print a>b>c 的结果是____________. A. True B. False C. 1 D. 出错第8题