VB练习题——精选推荐

VB练习题

⼀、单项选择题1.下⾯程序段，运⾏后显⽰的结果是______。

Dim x

x=Int(Rnd)+5

select case x

case 5

print “优秀”

case 4

print “良好”

case 3

print “通过”

case else

print “不通过”

end select

A. 优秀

B. 良好

C. 通过

D. 不通过

2. VB6.0是⼀种⾯向的编程环境。

A. 机器

B. 对象

C. 过程

D. 应⽤

3. ⼀个对象可以执⾏的动作和可以被对象识别的动作分别称为______。

A. ⽅法和事件

B. 事件和⽅法

C. 属性和⽅法

D. 事件和过程

4. 当运⾏程序时，系统会⾃动启动窗体的______事件过程。

A. Load

B. Click

C. UnLoad

D. GotFocus

5. 要使Form1窗体的标题栏显⽰“欢迎使⽤VB”，以下______语句是正确的。A. Form1.Caption=“欢迎使⽤VB”

B. Form1.Caption=’欢迎使⽤VB’

C. Form1.Caption=欢迎使⽤VB

D. Form1.Caption=”欢迎使⽤VB”

6. 为了使⽬录列表框Dir1的显⽰内容与驱动器列表框Drive1的选择⼀致，应当________。

A. 在Dir1_Change事件中加⼊代码 Dir1.Path = Drive1. Drive

B. 在Drive1_Change事件中加⼊代码 Dir1.Path = Drive1. Drive

C. 在Dir1_Change事件中加⼊代码Drive1. Drive = Dir1.Path

D. 在Drive1_Change事件中加⼊代码Drive1. Drive = Dir1.Path

7. 要使某控件在运⾏时不可显⽰，应对______属性进⾏设置。

A. Enable

B. Visible

C. BackColor

D. Caption

8. 保存新建的⼯程时，默认的路径是______。

A. My Documents

B. VB98

C. \

D. Windows

9. 假定在图⽚框Picture1中装⼊了⼀个图形，为了清除该图形（不删除

图⽚框），应采⽤的正确⽅法是______。A. 选择图⽚框，然后按Del键

B. 执⾏语句Picture1.Picture = LoadPicture ("")

C. 执⾏语句Picture1.Picture =""

D. 选择图⽚框，在属性窗⼝中选择Picture属性条，然后按回车键

10. 在窗体上画⼀个名称为List1的列表框，⼀个名称为Label1的标签，列表框中显⽰若⼲个项⽬。当单击列表框中的某个项⽬时，在标签中显⽰被选中项⽬的名称。下列能正确实现上述操作的程序是：_____。A. Private Sub List1_Click()Label1.Caption = List1.ListIndex

End Sub

B. Private Sub List1_Click()

http://www.doczj.com/doc/9f29ba5348649b6648d7c1c708a1284ac950057e.html =List1.ListIndex

End Sub

C. Private Sub List1_Click()

http://www.doczj.com/doc/9f29ba5348649b6648d7c1c708a1284ac950057e.html =List1.Text

End Sub

D. Private Sub List1_Click()Label1.Caption =List1.Text

End Sub

11. 在⼀⾏语句内写多条语句时，每个语句之间⽤______符号分隔。

A. ，

B. ：

C. 、

D. ；

12. 表达式16 / 4 – 2 ^ 5 * 8 / 4 MOD 5 \ 2的值为______。

A. 14

B. 4

C. 20

D. 2

13. 赋值语句：a=123+Mid(“123456”,3,2)执⾏后，a变量中的值是

______。

A. “1234”

B. 123

C. 12334

D. 157

14. VB提供了结构化程序设计的三种基本结构，三种基本结构是

______。

A. 递归结构、选择结构、循环结构

B. 选择结构、过程结构、顺序结构

C. 过程结构、输⼊输出结构、转向结构

D. 选择结构、循环结构、顺序结构

15. VB6.0集成开发环境中不能完成的功能是______。

A. 输⼊编辑源程序

B. 编译⽣成可执⾏程序

C. 调试运⾏程序

D. ⾃动查找并改正程序中的错误

16. 下列关于DO…Loop循环结构执⾏循环体次数的描述正确的是

______。

A. DO While…Loop循环和DO…Loop Until循环⾄少都执⾏⼀次

B. DO While…Loop循环和DO…Loop Until循环可能都不执⾏

C. DO While…Loop循环⾄少执⾏⼀次，DO…Loop Until循环可能不执⾏

D. DO While…Loop循环可能不执⾏，DO…Loop Until循环⾄少执⾏⼀次17. 以下程序输出结果是______。

Dim a

a=array(1,2,3,4,5,6,7)

For i=Lbound(a) To Ubound(a)

a(i)=a(i)*a(i)

Next i

Print a(i)

A. 49

B. 0

C. 不确定

D. 程序出错

18. 下⾯过程语句说明合法的是______。

A. Sub f1( ByVal n% )

B. Sub f1( n% ) As Integer

C. Function f1%( f1% )

D. Function f1( ByVal n% )

19. ⽤来设置粗字体字的属性是______。

