VB作业答案
第一周1.3同步练习题
一．选择题
1.以下不能在“工程资源管理器”窗口中列出的文件类型是D..ocx
2.以下叙述中错误的是C.程序运行后，在内存中只能驻留一个窗体
3.Visual Basic 6.0包括三种版本，其中不包括C.学习版
4.Visual Basic程序设计语言属于C.面向对象的语言
5.假定一个Visual Basic 应用程序由一个窗体模块和一个标准模块构成。为
了保存该应用程序，以下操作正确的是 B.分别保存窗体模块、标准模块
和工程文件
6.通过下面B.窗体布局窗口可以在设计时直观地调整窗体在屏幕上的位置。
7.以下叙述中错误的是C. Visual Basic 应用程序中可以有多个活动窗体
8.对象所能做的动作称为对象的A.方法
9.下列关于事件的叙述中不正确的是D. Visual Basic 中所有对象的默认事
件都是Click
10.一只漂亮的酒杯被摔碎了，则漂亮、酒杯、摔、碎了是D.属性、对象、
事件、方法
11.用一个程序段对某一对象被单击（或双击）做出响应，从而实现指定的
操作，称为B.事件驱动编程机制
12.以解释方式执行程序的过程是边逐条解释边执行，不生成A.目标程序
13.以下有关对象属性的说法中正确的是D.对象的某些属性既可在属性窗口
中设置，也可通过程序代码设置或改变
14.下列叙述正确的是C.不同的对象能识别不同的事件
15.在Visual Basic中最基本的对象是B.窗体，它是应用程序的基石，是其他
控件的容器。
16.以下叙述中错误的是D.对象事件的名称可以由编程者指定。
17.下列叙述正确的是D.事件是对象能够识别的动作。
18.在Visual Basic工程中，可以作为“启动对象”的程序是D. Sub Main过程
或任何窗体。
19.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是C.代码窗口。
20.在Visual Basic应用程序中，在程序中流动的不是一般的数据而是A.事件。
21.Visual Basic一共有设计、运行和中断3种模式，要使用调试工具应该C.
进入中断模式。
22.在代码编辑器中，如果一条语句过长，不能在一行内写下，则需要折行
书写，用户可以通过在行末使用续汗符来实现的，该续行符表示为 B.一
个空格加一个下划字符(_).
23.Visual Basic是一种面向对象的程序设计语言，对象的三要素包括B.属性，
事件，方法。
24.以下叙述中，错误的是C.标准模块文件可以属于某个指定的窗体文件。
25.新建一个标准EXE工程后，不在工具箱中出现的控件是C.通用对话框。
26.在设计阶段，双击窗体Form1的空白处，打开代码窗口，显示C. Form_Load
事件过程。
27.当需要上下文帮助时，选择要帮助的“难题”，然后按C.F1键，就可出现
MSDN窗口及显示所需“难题”的帮助信息。
28.Visual Basic有多种类型的窗口，若要在设计时看见窗体窗口，以下操作
不正确的是B.双击Visual Basic窗口工作区的空白处。
29.下面关于属性与方法的描述中，不正确的是B.属性和方法都有值。
30.不能在窗体上选择多个控件的方法B.有单击每个控件。
二．填空题
1.为了把一个Visual Basic应用程序装入内存，只要装入工程文件即可。
2.面向对象的程序设计方法是把程序和数据封装起来作为一个对象，并对每一个对象设置所需的属性。
3.Visual Basic 是一种面向对象的可视化程序设计语言，采用事件驱动的编程机制。
4.对象的属性是指描述对象的某些特征，方法是指为了处理事件触发后的一系列操作。
5.对象是代码和数据的集合，例如，Visual Basic 中的窗体、控件、菜单等都是对象。
6.开发一个应用程序必须完成以下两项工作：一是设计对象属性；二是编写事件过程代码。
7.在属性窗口中，属性的显示方式分为“按字母顺序”和“按分类顺序”。
8.Visual Basic 应用程序通常由3类模块组成，即窗体模块、标准模块和类模块。
9.当进入Visual Basic 集成环境，发现没有显示“工具箱”时，应选择视图的工具箱选项，是工具箱显示在窗口。
10.工程资源管理器窗口上有3个按钮，它们分别是代码按钮、对象查看按钮和切换文件夹按钮。
11.窗体布局窗口用于指定在程序运行时窗体在屏幕上的初始位置，用户通过鼠标拖动就可以改变窗体位置，并能直接观察到效果。
12.Visual Basic6.0的退出方式也有多种，可以使用快捷键Alt +Q。
2.3 同步练习题
一、选择题
1.在以下有关对象属性的叙述中错误的是（D。Enabled属性值False的控件对象在窗体上将
不可见）。
2.以下关于Name的说法，错误的是（https://www.wendangku.net/doc/7b7650728.html,属性可以在属性窗口修改，也可以在代码中
修改）。
3.在Visual Basic中，所有的窗体和控件一定具有的一个属性是（https://www.wendangku.net/doc/7b7650728.html,）。
4.用于设置删除线的属性是（A.FontStrikethru）。
5.运行时，要给窗体Form1加载“C:\WINDOWS\Clouds.bmp”图像文件，应使用语句（D.Form.picture=LoadPicture(“C\WINDOWS\Clouds.bmp”）。
6.运行时，不能清除窗体Form1中的图像文件的语句是（A.Form1.Picture=””）。
7.窗体Form1的Name属性是Frm1，它的单击事件过程名是（B.Form_Click）。
8.运行时，要在窗体Form1中打印字符串“How Are You”,应使用语句（C.Form1.Print”How Are You”）。
9.用于设置粗体字的属性是（C.FontBold）。
10.将窗体的（A.Enabled）属性设置为False后，运行时窗体上的按钮、文本框等控件就不会对用户的操作做出响应。
11.在设计阶段，双击窗体Form1的空白处，打开代码窗口，显示（B.Form_Load）事件过程模板。
12.Visual Basic中最基本的对象是（B.窗体），它是应用程序的基石。
13.执行多窗体应用程序后（B.允许同时打开多个窗体）。
14.关于多窗体应用程序的叙述正确的是（B.连续向工程中添加多个窗体，会生成多个窗体模块）。
15.将一个窗体设置为MDI子窗体的方法是（B.将窗体的MDIChild属性设置为True）。
16.以下叙述中错误的是（C.窗体的Hide方法和Unload方法的作用完全相同）。
17.工程中有2个窗体，名称分别为Form1、Form2，Form1为启动窗体。要求程序运行后单击Form1时显示Form2，则Form1的单击事件应该是（A.Private Sub Form_Click() Form2.Show）
18.某人创建了一个工程，其中的窗体命名为Form1，之后又添加一个名为Form2的窗体，并希望执行程序时先显示Form2窗体，那么，他需要做的工作是（A.在工程属性对话框把“启动对象”设置为Form2）。
19.以下叙述中正确的是（A.窗体的Name属性指定窗体的名称，用来标识一个窗体）。
20.如果要在应用程序中添加另一个窗体，正确的操作方法是（B.在“工程”的下拉菜单中选择“添加窗体”命令）。
21.在当前工程中添加一个新的窗体，错误的操作是（C.在代码窗口或属性窗口中输入一个新的窗口名称，即自动建立一个新的窗体）。
22.要设置工程中某一个窗体为启动窗体，必须的操作步骤是（C.打开“工程属性”对话框，选择作为启动窗体的窗体名称）。
23.下列语句中，在运行时能使Form1窗体上的输出文本刷新显示的语句是（A.Form1.Refresh）。
24.在多窗体设计时，“工程资源管理器”窗口是非常有用的窗口。关于“工程资源管理器”窗口功能的说明，错误的是（C.在“工程资源管理器”窗口中某一图标左边方框内有“-”号表示已经被移走。
25.要将名为MyForm的窗体显示出来，正确的方法是（A.MyForm.Show）。
26.下列叙述错误的是（C.一个窗体一定对应一个窗体文件，所以一个应用程序只能包含一个窗体）。
27.关于启动窗体的说法错误的是（B.系统默认将最后一个被编辑的窗体作为启动窗体）。
28.在Visual Basic 工程中可以作为“启动对象”的程序有（C.任意窗体或Sub Main过程）。
29.Visual Basic中的MDI窗体指的是（D.多文档界面）窗体。
30.关闭MDI窗体，会触发的事件是（D.QueryUnload）。
二、填空题
1.绘图属性的CurrentX属性和CurrentY属性在设计时不可用，只能在代码中设置，并且经常和（Print）方法结合使用。在默认坐标系中，首次使用Print方法，CurrentX属性和CurrentY 属性的默认值都是（0，0）。
2.在对象的MouseDown和MouseUp事件过程中，当参数Button的值为1、2时，分别表示按下鼠标的（左键）和（右键）按钮。
3.若要使窗体上的所有控件具有相同的字体格式，应设置（窗体）和（Font）的属性。
4.一个应用程序最多可以有（1）个MDI父窗体。在运行时，MDI父窗体中的子窗体最小化时，其图标将显示在（MDI父窗体）中。
5.要使窗体不能移动，应设置的属性是（Moveable）。
6.在VisualBasic中，设置大部分属性的方法有两种：一是(在属性窗口中设置)；二是（在程序代码中设置）。
7.设置窗体背景颜色的属性名称是（BackColor）。
8.窗体有两个属性的默认值是相同的：分别是（Name）和（Caption）。
9.在窗体上输出文本的方法是（Print），清除窗体上输出文本的方法是（Cls）。
10.建立工程并存盘后，除了生成窗体文件外还会生成（工程）文件。
11.程序运行时要使某一个窗体暂时隐藏，但不从内存中清除，应使用（Hide）。
12.要卸载窗体，需要使用语句（Unload）。
13.在“工程资源管理器”窗口中要打开一个窗体，应双击扩展名为（.frm）的文件。
14.在当前工程中添加一个新的窗体，应选择菜单栏（工程）下拉菜单下的选项。
15.要使窗体上没有最大化按钮，应将窗体对象的（MaxButton）属性设置为False。
3.3 同步练习题
一、选择题
1.通过文本框的（D.KeyPress）事件过程可以获取文本框中键入字符的ASCII码值。
3.放置控件到窗体中的最快的方法是（A.双击工具箱中的控件）
5. 要清除组合框Combo1中的所有内容，可以使用(https://www.wendangku.net/doc/7b7650728.html,bo2.Clear
)语句。
7. 要想在一个文本框中显示多行内容，应在界面设计时对下列哪一个属性进行设置（C.Multiline ）
9.在程序中可以通过复选框和单选按钮的（B.Value）属性值来判断它们的当前状态。11.要使控件与框架捆绑在一起，以下操作正确的是（C.在窗体上画好框架，再在框架中画控件）
13.决定控件上文字的字体、字形、大小、效果的属性是（D.Font）
15.要使单击滚动条滑块与两端箭头之间的空白区域时变化值为20，应设置其（D．SmallChange和LargeChange）属性。
17.时钟控件每次经历一个固定的时间间隔就会（B．触发事件）
19.下面（B.CheckBox）控件不支持DblClick事件。
21.能够改变复选框中背景颜色的属性是（Backcolor）
23.选项按钮用于一组互斥的选项中。若一个应用程序包含多组互斥条件，可在不同的（D.框架控件或图片框）中安排适当的单选按钮，即可实现。
25.当组合框的style属性设置为0时，其表现形式为（B.下拉组合框）
27.要使列表框中的每一个文本项的边上都有一个复选框需设置属性。（D.Style）
29.若在窗体上有一个名称为Combo1的组合框，含有5个项目，要删除最后一项，正确的语句是（https://www.wendangku.net/doc/7b7650728.html,bo1.RemoveItem4）
31.如图3-2所示，在窗体上先后画2个图片框，名称分别为P1和P2，P2中加载了图片，且将P2.DragMode属性设为1。要求程序运行时，可以用鼠标P2拖动到P1中，能实现此功能的事件过程是
（B、Private Sub P1_DragDrop(Source As Control,X As Single,Y As Single)
Source.Move P1.Left+X,P1.Top+Y
End Sub）
33.在窗体上画1个文本框和1个时钟控件，名称分别为Text1和Timer1,在属性窗口中把时钟控件的Interval属性设为1000，Eable属性设为False。程序运行后，如果单击命令按钮，则每隔1s钟在文本框中显示一次当前的时间。以下是实现上述程序的程序: Private Sub Commond1_Click（）
Timer1._____=Ture
End Sub
Private Sub Timer1_Timer（）
Text1.Text=Time
End Sub
在（）处填入的内容是（A.Enable=True）
35.在窗体上画1个文本框Text1和1个标签Label1，程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容，以下可以实现上述操作的时间过程是
（B. Private Sub Text1_Change()
Label1.Caption=Text1.Text
End Sub ）
37.在窗体上画一个名称为TA的文本框，然后编写如下的事件过程：
Private Sub Ta_KeyPress(KeyAscii As Integer)
...
End Sub .
假定焦点已经定位于文本框中，能够触发KeyPress事件的操作是（D.按下键盘上的某个键）39.如果窗体上有1个命令按钮（确定），在代码编辑窗口有与之相对应的OK_Click（）事
件过程，则命令按钮的名称属性和Caption属性分别是（A “OK”和“确定”）
41.窗体的MouseDown的事件过程有4个参数，关于这些参数，这些参数，正确的描述是（A.通过Button参数判定当前按下的哪一个鼠标键）Form_MouseDown(Button As Integer, Shift As Integer,X As Single,Y As Single)。
43.窗体上有1个文本框Text1,然后编写如下事件过程，程序运行后在文本框中输入a，在窗体上显示(C.aC)。
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode+2);
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii);
End Sub
45.若窗体上图片框中有一个命令按钮，则此按钮的Left属是指（B.按钮左端到图片框左端的距离）
47.下列(B.Private Sub Command3_Click())程序段能删除列表框List1中的所有相。
For I=0 To List1.ListCount-1
List1.RemoveItem 0
Next I
End Sub
49.窗体上有一个名称为Frame1的框架，若要把框架上显示的“Frame1”改为汉字“框架”，下面正确的语句是（B.Frame1.Caption=“框架”）。
51.在程序运行的时，下面的叙述中正确的是（C.只装入而不显示窗体，也会执行窗体的Form_Load事件过程）。
53.运行状态，在文本框Txtinput中输入“ABC”时，窗体上显示（C.A ）.
AB
ABC
Private Sub Txtinput_Change()
Print txtinput.Text
End Sub
55.设有如图3-3所示窗体和以下程序
Private Sub Command1_Click()
Text1.Text=”Visual Basic”
End Sub
Private Sub Text1_LostFocus()
If Text1.Text<>”BASIC”Then
Text1.Text=””
Text1.SetFocus
End If
End Sub
程序运行时，在Text1文本框中输入“Basic”，然后单击Command1按钮，则产生的结果是（A.文本框中无内容，焦点在文本框中）。
二．填空题
1.Cls方法适用于（窗体）和（图片框）的清除，若是对列表框和组合框进行清空则使用（Clear）
方法。
3.运行状态时，用户无法将光标定位在文本框中，是由于（Enable）的属性为False，用户无法对文本框中已有内容进行编辑，是由于（Locked）的属性为Ture。
5.一般情况下，控件有两个属性项的默认值是相同的，这两个属性项是（Name和Caption）。
7.滚动条控件主要支持两个事件，它们是（Scroll和Change）事件。
9.在程序代码中，使用方法（Hide）和（Show）可以隐藏或显示窗体。
11.在对象的KeyPress事件过程中，参数KeyAscii表示所按键的（ASCII码）值。
13.为了执行对象的自动拖放，必须把该对象的（DragMode）属性设置为（1）；而为了执行对象的手动拖放，必须把该对象的（DragMode）属性设置（0）。
15.窗体上有一个组合框，其中已输入了若干个项目。程序运行时，单击其中一项，即可把该项与最上面的一项交换。下面是可实现此功能的程序，请填空。
Private Sub Combo1_Click()
Dim temp
temp=Combo1.Text
(Combo1.List(Combo1.ListIndex))=Combo1.List(0)
Combo1.List(0)=temp
End Sub
17．填写下表中的相关内容
19.填写相关内容
Private Sub Command2_Click()
Shape1.BorderColor=vbBlue
Shape1.((1)BorderStyle)=2
End Sub
Private Sub Command1_Click()
Shape1.((2)Shape)=3
End Sub
23.在窗体上从左到右有Text1、Text2两个文本框，要求程序运行时，在Text1中输入1个成绩后按回车键，则判断成绩的合法性，若成绩为0~100中的某个数，则光标移到Text2中，否则Text1中内容反向选中，光标设置在Text1中，并弹出对话框显示“输入成绩不合法”。
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim a As Integer
If ((1)KeyAsicc=13) Then
a =Val(Text1.Text)
If ((2)a<=100) And a>= 0 Then
((3)Text2.SetaFocus)
Else
MsgBox”输入成绩不合法”
Text1.SelStart=0
Text1.SelLength=((4)Len(Trm(Text1.Text))
Text1.SetFocus
End If
End If
End Sub
三、默写
（一）文本框：
属性：
https://www.wendangku.net/doc/7b7650728.html,名称
2.Text内容
3.Locked锁定
4.Passwordchar密码显示
5.MaxLength可输入最大字符数
6.MultiLine多行显示
7.ScrollBars滚动条
8.MousePointer鼠标指针
9.MouseIcon鼠标图标
10.SelText选中文本的内容
11.SelStart选中文本起始位置
12.SelLength选择文本的长度
方法：
1.SetFocus焦点
2.Refresh刷新
事件：
1.KeyPress按下某ASCⅡ键触发
2.KeyDown按某键触发
3.KeyUp放起某键触发
4.Change内容变化触发
5.GotFocus得焦点触发
6.LostFocus失焦点触发
（二）标签
属性：
1、 Caption:标签上的文字。
2、 AutoSize:标签随着上面的文字的变化而变化。
3、 BackColor:标签的背景颜色。
4、 Font:设置标签的字体。
事件：
1、 Click:点击标签时发生的。
2、 Change:当标签上面的文本发生变化时发生。
3、 DblClick:当双击标签时发生的。
方法：
1、 Move:移动标签，必须有坐标。如：Label1.Move 0,0将标签移动到坐标植为0，0的位置。
（三）图片框：
属性：
https://www.wendangku.net/doc/7b7650728.html,:图片框名称
2.Picture:加载图片
3.Autosize:自动调节图片大小
4.font:字体
5.CurrentX:当前位置的横坐标
6.CurrentY:当前位置的纵坐标
方法：
图片框可以像窗体一样使用Print方法输出文本，使用绘图方法绘制图片，使用Cls方法清除图片和图形
事件：
图片框可以接受Click事件和Dbclick事件
（四）命令按钮：
属性：
1、 Caption:表示按钮上面的文字。
2、 Picture:按钮上面的图片(适用于图片按钮)。
3、 Font:按钮上字体的设置。
事件：
1、Click:点击按钮时发生的。
方法：
1、 Move:移动按钮，必须有坐标值。
（五）组合框：
属性：
1、 ListCount: 用于返回列表框里的选项的总数。
2、Sorted: 列表框里元素的排序方式--值为True:列表项自动按升序排序；False:列表项按插入的顺序排序
3、ListIndex: 表示列表框里当前所选中的项的索引值。
5、 Style:列表框的样式：
值为0：下拉组合框，用户可以选择也可以自己输入；
值为1：简单组合框，由一个文本框和列表框构成，可以选择也可以自己输入；值为2：下拉列表组合框，用户只能从组合框中选择；
6、 Locked:值为True:用户不可以自己输入；False:用户可以自己输入。
事件：
1、 Click:输入用户点击组合框中的选项时发生的。
2、 Scroll:用户滚动滚动条时发生。
3、 Change:当用户改变组合框中的内容时发生。
4、 DropDown:当用户点击向下箭头时发生。
方法：
1、AddItem
2、RemoveItem 用法和列表框一样的。
（六）列表框：
属性：
1、 ListIndex:表示列表框里当前所选中的项的索引值。
如：msgbox List.ListIndex 若当前选中了列表框里的第二项，则返回1
2、 List:表示列表框里的选项内容，后面要加上索引值。
如:Text1.Text=List1.List()若开表框里的第一项为aaa，则文本框Text1，里边的内容为aaa
综合例子：Text1.Text=List1.List(List1.ListIndex)
3、 Sorted:列表框里元素的排序方式--值为True:列表项自动按升序排序；
False:列表项按插入的顺序排序
4、 Selected:设置一个选中的状态，后面要加上索引值--值为True:表示选中；
False:表示未选中；
如：If List1.Selected(0)=True then
List1.RemoveItem 0
End If
5、 MultiSelect:指定列表框里的选项是否可以多选。
值为1：每次只能从中选择一项；
值为2：可以普通多选，只用鼠标实现；
值为3：可以多选，用Ctrl+鼠标或Shift+鼠标实现
6、 ListCount:用于返回列表框里的选项的总数。
事件：
1、 Click:点击列表框中的选项时发生的。
2、 Scroll:滚动列表框的滚动条时发生的。
方法：
1、 AddItem:向列表框中的添加选项，后面跟添加的内容
如：List1.AddItem"APPLe"
2、 RemoveItem:从列表框中删除一选项，后面跟索引值
如：List1.RemoveItem 0 表示删除列表框中的第一项，若删除全部选项应用循环实现
3、 SetFocus:使列表框获得焦点
4、 Clear:清空列表框里的列表项
3.3 同步练习题
一、选择题
2.若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（D.BackStyle）。
4.Image控件加载图片后的尺寸（D.与图片大小相同）。
6.当用户单击命令按钮时，（B.Enabled）属性可以使得命令按钮对激发事件无效。
8.使用（B.AddItem）方法可将新的列表项添加到一个列表框中。
10.(C.时钟)控件可以帮助控制动画效果。
12.下列叙述中正确的是（A.标签控件不能接受焦点事件）。
14.下面（D.ListBox）控件不支持Change事件。
16.Timer控件的（A.Enabled）属性决定该控件是否对时间的推移做出响应。将该属性设置False会关闭Timer控件，设置为True则会打开它。
18.指定列表的元素是否按字母表顺序自动排序的属性为（D.Stored）。
20.以下关于时钟控件的说法，正确的是（C.运行时时钟控件在窗体上不可见，如果时钟控件的Interval属性为0，则时钟控件无效）。
22.当某一按钮的（B.Enabled）属性设置为False时，该按钮为灰白显示。
24.引用列表框List1的最后一项使用（A.List1.List（List1.ListCount-1））。
26.为了删除ComboBox控件中的项目内，需要使用（D.RemoveItem）方法。
28.设窗体上有一个滚动条，要求单击滚动条右端的箭头一次，滚动块移动一定刻度值，决定此刻度值的属性是（C.SmallChange）。
30.在窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，要求在执行程序时，每单击按钮一次，文本框向右移动一定距离。下面能够正确实现上述功能的程序是（C.Private Sub Command1_Click()
Text1.MoveText1.Left+100
End Sub)。
32.为了删除窗体上的一个控件，下列正确的操作是（D.选择要清除的控件后按Del键）。
34.假定在图片框P1中装入了一个图形，为了清除该图形（不删除图片框），应采用的正确方法是（B.执行语句P1.Picture=LoadPicture(“”)）。
36.窗体上有名为Option1的单选按钮，则以下语句中与IfOption1.Value=TrueThen不等价的是（C.IfValue=True Then）。
38.在窗体上画1个命令按钮和2个文本框，其名称分别为Command1、Text1和Text2，然后编写如下程序：
Dim sl As String, s2 As String
Private Sub Form_Lodad()
Text1.Text=””
Text2.Text=””
End Sub
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
S2=s2&Chr(KeyCode)
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
s1=s1&Chr(KeyAscii)
End Sub
Private Sub Command1_Click()
Text1.Text=s2
Text2.Text=s1
S1=””
S2=””
End Sub
运行程序后，在Text1中输入“abc”，然后单击命令按钮，在文本框Text1和Text2中显示的内容分别是（C.ABC和abc）。
40.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程
Private Sub Command1_Click()
Text1.Text=”Visual”:Me.Text1=”Basic”:Text1=Text1&”Program”
End Sub
程序运行后，如果单击命令按钮，则文本框中显示的是（C.BasicProgram）。
42.以下关于图片框控件的说法中，错误的是（D.用Stretch属性可以自动调整图片框中图形的大小）
44.以下叙述中错误的是（B.在KeyPress事件过程中不能回避回车键）
46.如果窗体Form1上有“字体”框架在代码编辑窗口有框架FontFrame_DblClick()事件过程和窗体的单击事件过程，则框架的名称属性和Caption属性分别为（A.”FontFrame”和“字体”），窗体的单击事件过程名为（Form_Click）
48.下列关于某对象SetFocus和GotFocus的描述中，正确的的是（D.SetFocus是方法，GotFocus 是事件）
50.能够存放组合框的所有项目内容的属性是（C.List）
52.图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是（A.Autosize）
54.设窗体上有1个水平滚动条，已经通过属性窗口把它的Max属性设置为0，Min属性设置为100，下列叙述正确的是（A.程序运行时，若使滚动块向左滑动，滚动条的Value属性值就增加）
56.若看到程序中有以下事件过程，并希望运行后窗体上有文本输出，则可以肯定的是（B.鼠标右键单击Click对象，执行此过程）
If Button =2Then Print “VB Program”
End Sub
二、填空题
2.时钟控件不同于其他控件之处在于（周期性地自动引发事件）。
4.设置是否可以用Tab键来选取命令按钮，应该用（TabStop）属性。
6.设置时钟控件只能触发（Timer）事件。
8.列表框的ListIndex属性值为最后选中的列表项序号，第一个列表项的序号为（0）如果未选中任何项目，则其值为（-1）
10.列表框的（List）和（Selected）属性是数组。
12.在对象的KeyDown和KeyUp事件过程中，当参数Shift的值为1、2、4时，分别表示用户按下了（Shift）、（Ctrl）和（Alt）键。
14.为了自定义鼠标光标的形状，首先应该把对象的（MousePointer）属性设置为（99），然后再把（MouseIcon）属性设置为一个图标文件。
16.在窗体上有1个名称为Command1的命令按钮和1个名称Text1的文本框，程序运行后，Command1为禁用(灰色)，此时如果在文本框中输入字符，则命令Command1变为可用。请填空。
Private Sub Form_Load()
Command1.Enabled=False
End Sub
Private Sub Text1_(Change)()
Command2.Enabled=Ture
18.假定建立了一个工程，该工程包括两个窗体，其名称分别为Form1和Form2启动窗体为Form1画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，补充。
Private Sub Command1_()Click()
(Unload)Form1
Form2.(Show)
End Sub
20.以下程序的功能是：当向文本框Text2输入密码时，若“显示密码”复选框Chk没有被选中，再重新输入密码时，则在文本框Text3中同时显示的是密码字符本身。完善程序。Private Sub Text2_Change()
If (Chk1.Value)=1 Then (Text3.Passwordchar=””) Else Text3.Passwordchar=”#”
Text3.Text=(Text2.Text)
End Sub
22.将现存在D盘Pic文件夹中的名为Fishing.bmp的图片加载到图片框Pic1中的语句为ing （Pic1.Picture=loadpicture(“D:\Pic\Fishing.bmp”)）
三．写出下列的属性方法事件
1.单选按钮属性Name名称
Style样式
Caption标题
Picture图片
Alignment标题对齐方式
DownPicture图形按钮被按下时的设置
Value状态
DisablePicture图形按钮无效时的图片设置
Enabled有无效
事件Click单击
GotFoucs获焦点
方法SetFocus选中
2.复选框属性Name名称
Style样式
Caption标题
Picture图片
Alignment标题对齐方式
DownPicture图形按钮被按下时的设置
Value状态
DisablePicture图形按钮无效时的图片设置
Enabled有无效
事件Click单击
GotFoucs获焦点
方法SetFocus选中
3.框架属性Name名称
Visible显示隐藏
Caption标题
Enabled有无效
事件Click单击
DblClick双击
4.形状属性Name名称
BorderColor边框色
Shape种类
BorderWidth边框宽度
BackStyle背景样式
FillColor填充色
BackColor背景色
FillStyle底纹图案
5.时钟属性Enabled有无效
Interval 时间间隔
事件Timer触发事件
4.3同步练习题
一、选择题
1.下面B.”6/12/2001”是合法的字符串行常量。
3./、\、mod、*4中优先级最低的是C.MOD
5.字符%是表明Ainteger类型变量的的定义符。
7.求一个三位整数N的十位数的正确方法是A.Int（N/10）-Int（N/100）*10
9.下列表达式中，值为true的是D.14/2\2<16/4
11.下列说法不正确的是D.语句print5+”7”的+是连接符，相当于运算符“&”13.逻辑表达式（（10>9）And(8>9)）Or(Not(4>5))的值是（A.True）。
15.下面表达式中，（A.Exp(-3.5)）的运算结果与其他三个不同。
17.如果x是一个正实数，对x的第3位小数四舍五入的表达式是（B.Int(100*(x+0.005))/100）。
19.表达式Int(-17.8)+Sgn(17.8)的值是（B.-17）。
21.函数Len(Str(Val(“123.4”)))的值为（C.6）。
23.下列说法错误的是（C.产生0.01至100.99范围内的随机数，包括两端点，间隔为0.01的表达式可写成Myvalue=Int(101.98*Rnd+0.01)）。
25.函数InStr(“Visual Basi程序设计教程”，“ua”)的值为（D）。
27.选拔身高T超过1.7M且体重W小于62.5KG的人，表示该条件的布尔表达式为（C.T＞1.7AndW＜62.5）
29.将任意一个正的两位整数N的个位数与十位数对换的表达式为（A.（N-Int（N/10）*10+Int（N/10）））
31.X，Y之一小于Z的VB条件表达式是（D.X＜ZNotY＜Z）
33.设s1、s2为字符串型变量，s1=“how do you do”，s2=“O”，则以下关系表达式的结果为True的是（A.len（s1）=instr（s1，“d”）+8）
35.下面表达式的值为真的是（A.Mid（“VB”，1,12）=Right（“Programing Lanuage Visual Basic”,12））
37.已知A$=“A12B3456”，L=Len（A$）+Val（Mid（A$，2,2）），则L=(B.20) 39.算术表达式In丨e^π+sin^3x/x+y丨的VB表达式是（A.Log（abs（（3.14159）＋（x）^3）/（x+y）））
41.执行语句：Print Format（5459.478，”##,##0.00”）,正确的输出结果是B.5,459.48。
43.下列表达式中不能判断x是否为偶数的是D.x\2=0。
45.下列所列四组数据中，全部正确的visualbasic的常数是
A.32768,1.34D2,”ABCDE”,&O1767
47.设a=4,b=3,c=2,d=1,下列表达式的值是D. 0。A>b=1 Or c 49.显示如图4-2所示的输入框的语句是A. A=InputBox 二、填空题 1.写出下面Val函数表达式的值 （1）Val(“1.23E2CD”)的值为123 3.关系式-5<=X<=5所对应的布尔表达式是（x<=-5 or x>=5 ）。 5.一元二次方程axx+bx+c=0有实数的条件是a不等于0并且bb-4AC大于等于0表示布尔表达式是（a<>0 and b^2-4*a*c>=0 ） 7.x+y小于等于8且x-y大于8的逻辑表达式为（(x+y) < 12 and (x-y) > 2） 9.关系式X<=-5或X>=5所对应的布尔表达式为（x<=-5 Or x>=5 ） 13.假定有如下的命令按钮（名称为Command1)事件过程： PrivateSubCommand1_Click() x=InputBox("输入："，"输入整数") MsgBox"输入的数据是：”，，”输入数据："+x EndSub 程序运行后，单击命令按钮，如果从键盘上输入整数10，则 x的值是数值（10） 输入对话框的标题是（输入整数） 信息框的标题是（输入数据：10） 信息框中显示的是（输入的数据是：） 三．数据类型 4.3同步练习题 一．选择题 2、设有如下变量声明： Dim TestDate As Date 为变量TestDate正确赋值的表达方式是（A、TestDate=#1/1/2002#） 4、表达式Int（8*Sqr(36)*10^(-1)*10+0.5）/10的值是（C、0.5） 6、下列符号常量的声明中，（C、Const a As Double=Sin(1)）是不合法的。8、设A=”12345678”，则表达式Val(Left(A,4) + Mid(A ,4 ,2))的值为（B、123445） 10、窗体上放置了3个文本框，若在Text1中输入456，在Text2中输入78，在程序中执行了语句Text3.Text=Text1.Text+Text2.Text后，则在Text3中显示（B、45678） 12、要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句（B、Option Explicit） 14、假设变量Lng为长整型变量，下面不能正常执行的语句是（A、Lng=16384*2）16、代数表达式对应的Visual Basic表达式为 （A、Sqr((x+Log(x))/(a+b))+Exp(-1)+Sin((x+y)/2)） 18、在Form_Click事件中执行下列语句后错误的结果是（D、Print Format(12345.6,”0.00E+00”)的输出结果是0.12E+05） 20、Sgn(1-Int(Sin(5)-3))的值是（B、1） 22、如果A=True，则式子43>44And Not A Or A的结果是（A、True） 24、设a=”Visual Basic”,下面使b=”Basic”的语句是 （B、b=Mid(a,8,5)） 26、设a=3，b=2，c=1，运行Print a>b>c得结果是（C、False） 28、设a=3，b=5，则以下表达式值为真的是B、（a>b) Or (b>0) 30、代数式对应的Visual Basic表达式是（D、a/(b+c/d)） 32、已知X 34、代数式x1-a+ln10+sin(x2+2π)/cos(57)对应的Visual Basic表达式是（A、X1-Abs(A)+Log(10)+sin(X2+2*3.14)/cos(57*3.14/180)） 36、语句Print Sgn（-3^2）+ Int(-3^2)运行时输出的结果为（D、-10） 38、表达式X+1>X是（D、关系表达式） 40、在一个语句行内书写多条语句时，语句之间应该用（D、冒号）分隔。 42、产生[10,37]之间随机整数的Visual Basic表达式为（B、Int（28*Rnd）+10）44、下列（C、28wed）符号不能作为Visual Basic中的变量名。 46、下面（D、#False#）不是字符串常量。 48、用Msgbox”你好”，Vbokonly，“Hello”显示的消息对话框窗口的标题是（D、Hello） 二、填空题 2、一般情况下，Visual Basic的编码规则是：一行上书写一条语句，一行上最多可以书写（255）个字符。若需要再同一行上书写多条语句，语句间用（冒号“：”）隔开；若需要将一条语句分多行写，则必须在行末加（续行符“_”（空格和下划线）） 4、将下面的条件用Visual Basic的布尔表达式表示 （1）X+Y小于10，且X-Y要大于0 （X+Y）<10 And (X-Y)>0 （2）X、Y都为正整数或都是负整数 X*Y>0 And X=Int(X) And Int(Y)=Y （3）X、Y之一为0但不得同时为0 X*Y=0 And X+Y<>0 6、写出下面Format的函数值 （1）Format(8888.3,”##,##0.00”)的值为（8888.30） （2）Format(627.9,”####”)的值为（628） （3）Format（0.6677,”0.00”）的值为（0.67） （4）Format（0.5678,”#.00”）的值为（0.57） （5）Format（“HELLO”,”<”）的值为（hello） （6）Format（“This is a good idea”,”>”）的值为（THIS IS A GOOD IDEA）8、X是小于100的非负数，对应的布尔表达式为（x<100 And x>=0） 10、设a=5，b=10，则执行c=Int（（b-a*Rnd+a）+1）后，c值得范围为（6~10）12、设A=2，B=3，C=4，D=5，写出下列布达尔表达式的值 （1）A>B And C<=D Or 2*A>C False （2）3>2*B Or A=C And B<>C Or C>D False （3）Not A<=C Or 4*C=B^2 And B<>A+C False 5.3同步练习题 一、选择题 1.下列程序段的执行结果为———A.1 2 3 5 a=0:b=1 a=a+b:b=b+a:Printa;b a=a+b:b=b+a:Printa;b 3.假设变量Bool是一个布尔型变量，则下列赋值语句中，正确的是（D Bool=3＜4） 5.下列程序段的执行结果为（C2 3 False） x=2:y=3 z=x=y Print x;y;z 7.设有一个文本框控件text1，假设已存在三个整形变量a,b和c,且变量a的值为5，b的值为7，c的值为12.以下的C text1.text=a&"+"&b&"="&c 语句可以使文本框内显示的内容为5+7=12. 9.下面所列控件中，其值既能在程序设计时设定，又能在程序运行时通过赋值改变的是—— D Label1.Visible 11.设整型变量a、b的当前取值分别为200与20，以下赋值语句中不能真确执行的是---B Text1=a*b/b 13. 执行赋值语句a=746+Mid（‘’74697‘’,3,2）后a变量中的值为___C_.815__ 15.下列语句中正确的是。C Label1.Caption=1234 17.设a=10,b=5,c=1,执行语句Printa>b>c后，窗体上显示的是。B False 19.以下程序段在立即窗口中输出。B.our a=＂your＂ b=＂sname＂ c=＂iscr＂ Print Right(a,3) Picture1.Print Mid(b,2,4) Debug.Print Left(c,2) 21.在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程：B BBB Private Sub Text1_KeyPress(KeyAscii As Integer) Dim Str As String Str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2,KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“b”，则在文本框Text1中显示的内容为。 23.下列事件过程 Private sub command1-click() Dim sum as integer Sum%=19 Sum=2.32 Print sum%;sum End sub 运行后输出结果是（D.2 2） 25.在窗体上画2个滚动条，名称分别为hscroll1,hscroll2.6个标签，名称分别为label123456,其中456分别显示A B A*B等文字信息，标签12分别显示其右侧的滚动条的数值，3显示A*B的计算结果。当移动滚动框时，以下不能显示上述功能的事件过程是Dabel3.caption=hscroll1.text*hscroll2.text.End sub 27、下列程序的执行结果为----B Score=2 a=75 If a>60 Then Score=1 If a>70 Then Score=2 If a>80 Then Score=3 If a>90 Then Score=4 Print "Score=";Score 29.执行以下语句后，显示结果为---C-1 Dim x If x Then Print x Else Print x-1 31.下列( C x=val(text1.text) …… End if Print if )程序段能实现以下分段函数 33.下列(a)程序段的执行结果为（AA.-9） A=”1” B=”2” A=val(a)+val(b) B=val”12”B.9 C.12-12 D.0 If a <>b then print a – b else pring b-a 35.设x是整型变量，与函数IIf(x＞0，-x，x)有相同结果的代数式是( D.-x ) 37.在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1,然后编写如下程序： Private sub command1_click() Dim a as integer,t as string a=inputbox(“请输入日期(1~31)”) t=”旅游景点:”&Iif(a>0 and a<=0,”长城”,””)&Iif(a>10 and a<=20,”故宫”,””)_ &Iif(a>20 and a<=31,”颐和园”.””) Text1.text=t End sub 程序运行后，如果从键盘上输入16，则在文本框中显示的内容是___D_旅游景点：故宫_____. 39.在窗体上画一个名称为Text1的文本框。要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是__ A.Private Sub Text1_KeyPress ( KeyAscii As Integer ) If KeyAscii<65 OrKeyAscii>90 Then MsgBox “请输入大写字母” KeyAscii=0 End If End Sub 41.计算分段函数： 《VB程序设计》作业参考答案 一．选择题 1－5 ABC CB 6—10 CCA DC 11－15 ABC DB 15－20CDA CB 21－25DBD CC 25－30DAC AA 31－35 DAC AA 36－40 BCC CD 41－45 CCC AC 46－50DDB AD 51－55 ACA CD 56－60 BCA DA 61－65 BAADB 66－70DBDAC 71－75BBBAD 76—80CDABC 81-85ABCD C 86-90BAADD 91-95CBBAD 96.B 二．填空题 (1) E (2) 程序代码(3) CmdDisplay.Visible =False(4) t=a(j)(5) And (6) 回车符(7) text2.setfocus (8) 3 (9) D=B:B=C:C=D (10) Random （11）事件过程(12) 打开对话框(13) 3 (14) a(i,j)=0 (15) L1.text (16) Put # (17) True (18) I MOD 4=0 (19) AaBbCc （20）INT(Rnd*100) ；arr （21）Output ；Write #1,StuNo,StuName,StuEng (22)10 (23)4 (24) 顺序，随机 (25)INPUT,OUTPUT,APPEND （26）程序代码窗口的字符过大或过小，可以通过（工具→选项→编辑器格式→大小）去改变。（27）窗体、控件、对象（28）界面设计（29）对象、代码（30）窗体、标准模块、类模块、工程（31）窗体(Form)、图片框(PictureBox)、打印机(Printer)、立即窗口(Debug) （32）E D（33）81 （34）程序，数据（35）窗体、控件、对象（36）对象、代码（37）用户界面的窗体、执行具体操作的代码。（38）Picture属性、剪切板把图形粘贴 三．编程题 1. Option Base 1 Private Sub Form_click() Dim a(3) As Integer, m As Integer Do While m <> -1 And i < 3 m = InputBox("请输入第" & i + 1 & "条边") i = i + 1 a(i) = m If a(i) < 0 Then MsgBox "输入错误，请重新输入！" i = i - 1 End If Loop If a(1) + a(2) > a(3) And Abs(a(1) - a(2)) < a(3) Then 同步练习1 二、选择题 01——05 CADAB 06——10 ACDAB 11——15 CBDBB 同步练习2 二、选择题 01——05 ABDCA 06——10 CACBC 11——15 DADAD 16——20 BDBBB 三、填空题 1．可视 2．LEFT、TOP、WIDTH、HEIGHT 3．按字母顺序 4．查看代码 5．工具、编辑器 6．FORM窗体、FONT 7．MULTILINE 8．在运行时设计是无效的 9．工程、工程属性、通用、FORM1.SHOW 10．TABINDEX、0 同步练习3 二、选择题 01——05 BCADB 06——10 ADBBC 11——15 DBCBA 16——20 BAABB 三、填空题 1．整型、长整型、单精度型、双精度型 2．SIN(30*3.14/180)+SQR(X+EXP(3))/ABS(X-Y)-LOG(3*X) 3．164、今天是：3-19 4．FALSE 5．-4、3、-3、3、-4、4 6．CDEF 7．(X MOD 10)*10+X\10 8．(35\20)*20=20 ( 35 \ 20 )* 20 = 20 9．X MOD 3=0 OR X MOD 5=0 10．27.6、8.2、8、1、100、397、TRUE、FALSE 同步练习4 一、选择题 01——05 DBCAD 06——10 CBBAB 11——15 D25BAC 16——20 CBACB 21——25 DAABC 二、填空题 1．正确性、有穷性、可行性、有0个或多个输入、有1个或多个输出2．1 2 3 3．X>=7 4．X 题1.若要使命令按钮不可操作，要对下列哪个属性进行设置 A、Enabled B、Visible C、BackColor D、Caption 标准答案:A 题2.打开文件的Open语句中，如果省略“For模式”，则打开的文件的存取方式是 A、顺序存取方式 B、顺序文件方式 C、随机存取方式 D、二进制方式 标准答案:C 题3.命令按钮、单选按钮、复选框上都有Picture属性，可以在控件上显示图片，但需要通过下列哪一个属性来控制 A、Appearance属性 B、Style属性 C、DisabledPicture属性 D、DownPicture属性 标准答案:B 题4.系统启动时自动执行下列哪一个事件过程 A、Load B、Click C、UnLoad D、GotFocus 标准答案:A 题5.VB工程中窗体文件的扩展名是 A、.bas B、.frm C、.vbg D、vbp 标准答案:B 题6.如下数组声明语句，正确的是 A、Dim x[1,4] As integer B、Dim x(1, 1 to 4) As integer C、Dim x([1,n] As integer D、Dim x(1 4) As integer 标准答案:B 题7.如下VB的特点中错误的是 A、简单易学 B、界面友好 C、不可编译 D、集成化环境 标准答案:C 题8.从随机文件读出数据使用的语句是 A、Input # 文件号，变量名 B、Get # 文件号，变量名 C、Put # 文件号，变量名 D、Write # 文件号，变量名 标准答案:B 题9.为了防止用户随意将光标置于控件之上，应 A、将控件的TabIndex属性设置为0 B、将控件的Tapstop属性设置为True C、将控件的TapStop属性设置为False D、将控件的Enabled属性设置为False 标准答案:D 题10.如果希望在InputBox的提示项中输出多行内容时，需要使用下列哪个参数实现 A、Chr(13)+Chr(10) B、Chr(13) C、Chr(10) D、Chr(10)+Chr(13) 标准答案:A 实验教材实验一 1：单项选择题： A A C C C D C B B C 2：填空题： （1）.bas （2）.vbp，.frm （3）视图工具箱 （4）对象 （5）属性对象事件方法 （6）Windows （7）事件行为 （8）窗体模块 实验二 1：单项选择题： A D C C A B A B D C B B C B C B A B D C 2：基本运算题： （1）27 （2）3.33333333333333 （3）3 （4）0 （5）-3 （6）2 （7）ab33 （8）类型不匹配 （9）3 （10）AB3 实验三 1：单项选择题： B C B D C 2：填空题： （1）300 （2）321456 （3）Shanghai （4）6 7 6 （5）True （6）2+3=5 （7）”area=” 12.56 （8）VISUAL 实验四 1：单项选择题： C A A C A 2：填空题： （1）7 （2）3 5 （3）输入的数小于0 （4）3 （5）False （6）2010 is not leap year. 试验五 1：单项选择题： A C C A B A C C C B 2：填空题： （1）9 （2）①n ②1 （3）①Len(a) ②n\2 ③Mid(a,(n-i+1),1) ④Mid(a,(n-i+1),1) （4）①n Mod 3=1 And n Mod 5=1 And n Mod 7=1 ②While CountN<5 （5）Mid(c1,1,i) 实验六 1：单项选择题： D B D C D A C A D D 2：填空题： （1）30 （2）3 （3）①a(2) ②a(3) ③a(1) （4）①1 ②2 ③a(i)=a(6-i) （5）①i+j ②0 ③a(i,j) （6）①Print ②k ③a(k,j)=a(j,k) ④a(k,j); 实验七 1：单项选择题： A B B A C B 2：填空题： （1）15 （2）①Preserve a(n+1) ②a(i+1)=a(i) ③Exit For ④a(i+1)=m⑤0 to n+1 (或LBound(a) to UBound(a)) （3）d,c,b,a 实验八 1：单项选择题： C A D B D C A C B 2：填空题： （1）a=9 b=4 （2） 36 25 16 9 4 1 （3）①a ②UBound(b) ③ 1、完成实验A（P.259）中的第1、 2、 3、5题。 2、参照第2章例2.6，建立一个类似记事本的应用程序，提供：(1) 剪切、复制和粘贴的编辑操作；(2) 字体大小的格式设置；此外，再对记事本的应用程序的功能进行一点扩允。 1．完成在实验B 顺序结构程序。（P.262）中的第1、2 、4 、5.、6题 2．完成实验C 选择结构（P.266）中的第1、2、4、5题 3．用上面实验B的第二题和实验C的第二题完成下面的实验报告。 1、完成实验D循环结构（P.268）中的第1、3、4、6题，其中第1题利用单循环结构显示如图D.1(P.268)所示的界面,而后将图形改为倒三角形。 2、选做实验E数组（P.271）中的第1、2、3题中的任意二题 3、以实验D中的第4题和实验E中的做完的某一题完成下面的实验报告。 A．1 Private Sub Command1_Click() Label3 = Text1 End Sub A．2 Private Sub Form_Load() Timer1.Interval = 0 End Sub Private Sub Command1_Click() '自动 Timer1.Interval = 200 End Sub Private Sub Command2_Click() '手动 Timer1.Interval = 0 Call MyMove End Sub Private Sub Timer1_Timer() Call MyMove End Sub Sub MyMove() Label1.Move Label1.Left - 50 If Label1.Left < 0 Then Label1.Left = Form1.Width End Sub A．3 Private Sub Form_Click() Text1 = Val(Text1) + 1 End Sub Private Sub Form_Load() Text1 = 0 End Sub A．5 《VB程序设计》课程综合复习资料 一、单项选择 1．若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（D ）属性。 A．BACKCOLOR B．BORDERSTYLE C．FORECOLOR D．BACKSTYLE 2．如果要在文本框中输入字符时，只显示某个字符，如星号（*），运行时，在文本框中输入的字符仍然显示出来，而不显示星号，原因可能是（B ） A．文本框的MULTILINE属性值为TRUE B．文本框的LOCKED属性值为TRUE C．文本框的MULTILINE属性值为FALSE D．文本框的LOCKED属性为FALSE 3．下列关于属性设置的叙述错误的是：（A） A．一个控件具有什么属性是VB预先设计好的，用户不能改变 B．一个控件具有什么属性是VB预先设计好的，用户可以改变 C．一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置 D．一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值 4．下列说法正确的是（C ） A．对象属性只能在“属性窗口”中设置 B．一个新的工程可以在“工程窗口”中建立 C．必须先建立一个工程，才能开始设计应用程序 D．只能在“代码窗口”中编写程序代码 5．下列关于窗体上控件的基本操作错误的是：（A ） A．下一次DEL键只能删除一个控件 B．按下一次DEL键可以同时删除多个控件 C．按住SHIFT键，然后单击每个要选择的控件，可以同时选中多个控件 D．按住ALT键，然后单击每个要选择的控件，可以同时选中多个控件 6．下列关于设置控件属性的叙述正确的是（C ） A．用户必须设置属性值 B．所有的属性值都可以由用户随意设定 C．属性值不必一一重新设置 D．不同控件的属性项都完全一样 7．如果将布尔常量值TRUE赋值给一个整型变量，则整型变量的值为（B ） A．0 B．-1 C．TRUE D．FALSE 8．下列关于控件画法的叙述错误的是（D ） A．单击一次工具箱中的控件图标，只能在窗体上画出一个相应的控件 B．按住CTRL键后单击一次工具箱中的控件图标，可以在窗体上画出多个相同类型的控件C．双击工具箱中的控件图标，所画控件的大小和位置是固定的 D．不合用工具箱中的控件工具，不可以在窗估上画出图形对象，但可以写入文字字符9．应用程序设计完成后，应将程序保存，保存的过程是（D ） A．只保存窗体文件即可 B．只保存工程文件即可 C．先保存工程文件，之后保存窗体文件 D．先保存窗体文件（或标准模块文件），之后还要保存工程文件 10．VB应用程序的运行模式是（C ） A．解释运行模式B．编译运行模式C．两者都有D．汇编模式 11．可视化编程的最大优点是（C） A．具有标准工具箱 VB程序设计大作业报告 班级：机械11102班学号：201103112 姓名：孙文斌日期：2013.05.13 一、设计题目：《抓交通肇事犯》 一辆卡车违反了交通规则，撞人后逃逸。现场有三人目击事件，但都没有记住车号，记住车号的一些特征。甲说：车号的前两位数字是相同的；乙说：车号的后两位数字 是相同的，但与前两位不同；丙是位数学家，他说：四位的车号正好是一个整数的平 方。现在请你根据以上线索帮助警方找出车号以便尽快破案 二、问题分析与算法设计： 按照题目的要求造出一个前两位数相同、后两位数相同且相互间又不同的整数，然后判断该整数是否是另一个整数的平方。 假设这个四位数的前两位数字都是i，后两位数字都是j，则这个可能的四位数k为：k = 1000 * i + 100 * i + 10 * j + j 其中，i和j都在0~9之间变化。现在还需使k满足是一个整数c的平方，由于k是一个四位数，所以，m值不可能小于31和大于100，因此，可从31开始试验到100，看是否满足k == c*c，若不满足，则c加1再试，直到找到满足这些限制条件的k为止结束测试。 三、界面与结果截图： 界面截图： 结果截图： 四、结果分析与总结： 通过结果截图我们知道最后得到的车牌号为7744，首先检验甲叙述的前两位数字相同都为7，再检验乙叙述的车牌号后两位相同都为4且不与前两位相同，最后检验丙叙述的该车牌号为88的平方，所以综合上述检验分析结果满足题意。 通过此次VB程序设计从理论到实践，我学到很多很多的的东西，让我对vb程序编写有了一个初步认识。从最初的拿到题目无从下手，接着网上查阅些材料以及反复看书本上的例题使我对这个程序的编写有了一个大致轮廓，接着在草稿纸上写下程序代码，然后到计算机上反复调试，最终才算完成。在这反复调试的过程中我明白了时间是检验真理的唯一标准。这对我今后的学习中都会起到非常重要的作用。最后衷心感谢李宁老师对我vb课程的指导，祝您身体健康，工作愉快。 附录程序源代码： Private Sub command1_click() Dim i%, j%, k%, c% For i = 0 To 9 For j = 0 To 9 If i <> j Then k = i * 1000 + i * 100 + j * 10 + j For c = 31 To 100 If (c * c) = k Then Picture1.Print k End If Next c End If Next j Next i End Sub 《VB语言程序设计》教材 林卓然编著 《VB程序设计》习题参考答案 第1章习题 一、单选题 1．D 2．B 3．C 4．A 5．C 6. A 7．A 8．B 9．C 10．(1)A (2)B 二、多选题 1．ACDE 2．BCDE 3．CD 4. CE 三、填空题 1．事件驱动 2．解释，编译 3．设计，运行，中断 4. 属性，方法，事件 5. Command2_Click 6. 中央，代码 7．MyForm.frm 8. (1)Cmd1_Click() (2)Print "VB语言程序设计" 编程及上机调试 1. 按要求设置窗体属性 2．在窗体上建立一个标签Label1。程序代码如下： Private Sub Form_Click() Label1.Caption = "你单击了窗体" End Sub Private Sub Form_DblClick() Label1.Caption = "你双击了窗体" End Sub 3．在窗体上建立两个文本框Text1(输入数)、Text2(输出数)和一个命令按钮Command1。两个文本框的Text属性均为空。 Private Sub Command1_Click() Dim x As Single x = Val(Text1.Text) Text2.Text = 15 * x End Sub 第2章习题 一、单选题 1．①D，②D 2．①A，②C 3．A 4．B 5．B 6．B 7．C 8．D 9．B 10．B 11．A 12．A 13．B 14．A 15．B 16．A 17．B 二、多选题 1．BD 2．CD 3．AC 4. AD 三、填空题 1．(1) Sin(50*3.14159/180) (2) (2+x*y)/(2–y*y) 15秋《VB程序设计》在线作业2 一,单选题 1. DataCombo控件的RowSource属性是表示（）。 A. 给DataComebo控件提供列表项的字段 B. 目的表的数据源 C. 给DataCombo控件提供列表项的数据源 D. 更新目的表的字段 正确答案：C 2. 执行语句：Open "Tel.dat" For Random As #1 Len=50后，对文件Tel.dat中的数据能够执行的操作是（）。 A. 只能写，不能读 B. 只能读，不能写 C. 既可以读，也可以写 D. 不能读，不能写 正确答案：C 3. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim array1(10,10) As Integer Dim I, j As Integer For I=1 To 3 For j=2 To 4 array1(I, j)=I+j Next j Next I Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（） 正确答案：A 4. 下列哪个属性设置文本框中文字的对齐方式（）。 A. SelLength B. Alignment C. Multiline D. ScrollBars 正确答案：B 5. 以下能判断是否到达文件尾的函数是（）。 A. BOF B. LOC C. LOF D. EOF 正确答案：D 6. 下面叙述错误的是（）。 A. 驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器 B. 目录列表框DirListBox显示当前驱动器分层目录树 C. 文件列表框FileListBox显示选定目录中的所有文件 D. 文件列表框FileName属性是设定允许显示文件名的文件类型 正确答案：D 《VB程序设计》综合复习资料 第一章 Visual Basic程序设计概述 一、填空题 1、Visual Basic是一种面向__________的可视化程序设计语言，采取了__________的编程机制。 2、在VB中工程文件的扩展名是____________，窗体文件的扩展名是____________，标准模块文件的扩展名是____________。 3、执行“工程”菜单下的__________命令，可选择并添加ActiveX控件。 4、Visual Basic 6.0用于开发__________环境下的应用程序。 二、选择题 1、下面不是VB工作模式的是（） A．设计模式B．运行模式C．汇编模式D．中断模式 2、可视化编程的最大优点是（） A．具有标准工具箱 B．一个工程文件由若干个窗体文件组成 C．不需要编写大量代码来描述图形对象 D．所见即所得 3、下列不能打开属性窗口的操作是（） A．执行“视图”菜单中的“属性窗口”命令 B．按F4键 C．按Ctrl+T D．单击工具栏上的“属性窗口”按钮 4、下列可以打开立即窗口的操作是（） A．Ctrl+D B．Ctrl+E C．Ctrl+F D．Ctrl+G 5、Visual Basic的编程机制是（） A．可视化 B．面向对象 C．面向图形 D．事件驱动 三、简答题 1、代码窗口主要包括哪几部分？ 2、在工程资源管理器窗口中，主要列出了哪三类文件？ 3、窗体布局窗口的主要用途是什么？ 4、VB的基本特点是什么？ 5、怎样理解可视化设计？ 6、怎要理解事件驱动编程？ 第二章简单的VB程序设计 一、填空题 1、设置是否可以用Tab键来选取命令按钮，应该用______________属性。 2、一个控件在窗体的位置由_______和________属性决定，其大小由__________和_________属性决定。 3、利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和____________属性为true，才能接受焦点。 4、设置控件背景颜色的属性名称是______________________。 5、所有控件都具有的共同属性是__________________属性。 6、一般情况下，控件有两个属性项的缺省值是相同的，这两个属性项是_______________。 7、VB中的每个对象（控件）都有一组特征，这组特征称为__________，我们通过修改它可以控制对象的外观和操作。 8、通常情况下，VB中一个工程主要包括如下四个文件：窗体文件、工程文件、类模块文件和_____________文件，后者的扩展名为.Bas，通常由Basic语言编写，是一个可共用的子程序。 9、VB有三种工作模式，分别是设计（Design）模式、_____________和中断（Break）模式。 二、选择题 1、以下能够触发文本框Change事件的操作是（） 在线考试一一正在答题 作业提交1 表达式2\2 *2/2*2 mod 2的结果是 (A) 0 (B) 25 (C) 5 (D) 1 2. 下列自宦义标识符中非法的是： (A) Me (B) My (C) third (D) fIRst 3. 表达式“A” Like "[A-Z]” 的结果为： (A) A (B) Z (C) TRUE (D) FALSE 4. 表达式x>= 20 and x<= 100,其中x=37 时，结果为 (A) 100 (B) 20 (C) TRUE (D) flase 5. 逻辑表达式1>0 and Not 2<7 or 2>6的值为 (A) 0 (B) FALSE (C) 3 (D) TRUE 6. 表达式x/=2,其中x = 24.运算后x的取值为： (A) 12 (B) 6 (C) 48 (D) 24 7. 下列可以作为VB变量的是： (A) a(x*y) (B) 学生信息 (C) lxyz (D) second 8. 表达式x*=2,其中x = 25,运算后x的取值为 (A) 50 (B) 625 (C) 25 (D) 27 9. 表达式100 mod 12的结果为： (A) 10 (B) 4 (C) 8 (D) 6 20. 下列自左义标识符中合法的是： (A) lMy (B) class (C) forth (D) @home 11. 表达式4?3的结果为： (A) 8 (B) 4 (C) 32 (D) 16 12. 表达式“张三” Like “张的结果为： (A) 张 (B) TRUE (C) FALSE (D) 张三 13. 后缀为?vbp的文件表示VB的 (A) 类模块文件 (B) 窗体文件 (C) 标准类模块文件 (D) 工程文件 14. 下列变量名合法的是 (A) a_2 (B) a-b (C) 2xy (D) float 《VB程序设计》作业（二） 客观题部分： 选择题（每题1分，共15题） 1. 当VB执行下面语句后，A的值为（A ）。 A=1IF A>0 THEN A=A+1IF A>1 THEN A=0 A）0 B）1 C）2 D）3 2. 当VB执行下面语句后，输出的结果是（B ）。 Private Sub Form_Click（） score = Int(Rnd * 10) + 30Select Case scoreCase Is < 10A$ = "F"Case 10 To 19A$ = "D" Case 20 To 29A$ = "C"Case 30 To 39A$ = "B"Case ElseA$ = "A"End SelectPrint A$End Sub A）AB）B C）C D）D 3. 执行下面的程序段后，x 的值为( C )。 x=2For i=1 To 10Step 3x=x+i\2Next i A) 2 B) 4 C) 7 D) 9 4. 假定有以下循环结构： Do Until 条件循环体Loop 则正确的描述是（ D ）。 A) 如果“条件”是一个为0的常数，则一次循环体也不执行 B) 如果“条件”是一个为0的常数，则至少执行一次循环体 C) 如果“条件”是一个不为0的常数，则至少执行一次循环体 D) 不论“条件”是否为“真”，至少要执行一次循环体 5. 假定有以下程序段： For i= 1 To 3For j= 5 To 1 Step -1Print i *jNextj , i 则语句“Print i *j”的执行次数是（ C ）。 A）20B）24 C）15 D）18 6. 以下程序段的输出结果为（ D ）。 x = 2y = 8Do Until y>8x = x * yy = y +1LoopPrint x A）2B）9 C）10 D）16 7. 用下面的语句所定义的数组的元素个数是（D ）。 Dim A（-3 To 5）As Integer A）6 B）7C）8D）9 8. 阅读下面的程序段： For i=1 To 2For j=1 To IFor k=j To 2x=x+1Next kNext jNext i 执行上面的三重循环后，x的值为( C )。 A) 3 B) 4 C) 5 D) 6 9.在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 3x=2For j =1 To 2x=4For k=1 To 3x=x+5Next kNext jNext i Print xEnd Sub 程序运行后，单击命令按钮，输出结果是( B )。 A) 11 B) 19 C) 57 D) 63 10. 在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，然后编写如下事件过程： Private Sub Command1_Click() 课后习题解答 第一、二章： 1、简述VB6.0的主要特点 答：方便、直观的可视化设计工具；面向对象程序设计方法；事件驱动的编程机制；易学易用的应用程序集成开发环境；结构化程序设计语言；完备的联机帮助功能；强大的多媒体、数据库和网络功能。2、当正常安装VB6.0后，误把Windows子目录删除。当重新安装Windows后，是否需要再次安装VB6.0？ 答：要重新安装的。因为安装VB6.0时，有些VB程序被系统自动安装在Windows目录下，所以一旦删除Windows子目录，就必须重新安装VB6.0。 3、Visual Basic 6.0分为学习版、专业版和企业版，如何知道所安装的是哪个版本？ 答：在VB6.0的启动界面上，能显示对应的版本。 4、叙述建立一个完整应用程序的过程 答：首先建立用户界面的控件对象（简称控件）；然后对控件属性进行设置；再对控件事件过程及编程； 保存应用程序；程序调试和运行。 5、Visual Basic 6.0有多种类型窗口，若要在设计时看到代码窗口，应怎样操作？ 答：选择“视图”—>“代码窗口”命令或单击“工程资源管理器”窗口中的“查看代码”按钮。 6、当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。试问该工程涉及多少个要保存的文件？ 若要保存该工程的所有文件，应先保存什么文件？再保存什么文件？若不这样做，系统会出现什么信息？ 答：涉及两个文件要保存。先保存窗体文件（.frm），再保存工程文件（.vbp）。若先保存工程文件，系统也会先弹出“文件另存为”对话框，要求先保存窗体文件。 7、保存文件时，若不改变目录名，则系统默认的目录是什么？ 答：系统默认的目录是VB98 8、安装Visual Basic 6.0后，帮助系统是否也已安装？ 答：没有。VB6.0的帮助系统在两光盘上，即MSDN Library，其中还包含了VC、VFP等其他语言的帮助系统。 9、如何使用Visual Basic 6.0的帮助系统？ 答：最方便的方法是选定要帮助的容，然后按F1功能键，这时系统打开MSDN Library查阅器，直接显示与选定容有关的帮助信息。 10、什么是类？什么是对象？什么是事件过程？ 答：类是同类对象集合的抽象，它规定了这些对象的公共属性和方法； 对象是类的一个实例，对象包含三个要素：属性、方法和事件。 当在对象上发生了事件后，应用程序就要处理这个事件，而处理的步骤就是事件过程。 11、属性和方法的区别是什么？ 答：属性是对象的特征，方法是对象的行为。前者有值，可以被赋值或引用；后者没有值，表示能够执行的操作。 12、当标签边框的大小由Caption属性的值进行扩展或缩小时，应对该控件的什么属性进行何种设置？ 答：将该控件的Autosize属性值设置为true。 13、在VB6.0中，命令按钮的显示形式可以有标准的和图形的两种选择，它们通过什么属性来设置？若选 择图形的，则通过什么属性来装入图形？若已在规定的属性里装入了某个图形文件，但该命令按钮还是不能显示该图形，而显示的是Caption属性设置的文字，应怎样修改？ 答：命令按钮的显示形式通过将Style属性值设置为Graphical来实现。通过Picture属性来装入图 客观题_0001 试卷总分：100 测试时间：240 单项选择题判断题 一、单项选择题（共20 道试题，共80 分。） 1. 用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是（）。 A. List B. Listindex C. Text D. Listcount 2. 在设计菜单时，如果要在菜单中加入一个菜单分隔条，则菜单分隔条的标题必须设置 为（）。 A. 加号（+） B. 减号（-） C. 星号（*） D. 感叹号（!） 3. 保存新建的工程时，默认的文件夹是（）。 A. My Document B. VB98 C. "\ " D. Windows 4. 要清除列表框的所有容，可用（）方法来实现。 A. RemoveTtem B. Cls C. Clear D. 以上均不可以 5. 用标准工具栏中的工具按钮不能执行的操作是（）。 A. 添加工程 B. 打印源程序 C. 运行程序 D. 打开工程 6. 改变驱动器列表框的Drive属性值，将激活（）事件。 A. Change B. Scoll C. KeyDown D. KeyUp 7. 下列语句语确的是（）。 A. a=1 b=2 c=3 B. a=l：b=2：c=3 C. a=1，b=2，c=3 D. a=1；b=2；c=3 8. 要在窗体Form1显示“myfrm”，使用的语句是（）。 A. Form. print "myfrm" B. Form.caption="myfrm" C. Form1.print "myfrm" D. Form1.caption="myfrm" 9. 图象框Image没有的属性是（）。 A. Picture B. Appearance C. AutoRedraw D. 以上属性都没有 10. 可获得字符的ASCII码的函数是（）。 A. Val B. Fix C. Asc D. Chr 11. 计时器没有的属性是（）。 A. Interval B. Enable C. Size D. Index 12. 以下选项中，不是Visual Basic标准控件的是（）。 A. 复选框 B. 定时器 C. 窗体 D. 命令按钮 13. 下列不能打开菜单编辑器的操作是（）。 A. 按Ctrl+E B. 单击工具栏中的“菜单编辑器”按钮 C. 执行“工具”菜单中的“菜单编辑器”命令 D. 按Shift + Alt + M 14. 使文本框获得焦点的方法是（）。 A. Setfocus B. Lostfocus C. Gotfocus D. Change 15. 以下语句Print Format $(32548.5,"000,000.00") 的输出结果是（）。 A. 32548.5 B. 32,548.5 C. 032,548.50 D. 32,548.50 16. 为了使目录路径列表Dir1的容符合驱动器列表框Drive1的选择，应当（）。 A. 在Dir1_Click事件中加入Dir1.Path=Drive1.Drive B. 在Drive1_Click事件中加入Dir1.Path=Drive1.Drive C. 在Dir1_Click事件中加入Drive1.Path=.Drive.Path D. 在Dir1_Click事件中加入Drive1.Path=.Dir1.Path 《VB程序设计》大作业 一、大作业的内容 本次大作业要求学生根据所学知识以及个人爱好，设计开发一个VB应用小程序。要能体现出： 1．《VB程序设计》各种语句的综合使用能力； 2．《VB程序设计》各种相关控件的使用能力； 3．根据具体的设计题目，设计清晰、美观界面的能力； 4．一定的综合设计能力。 二、大作业的要求 本次大作业应满足以下要求： 实用性：应用程序要有明确的应用主题，有一定的实用价值。 结构性：应用程序具有良好的程序结构。 可读性：应用程序具有较好的可读性。 全面性：应用程序应包含比较全面的功能。 友好性：合理使用VB提供的各种控件，设计友好、美观的使用界面。 三、大作业的步骤 1．根据个人兴趣、爱好，以及提交时间的要求，自己确定设计题目（可参考附件1）； 2．查找与设计题目相关的资料； 3．进行应用程序总体结构、使用功能的设计； 4．进行应用程序的界面设计和源程序代码的编写； 5．上机编辑、调试程序； 6．保存应用程序, 并生成可执行文件； 7．撰写设计报告。 四、设计报告的基本格式 设计报告的基本内容至少包括封面、正文、总结三部分。 (1）．封面(包括：题目、班级、姓名、指导教师、完成日期等信息) (2)．正文 1、课题的选材过程（设计思路）； 2、设计的将要达到的目标； 3、总体设计结构与功能； （1）总体设计结构介绍（绘制：结构流程图） （2）各功能模块运行界面的功能、算法和操作步骤； 4、设计结果分析；（运行结果展示、正确性分析） (3)．总结（感想、收获、启发、存在的问题） 五、课程大作业提交 （1）形式设计报告+ 源程序文件(含可执行文件) 其中：<1>设计报告的封面统一（附件2）； <2>源程序文件（含*.vbp；*.frm；*.exe）打包压缩成一个文件， 以学号+姓名（例如：12020741姓名）为文件名。 （2）时间2015年6月1日之前； （3）方法纸质报告及压缩文件交各班学委，按顺序排好后由学委统一上交； 《程序设计语言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 答案+我名字在线考试——正在答题 作业提交1 1. 表达式2\2 * 2/2 * 2 mod 2的结果是 (A) 0 (B) 25 (C) 5 (D) 1 2. 下列自定义标识符中非法的是： (A) Me (B) My (C) third (D) fIRst 3. 表达式“A”Like “[A-Z]”的结果为： (A) A (B) Z (C) TRUE (D) FALSE 4. 表达式x >= 20 and x<= 100，其中x=37时，结果为： (A) 100 (B) 20 (C) TRUE (D) flase 5. 逻辑表达式1>0 and Not 2<7 or 2>6的值为 (A) 0 (B) FALSE (C) 3 (D) TRUE 6. 表达式x /=2 ,其中x = 24，运算后x的取值为： (A) 12 (B) 6 (C) 48 (D) 24 7. 下列可以作为VB变量的是： (A) a(x*y) (B) 学生信息 (C) 1xyz (D) second 8. 表达式x *=2 ,其中x = 25，运算后x的取值为： (A) 50 (B) 625 (C) 25 (D) 27 9. 表达式100 mod 12 的结果为： (A) 10 (B) 4 (C) 8 (D) 6 10. 下列自定义标识符中合法的是： (A) 1My (B) class (C) forth (D) @home 11. 表达式4<< 3 的结果为： (A) 8 (B) 4 (C) 32 (D) 16 12. 表达式“张三”Like “张_*”的结果为： (A) 张 (B) TRUE (C) FALSE (D) 张三 13. 后缀为.vbp的文件表示VB的 (A) 类模块文件 (B) 窗体文件 (C) 标准类模块文件 (D) 工程文件 14. 下列变量名合法的是 中南大学现代远程教育课程（专科）考试复习题及答案 《VB程序设计与应用》 一、选择题：在每小题给出的四个选项中，只有一项是符合题目要求的，请把所选项前的字母填在 题后的括号内。 1. Visual Basic程序中分隔一行中各语句的字符是（）。[ ] A)‘ B): C)\ D)_ 2. 下列可作为Visual Basic的变量名的是（）。[ ] A: Filename B: A（A＋B）C: A%D D : Print 3. 要让菜单项无效，应将（）属性值设置为False。 [ ] A. Visible B. Enabled C. Moveable D. Checked 4. 以下过程是（）事件。 Prviate Sub Form_Load( ) …… End Sub [ ] A: 命令按钮的单击B: 命令按钮的装载 C; 窗体的装载D: 窗体的单击 5. Vb中描述文件扩展名的是（）属性。[ ] A: Drive B: Pattern C: FileName D: Path 6. 关于Visual Basic中事件的说法中，不正确的为（）。[ ] A)事件是由Visual Basic预先定义好的，能够被对象识别的动作 B)DblClick（双击）是Visual Basic中的一种事件 C)一个对象可以识别一个或多个事件 D)对于一个系统提供的对象可以识别哪些事件，需要程序员自己定义 7. 下列控件中可设置滚动条是（）。 [ ] A. 检查框（复选框） B. 框架 C. 文本框 D. 标签框 8. 在Visual Basic中建立一个空窗体，( )不会是其默认名。 [ ] A. Form1 B. Form2 C. Formx D. Form10 9. Const One&=1，则One为（）类型的常数。[ ] A)整型 B)字节型VB程序设计作业参考答案
VB程序设计课后习题答案(科学出版社)
VB程序设计网上作业2016
vb程序设计实验教程习题答案
VB程序设计教程(第3版)课后实验答案最新版2
VB程序设计-2017年6月在线考试答案
VB程序设计大作业报告
《VB程序设计》习题答案-林卓然编著
电子科技大学15秋《VB程序设计》在线作业2满分答案
visual_Basic程序的设计教程_课后习题答案及练习
电子科技大学网络教育VB程序设计在线作业答案
VB程序设计作业(二)答案
VB程序的设计教程课后答案
VB程序网上作业答案
VB程序设计(2015大作业)
程序设计语言VB_习题集(含答案)
电子科技大学网络教育《VB程序设计》在线作业答案
[整理]VB程序设计复习题及答案.
- VB程序设计 试题与答案 1
- 电子科大20春《VB程序设计》在线作业3参考答案
- VB程序网上作业答案
- VB程序设计-2017年6月在线考试答案
- vb程序设计网上作业教案资料
- 2016VB程序设计网上作业
- 电大vb 网上作业答案
- VB程序设计作业(二)答案
- VB程序网上作业标准答案
- VB程序网上作业答案
- 20秋《VB程序设计》在线作业2【电子科技大学答案】
- VB程序的设计_2017年6月在线作业答案
- vb程序网上作业答案(1)
- VB程序网上作业答案
- VB程序设计网上作业2016
- VB程序设计在线考试答案
- 电子科技19春《VB程序设计》在线作业3满分答案
- VB程序设计-2017年6月在线作业答案
- 《vb程序设计》期末复习题及答案
- 东师《VB程序设计》20春在线作业1答案0