第三章练习题(含答案)

第三章

一、选择题

1、下列可以激活属性窗口的操作是（d）

A、用鼠标双击窗体的任何部位

B、执行“工程”菜单中的“属性窗口”命令

C、按Ctrl+F4键

D、按F4键

2、下列不能打开工具箱窗口的操作是（b）

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

B、按Alt+F8键

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

D、按Alt+V，然后按Alt+X键

3、假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应执行的操作是（a）

A、单击窗体上没有控件的地方

B、单击任一个控件

C、不执行任何操作

D、双击窗体的标题栏

4、为了把窗体上的某个控件变为活动的，应执行的操作是（b）

A、单击窗体的边框

B、单击该控件的内部

C、双击该控件

D、双击窗体

5、确定一个控件在窗体上的位置的属性是（d）

A、Width或Height

B、Width和Height

C、Top或Left

D、Top和Left

6、确定一个窗体或控件的大小的属性是（b）

A、Width或Height

B、Width和Height

C、Top或Left

D、Top和Left

7、为了同时改变一个活动控件的高度和宽度，正确的操作是（a）

A、拖拉控件4个角上的某个小方块

B、只能拖拉位于控件右下角的小方块

C、只能拖拉仅次于控件左下角的小方块

D、不能同时改变控件的高度和宽度

8、假定窗体的名称（Name属性）为Form1，则把窗体的标题设置为“VB Test”的语句为（b）

A、Form1=“VB Test”

B、Caption=“VB Test”

C、Form1.text=“VB Test”

D、https://www.360docs.net/doc/a26124540.html,=“VB Test”

9、下列不能打开代码窗口的操作是（d）

A、双击窗体上的某个控件

B、双击窗体

C、按F7键

D、单击窗体或控件

10、下列说法中正确的是（d）

A、只保存窗体文件（.frm）

B、只保存工程文件（.vbp）

C、分别保存工程文件和标准模块文件（.bas）

D、分别保存工程文件、窗体文件和标准模块文件

11、下列说法中正确的是（b）

为了装入一个应用程序，应当

A、只装入窗体文件（.frm）

B、只装入工程文件（.vbp）

C、分别装入工程文件和标准模块文件（.bas）

D、分别装入工程文件、窗体文件和标准模块文件

12、为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为（b）

A、1

B、2

C、3

D、4

13、决定窗体标题条显示内容的属性是（c）

A、text

B、name

C、caption

D、backstyle

14、当窗体最小化时缩小为一个图标，设置这个图标的属性是（b）

A、mouseicon

B、icon

C、picture

D、mousepointer

15、为了取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是（d）

A、controlbox

B、minbutton

C、enabled

D、maxbutton

16、决定窗体有无控制菜单的属性是（ a )

A、controlbox

B、minbutton

C、enabled

D、maxbutton

17、为了使文本框同时具有水平和垂直滚动条，应先把multilin属性设置为true，然后再把scrollbars属性设置为（d）

A、0B、1C、2D、3

18、使文本框获得焦点的方法是（c）

A、change

B、gotfocus

C、setfocus

D、lostfocus

19、为了使标签覆盖背景，应把backstyle属性设置为（b）

A、0B、1C、true D、false

20、为了使标签中的内容居中显示，应把alignment属性设置为（c）

A、0B、1C、2D、3

21、下列可以把当前目录下的图形文件pic1.jpg装入图片框pictrure1中的语句为（c）

A、picture="pic1.jpg"

B、pictrure.handle="pic1.jpg"

C、picture1.picture=loadpicture（"pic1.jpg"）

D、picture=loadpicture（"pic1.jpg"）

22、决定标签内显示内容的属性是（d）

A、text

B、name

C、alignment

D、caption

23、为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为true，这个属性是（b）

A、value

B、default

C、cancel

D、enabled

24、为了在按下Esc键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为true，这个属性是（c）

A、value

B、default

C、cancel

D、enabled

25、假定在图片框picture1中装入了一个图形，为了消除该图形（注意，消除图形，而不是删除图片框），应采用的正确方法是（b）

A、选择图片框，然后按Del

B、执行语句picture1.picture=loadpicture（""）

C、执行语句picture1.picture=""

D、选择图片框，在属性窗口中选择picrure属性条，然后按回车键

26、设置复选框或单选按钮标题对齐方式的属性是（b）

A、align

B、alignment

C、sorted

D、value

27、为了使列表框中的项目分为多列显示，需要设置的属性为（a）

A、columns

B、style

C、list

D、multiselect

28、要想不使用shift或ctrl键就能中列表框中同时选择多个项目，则应把该列表框的multiselect属性设置为（b）

A、0B、1C、2D、其他

29、删除列表框中指定的项目所使用的方法为（d）

A、move

B、remove

C、clear

D、removeitem

30、当拖动滚动条中的滚动块时，将触发滚动条的事件是（c）

A、move

B、change

C、scoll

D、setfocus

31、用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是（c）

A、list

B、listindex

C、text

D、listcount