A. FontItalic

B. FontName

C. FontBold

D. FontSize

20. 按存储信息的形式分类，⽂件可以分为______。

A. 顺序⽂件和随机⽂件

B. ASCII⽂件和⼆进制⽂件

C. 程序⽂件和数据⽂件

D. 磁盘⽂件和打印⽂件

21. 不论何控件，共同具有的是______属性。

A. Text

B. Name

C. ForeColor

D. Caption

22．在以下________中的这些对象都不响应Click事件。

A. 框架、定时器、形状

B. 定时器、线条、滚动条

C. 滚动条、公共对话框、图像框D. 标签、定时器、滚动条23．下列数据类型中，占⽤内存最⼩的是________ 。

A. Boolean

B. Byte

C. Integer

D. Single

24．⽤情况选择语句Select Case X，选择|X| >5情况的语句为Case

________。

A. Not (-5 To 5)

B. 5 To -5

C. Is < -5, Is >5

D. ABS(X) > 5

25．列表框控件的下列⼏个属性中，________不是数组。

A. List

B. ListIndex

C. Selected

D. ItemData

26．表达式Len（＂123程序设计ABC＂）的值是。

A. 14

B.10

C. 17

D. 20

27．如果在图⽚框上使⽤绘图⽅法绘制⼀个圆，以下所列出的图⽚框的属性中，________不会影响该圆的外观。

A. BackColor

B. ForeColor

C. DrawStyle

D. DrawWidth

28．________控件可以使⽤SetFocus⽅法。

A. Frame

B. Label

C. Form

D. Timer

29．为了使命令按钮（名称为Command1）右移200，应使⽤的语句是______。

A. Command1.Move -200

B. Command1.Move 200

C. Command1.Left = Command1.Left + 200D. Command1.Left = Command1.Left – 200

30．⽔平滚动条HScroll1的LargeChange属性值为100，表⽰________为100。

A. 该滚动条Value属性的最⼤值

B. 拖动滚动框时滚动条Value的变化量

C. 单击滚动箭头和滚动框之间某位置时滚动条Value的变化量

D. 单击滚动箭头时滚动条Value的变化量

⼆、填空题21. VB是建⽴在BASIC语⾔基础上的【可视】化编程语⾔或编程环境。

22. 在属性窗⼝，属性的显⽰⽅式可分为【按字母顺序】和”按分类顺序”。

23. 在VB中，1234、123456&、1.2346E+5、12346.D+5共4个常数分别表⽰【整形】【长整形】【单精度类型】和双精度类型。24. 表达式Ucase(Mid(“abcdefgh”,3,4))的值是【CDEF】。

25. 数组声明时下标下界默认为0，利⽤【option base 1】语句可以使下标为1 。

26. 要获得数组的上界通过【ubound()】函数，要获得列表框List数组的元素总个数通过【listcount()】属性。

27. VB中变量按其作⽤域户分为全局变量、模块级变量和【局部】变量。

28. 数学式对应的VB表达式为【sqr(y^3+3*(a^2+b^2)/(x^2+y^2))】。

29. 已知a=2,b=3,c=4,d=5 ，表达式Not a<=c Xor 4*c=b^2 Or b<>a+c的值为【true】。

30. 设变量x是⼀个两位正整数，写出判断x的⼗位数是个奇数数字的VB 逻辑表达式【x\10 mode 2=1】。

31. 写出表达式 Val("10abc.5") * Int(-2.7) 的值【-30】。

32. 写出表达式 #6/21/2002# - 2的值【6/19/2002】。

33. 写出循环结构For k = 35 To 0 Step 5 …… Next k 的循环次数为【0】。

34. 将公共对话框CD1显⽰为颜⾊对话框的语句是【CD1.showcolor】。

35. 要在图⽚框控件pic中画⼀个与图⽚框⼀样⼤并且内部为兰⾊的矩形，作图语句为【pic.line(0,0)-

(pic.scalewidth,pic.scaleheighet),vbblue.bf】。

36. 将⽂本框作为密码输⼊框时，如果要求该⽂本框最多接受6个字符，并且任何输⼊都显⽰为*，例如输⼊123456却显⽰为******。那么应该将该⽂本框的【maxlength】属性设为6，⽽将PassWordChar属性设为【*】。

三、判断题1. 如果窗体的Enabled属性设置为False，就不能对窗体上的任何控件进⾏操作，也不能对窗体进⾏关闭、还原和最⼩化的操作。√2. 要修改标签控件或⽂本框控件中显⽰的⽂本内容，只要重新设置它们的Text属性即可。×

3. 在⼀个过程中使⽤Static语句声明的静态变量，能在该过程结束后仍然保留该变量，所以可以在其他模块中引⽤该变量。×

4. Do --- Loop Until 语句实现循环时,只要条件是真的，就停⽌循环。√

5. 定时器的Interval属性表⽰定时器调⽤Timer事件的间隔毫秒数，如果Interval为0，则间隔为0毫秒，会连续不断地调⽤Timer事件。×6. ⼀个窗体上可以有多个单选钮的Value属性同时为True。√