32、在窗体（name属性为form1）上画两个文本框（name属性分别为text1和text2）和一个命令按钮（name属性为command1），然后编写如下两个事件过程：

private sub command1_click（）

a=text1.text+text2.text

print a

end sub

private sub form_load（）

text1.text=""

text2.text=""

end sub

程序运行后，在第一个文本框（text1）和第二个文本框（text2）中分别输入123和321，然

后单击命令按钮，则输出结果为（c）

A、444

B、321123

C、123321

D、132231

33、在属性窗口中把窗体的KeyPreview属性设置为True，然后编写如下两个事件过程：

private sub form_keydown（keycode as integer，shift as integer）

print chr（keycode）

end sub

private sub form_keypress（keyascii as integer）

print chr（keyascii）

end sub

在一般情况下（即不按住shift键和锁定大写），运行程序，如果按“A”键，则程序的输出是（a）

A、A

B、a

C、A

D、a

a A A a

34、在窗体上画一个命令按钮和一个文本框，并把窗体的keypreview属性设置为true，然后编写如下代码：

dim saveall as string

private sub command1_click（）

text1.text=ucase（saveall）

end sub

private sub form_keypress（keyascii as integer）

saveall=saveall+chr（keyascii）

end sub

程序运行后，在键盘上输入“abcdefg”，单击命令按钮，则文本框中显示的内容为（c）

A、abcdefg

B、不显示任何信息

C、ABCDEFG

D、出错

35、在上中，如果把窗体的keypreview属性设置为false，则文本框中显示的内容为（b）

A、abcdefg

B、不显示任何信息

C、ABCDEFG

D、出错

36、在窗体上画一个文本框，然后编写如下事件过程：

private sub text1_keypress（keyascii as integer）

dim char as string

char=chr（keyascii）

keyascii=asc（ucase（char））

text1.text=string（6，keyascii）

end sub

程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为（d）

A、a

B、A

C、aaaaaa

D、AAAAAA

37、把窗体的keypreview属性设置为true，然后编写如下过程：

private sub form_keydown（keycode as integer，shift as integer）

print chr（keycode）

end sub

private sub form_keyup（keycode as integer，shift as integer）

print chr（keycode+2）

end sub

程序运行后，如果按“A”键，则输出结果为（c）

A、A

B、A

C、A

D、A

A B C D

38、编写如下事件过程：

private sub form_keydown（keycode as integer，shift as integer）

if （button and 3）=3 then

print "AAAA"

end if

end sub

程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键为（d）

A、左

B、右

C、同时按下左、右

D、按什么键都不显示

(从题目中的程序可以看出，(Button And 3)=3这个条件是永假的，所以输出语句也永远不会被执行。注意：Button参数对于MouseMove事件与MouseDown、MouseUp事件不同，MouseMove事件的Button值表示所有按键的状态，而MouseDown和MouseUp事件的Button 值无法检测是否同时按下两个以上的按键。)

39、编写如下事件过程：

private sub form_keymove（keycode as integer，shift as integer）

if （button and 3）=3 then

print "AAAA"

end if

end sub

程序运行后，为了在窗体输出“AAAA”，应按下的鼠标键为（c）

A、左

B、右

C、同时按下左、右

D、按什么键都不显示

40、编写如下事件过程：

private sub form_mousedown（button as integer，shift as integer，x as single，y as single）if shift=6 and button=2 then

print "BBBB"

end if

end sub

程序运行后，为了在窗体上输出“BBBB”，应执行的操作为（d）

A、同时按下shift键和鼠标左键

B、同时按下shift键和鼠标右键

C、同时按下ctrl、alt键和鼠标左键

D、同时按下ctrl、alt键和鼠标右键

41、下列不能打开菜单编辑器的操作是（d）

A、按ctrl+E键

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

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

D、按shift +alt +M键

42、假定有一个菜单项，名为menuitem，为了在运行时使该菜单项失效（变灰），应使用的语句为（a）

A、menuitem.enabled=false

B、menuitem.enabled=true

C、menuitem.visible=true

D、menuitem.visible=false

二、填空题

1、属性窗口分为4个部分，这4个部分分别是对象框、属性显示方式、属性列表和属性解释。

2、假定一个文本框的Name属性为Text1，为了在该文本框中显示“Hello!”，所使用的语句为text1.text="Hello!"。

3、VB中的控件分为3类，它们是标准控件、可插入对象和ActiveX控件。

4、一个控件在窗体上的位置由top和left属性决定，其大小由width和height属性决定。

5、可以通过多种方式激活属性窗口，这些方式是用鼠标单击属性窗口的任何部位、执行“视图”菜单中的“属性窗口”命令、按F4键、单击工具栏上的“属性窗口”按钮、按组合键Ctrl+PgDn 或Ctrl+PgUp。

6、为了选择多个控件，可以按住ctrl或shift键，然后单击每个控件。

7、在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：

Private sub command1_click（）

text1.text="Vb Programming"

text2.text=text1.text

text1.text="ABCD"

End Sub

程序运行后，单击命令按钮，两个文本框中显示的内容分别为ABCD和Vb Programming。

8、在用VB开发应用程序时，一般需要建立界面、设置属性和编写代码3步。

9、控件和窗体的Name属性只能通过属性窗口设置，不能在运行期间设置。

10、代码窗口分为左右两栏，左边一栏称为对象，右边一栏称为过程。

11、为了在输入程序时能自动进行语法检查，必须执行工具菜单中的选项命令，打开选项对话框，然后选择“编辑器”选项卡中的自动语法检测选项。

12、在保存VB应用程序时，窗体文件和工程文件的扩展名分别为frm和vbp。

13、为了把一个VB应用程序装入内存，只要装入工程文件即可。

14、VB应用程序通常由3类模块组成，即窗体模块、标准模块和类模块。

15、为了使标签能自动调整大小以显示全部文本内容，应把标签的Autosize属性设置为true。

16、要想在文本框中显示垂直滚动条，必须把scrollbar属性设置为2，同时还应把multiline 属性设置为true。

17、假定有一个文本框，其名称为text1，为了使该文本框具有焦点，应执行的语句是text1.setfocus。

18、为了使一个标签透明且没有边框，必须把它的borderstyle属性设置为0，并把backstyle 属性设置为0。

19、假定有一个名为pic2.gif的图形文件，要在运行期间把该文件装入一个图片框，应执行的语句为Picture1.picture=loadpicture("pic2.gif")。

20、为了能自动放大或缩小图像框中的图形以与图像框的大小相适应，必须把该图像框的stretch属性设置为true。

21、窗体、图片框或图像框中图形通过对象的picture属性设置。

22、计时器事件之间的间隔通过interva属性设置。

23、有时候要暂关闭计时器，这可以通过enabled属性来实现。

24、组合框有3种不同的类型，这3种类型是下拉式组合框、简单组合框、下拉式列表框，分别通过把style属性设置为0、1、2来实现。

25、在3种不同类型的组合框中，只能选择而不能输入数据的组合框是下拉式列表框。

26、在窗体上画一个列表框，然后编写如下两个事件过程：

private sub form_click（）

list1.removeitem 1

list1.removeitem 3

list1.removeitem 2

end sub

private sub form_load（）

list1.additem "itemA"

list1.additem "itemB"

list1.additem "itemC"

list1.additem "itemD"

list1.additem "itemE"

end sub

运行上面的程序，然后单击窗体，列表框中所显示的项目为itemA和itemC。

27、在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：

private sub form_click（）

text1.text="VB程序设计"

end sub

private sub text1_change（）

picture1.print "VB Programming"

end sub

程序运行后，单击窗体，则在文本框中显示的内容是VB程序设计，而在图片框中显示的内容是VB Programming。

28、把窗体的keypreview属性设置为true，并编写如下两个事件过程：

private sub form_keydown（keycode as integer，shift as integer）

print keycode；

end sub

private sub form_keypress（keyascii as integer）

print keyascii

end sub

程序运行后，如果按下A键，则在窗体上输出的数值为65和97。

29、在执行keypress事件过程时，keyascii是所按键的ASCII值。对于有上档字符的下档字符的键，当执行keydown事件过程时，keycode是下档字符的ASCII值。

30、在窗体上画两个文本框，其名称分别为text1和text2，然后编写如下事件过程：

private sub form_load（）

show

text1.text=""

text2.text=""

text2.setfocus

end sub

private sub text2_keydown（keycode as integer，shift as integer）

text1.text=text1.text+chr（keycode－4）

end sub

程序运行后，如果在text2文本框中输入“efghi”，则text1文本框中的内容为ABCDE。

31、编写如下代码：

dim flag as boolean

private sub form_mousedown（button as integer，shift as integer，x as single，y as single）flag=true

end sub

private sub form_mousemove（button as integer，shift as integer，x as single，y as single）flag=false

end sub

private sub form_mouseup（button as integer，shift as integer，x as single，y as single）if flag=false then

print "DDDD"

end if

end sub

程序运行后，如果在窗体上输出“DDDD”，则应执行的操作为按下鼠标左键（或右键），然后移动并松开鼠标键。

32、为了定义臫的鼠标光标，首选应把MousePointer属性设置为99，然后把MouseIcon属性设置为一个图标文件。

33、为了执行自动拖放，必须把DragMode属性设置为1；而为了执行手动拖放，必须把该属性设置为0。

34、在keydown和keyup事件过程中，当参数shift的值为1、2、4时，分别代表Shift、Ctrl、Alt键。

35、在mousedown和mouseup事件过程，当参数button的值为1、2、4时，分别代表鼠标的左、右、中间键。

36、在VB中可以建立下拉式菜单和弹出式菜单。

37、菜单编辑器可分为3个部分，即数据区、编辑区和菜单项显示区。

38、如果要将某个菜单项设计为分隔线，则该菜单项的标题应设置为-。

39、在菜单编辑器中，菜单项后面4个小点的含义是菜单项的层次。

40、建立弹出式菜单所使用的方法是PopupMenu。