For i=1 to_____
If I mod 2______then______ Next i Mult=sum
End function
若要计算并输出100之内所有奇数的和，则正确的调用语句是_____。
练习八
一、选择题
1、下列控件中，没有Caption属性的是（ ）
A、 框架 B、列表框 C、复选框 D、单选按钮 2、复选框Value属性值为1，表示（ ）
A、复选框未被选中 B、复选框被选中 C、复选框内有灰色的对号 D、复选框操作错误 3、用来设置粗体字的属性是（ ）
A、FontItalic B、FontName C、FontBold D、Fontsize
4、假定在图形框的Picture属性中装入了一个图形，为了清除该图形，应采用的正确方法是（ A、选择图形框，然后按Del键
B、执行语句Pictures1.Pictures=LoadPicture C、执行语句Pictures1.Pictures=“”
D、选择图形框，在属性窗口中选择Picture属性，然后按回车键 5、在下列关于通用对话框的叙述中，错误的是（ ） A、CommandDialog1.ShowFont显示字体对话框
B、在文件打开或另存为对话框中，用户选择的文件名及其路径可以经FileTitle属性返回 C、在文件打开或另存为对话框中，用户选择的文件名及其路径可以经FileName属性返回 D、通用对话框可以用来制作和显示帮助对话框
6、在用菜单编辑器设计菜单时，必须输入的项是（ ） A、快捷键 B、标题 C、索引 D、名称 7、下列关于菜单的说法，错误的是（ ）
A、每个菜单项都是一个控件，与其他控件一样也有自己的属性和事件 B、除了Click事件外，菜单项还能相应其他如DbClick等事件 C、菜单项的快捷键不能任意设置
D、在程序执行时，入过菜单项的Enabled属性为False，择菜单项变成灰色，不能被用户选择
8、设Form1是启动窗体，并且From1的Load事件过程中有Form2.Show语句，则程序启动后（ A、发生一个运行时错误 B、发生一个编译错误
C、所有的初始代码运行后Form1是活动窗体 D、所有的初始代码运行后Form2是活动窗体
9、设置复选框或单选按钮标题对齐方式的属性是（ ）
A、Align B、Alignment C、Sorted D、Value 10、为了使列表框的项目分为多列显示，需要设置的属性为（ ） A、Column B、Style C、List D、MultiSelect 11、删除列表框中指定的项目应使用的方法（ ）
A、Move B、Remove C、RemoveItem D、Clear 12、当拖动滚动条的滚动块时，将触发的滚动条事件是（ ） A、Move B、Chang C、Setfocus D、Scroll
13、用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是（ ） A、List B、ListIndex C、ListCount D、Text
14、为了使一个窗体从屏幕上消失但仍在内存中，所使用的方法或语句为（ ） A、Hide B、Show C、Load D、Unload 15、当一个工程中含有多个窗体时，其中的启动窗体是（ ）
A、启动VB时建立的窗体 B、第一个添加的窗体
C、最后一个添加的窗体 D、在“工程属性”对话框中指定的窗体二、填空题
1、窗体、图形框和图像框中的图形通过对象的＿＿＿＿属性设置。 2、计时器事件之间的间隔通过＿＿＿＿属性设置。
3、组合框有三种不同的类型，通过＿＿＿＿属性来设置。
4、在三种不同类型的组合框中只能选择而不能输入数据的组合框是＿＿＿＿。 5、在VB中可以建立＿＿＿＿菜单和＿＿＿＿菜单两种。
） ） 6、建立弹出式菜单所使用的方法是＿＿＿＿。
7、假设在窗体上有一个通用对话框，其名称为CommandDialog1，为了建立一个保存文件对话框，则需要把＿＿＿＿属性设置为＿＿＿＿，与其等价的方法是＿＿＿＿。 8、为了讲一个窗体装入内存，所使用的语句是＿＿＿；为了清除内存中指定的窗体，所使用的语句是＿＿。
练习九
一、选择题
1、坐标度量单位可通过（ ）来改变。
A、Drawstlye属性 B、DrawWidth属性 C、Scale方法 D、ScaleMode属性 2、以下的属性和方法中（ ）可重新定义坐标系。 A、Drawstlye属性 B、DrawWidth属性 C、Scale方法 D、ScaleMode属性 3、不能作为容器使用的对象为（ ）
A、窗体 B、框架 C、图形框 D、图像框 4、下列选项中，能绘制填充矩形的语句是（ ） A、Line（100，100）-（200，200），B B、Line（100，100）-（200，200），BF C、Line（100，100）-（200，200），，BF D、Line（100，100）-（200，200） 5、下列语句中错误的是（ ） A、Line（100，100）-（200，200），，B B、Line（100，100）-（200，200），RGB（255，0，0） C、Circle（100，100），RGB（255，0，0） D、Circle（100，100），-500RGB（255，0，0） 6、当使用Line方法画直线后，当前坐标在（ ） A、（0，0） B、直线起点 C、直线终点 D、容器中心 7、执行语句“Line（1200，1200）-step（1000，500），B”后，CurrentX=（ ） A、2200 B、1200 C、1000 D、1700 8、语句“Circle（1000，1000），500，8，-6，-3”将绘制（ ） A、圆 B、椭圆 C、圆弧 D、扇形 9、（ ）对象具有绘图方法。
A、Image B、Line C、PictureBox D、Frame 10、下列窗体的方法中，（ ） 画出实际内容。
A、Line B、Pset C、Circle D、Point
11、如果用长整形数&H00FF0000&来表示颜色，此颜色为（ ） A、黄色 B、红色 C、绿色 D、蓝色
12、当窗体的AutoRedraw属性采用默认值时，若在窗体装入时使用绘图方法绘制图形，则应将程序代码写在（ ）中。
A、Paint事件 B、Load事件 C、Initialize事件 D、Click事件 13、Cls可清楚窗体或图形框中（ ）的内容。
A、Pictures属性设置的背景图像 B、在设计时放置的控件 C、程序运行时产生的图形和文字 D、以上A~C全部 二、填空题
1、在VB6.0中，与图形有关的标准控件有＿＿＿＿种，分别是＿＿＿＿。
2、为了使图像框中的图形与图像框大小适应，应将Stretch属性设置＿＿＿＿。 3、在运行期间，可以用＿＿＿＿函数把图形文件装入窗体、图形框或图像框中。 4、容器的实际 可用高度和宽度由＿＿＿＿和＿＿＿＿属性确定。 5、Circle方法正向采用＿＿＿＿时针方向。
6、设Pictures.ScaleLeft=-200，Pictures.ScaleTop=250，Pictures.ScaleWidth=500，Pictures.ScaleHeight=-400，则Pictures1右下角坐标为＿＿＿＿。
7、窗体form1的左下角坐标为（-200，250），窗体form1的右下角坐标为（300，-150），X轴的正向＿＿＿＿，Y轴的正向＿＿＿＿。
8、当Scale方法不带任何参数，则采用＿＿＿＿坐标系。
9、DrawStyle属性用于设置所画线的形状，此属性受到＿＿＿＿属性的限制。
练习十
一、选择题
1、使用驱动器列表框的（ ）属性可以返回或设置磁盘驱动器的名称。 A、ChDrive B、Drive C、List D、ListIndex 2、下面叙述中不正确的是（ ）
A、驱动器列表框是一种能显示系统中所有有效磁盘驱动器的列表框
B、驱动器列表框的Drive属性只能在运行时被设置
C、从驱动器列表框中选择驱动器能自动的改变系统当前的工作驱动器 D、要改变系统当前的工作驱动器需要使用ChDrive语句 3、改变驱动器列表框的Driver属性值（ ）事件
A、Change B、Scroll C、KeyDown D、KeyUp
4、使用目录列表框的（ ）属性可以返回或设置当前工作怒路的完整路径（包括驱动器盘符）。 A、Drive B、Path C、Dir D、ListIndex
5、文件列表框中用于设置或返回所选文件的路径和文件名的属性是（ ） A、File B、FilePath C、Path D、FileName 6、App.Path在运行时返回值是（ ）
A、Windows所在目录 B、主盘的根目录 C、应用程序的目录 D、VB所在目录 7、在VB中文件访问的类型有（ ）
A、顺序、随机、二进制 B、顺序、随机、字符 C、顺序、十六进制、随机 D、顺序、记录、字符 8、关于文件访问，下面的说法正确的是（ ）
A、使用顺序型来打开一个文件以后，能够使用Get函数输入
B、使用Append方式来打开一个文件时，如果文件不存在，将创建一个新的文件 C、使用Print#能够确保每一个数据域的完整性 D、Write#可以再二进制方式下工作 9、下面叙述中不正确是（ ） A、顺序文件结构简单
B、能同时对顺序文件进行读写操作
C、对顺序文件中的数据的操作只能按一定的顺序执行 D、顺序文件的数据时以字符（ASII码）的形式存储的
10、要追加顺序文本方式打开C盘根目录下的MyText.Txt文件，正确的代码是（ ） A、Open “Ｃ：Mytext.Txt” For Random As #1 B、Open “Ｃ：Mytext.Txt” For Input As #1 C、Open “Ｃ：Mytext.Txt” For Append As #1 D、Open “Ｃ：Mytext.Txt” For Output As #1 11、在随机文件中（ ）
A、记录的内容是随机产生的 B、记录的长度是任意的
C、记录号是通过随机数产生的 D、可以通过记录号随机读取记录 12、为了把一个记录型变量的内容写入文件中指定的位置，所使用的语句格式为（ ） A、Get文件号，记录号，变量号 B、Get文件号，变量号，记录号 C、Put文件号，变量号，记录号 D、Get文件号，记录号，变量号 13、记录类型定义应出现在（ ）
A、窗体模块 B、标准模块
C、窗体模块、标准模块均不可以 D、窗体模块、标准模块均可以 14、下面叙述中不正确的是（ ）
A、在窗体模块中定义自定义类型时必须使用Private关键字
B、自定义类型中的元素类型可以使系统提供的基本数据类型或已声明的自定义类型 C、自定义类型必须在窗体模块或标准模块的通用声明段进行使用 D、自定义类型只能在窗体模块的通用声明段进行声明
15、用Close语句来关闭一个不再使用的文件，当该语句不适用任何参数时，其功能是（ A、只能关闭一个打开的文件 B、只能关闭两个打开的文件 C、有语法错误，一个文件也无法关闭 D、可以关闭任何已打开的文件 16、当函数E0f（）的返回值为-1时，表示文件的指针指向（ ） A、开头 B、第一个记录 C、结尾 D、最后一个记录 17、设文件“C：\\test.txt”文件的内容是： 1 2 4 5 10 25 50 100
给出下面的程序：
）Private sub Command1_click() Dim InputData
Open “C:\\test.txt” For Input As #1 Do
While Not EOF (1) Line Input #1,InputData Loop Close #1
MgsBox InputData End Sub
程序最后弹出的消息对话框的内容是（ ）
A、什么也没有 B、1 C、100 D、文件的全部内容 二、填空题
1、在VB中，用于返回当前目录的函数是＿＿＿＿；用于设置当前目录的语句是＿＿＿＿；用于建立目录的语句是＿＿＿＿；用于删除目录的语句是＿＿＿＿；用于改变当前驱动器的语句是＿＿＿＿；用于文件复制的语句是＿＿＿＿；用于删除文件的语句是＿＿＿＿；用于设置文件属性的语句是＿＿＿＿；用于文件更名的语句是＿＿＿＿；用于获取文件名或目录名的语句是＿＿＿＿。 2、在VB中，用于文件系统控件管理的三个控件是＿＿＿＿。
3、如果要获得用户在驱动器列表框中所选择的驱动器，则应访问对象的＿＿＿＿属性；如果要获得用户在目录列表框中所选择的目录路径，则应访问对象的＿＿＿＿属性；如果要获得的是当前目录的下级目录的个数，则应访问对象的＿＿＿＿属性；如果要在文件列表框中显示文件的类型，则应访问对象的＿＿＿＿属性；如果要获得文件列表框中选择的文件名，则应访问对象的＿＿＿＿属性。
4、在VB中，顺序文件的读写操作通过＿＿＿＿、＿＿＿＿语句或＿＿＿＿函数来实现，随机文件的读写操作分别通过＿＿＿＿和＿＿＿＿语句实现。
5、为了获得当前未被使用的文件号，可利用VB提供的＿＿＿＿函数来实现。 6、有以下程序，它的输出将是＿＿＿＿。 Private Sub Form_Click() Dim X(20) As Integer
Open “test.dat” For Output As #1 For i=2 To 6 For j=1 To i Print #1,j Next j Next i Close #1
Open “test.dat” For Input As #2 m=0
Do Until EOF(2) m=m+1
Input #2, x(m) Loop
For i=2 To m/3 Print x(i) Next i Close End Sub
7、有以下程序，它的输出将是＿＿＿＿。 Private Sub Form_Click() Dim mm(6) As Integer Dim k%
Open “C:\\b1.dat” For Output As #1 For i=1 To 6 j=i*i*i Print #1,j Next i Close #1
Open “C:\\b1.dat” For Input As #2 K=0
Do
While Not EOF（2） k=k+1
Input #2,mm(k) Loop Close #2
For i=k To k/2 step-1 Form1.print mm(i) Next i End Sub
练习十一
一、选择题
1、DB、DBMS和DBS三者之间的关系是（ ） A、DB包括DBMS和DBS B、DBS包括DBMS和DB C、DBMS包括DB和DBS D不能相互包括 2、视图是一个“虚表”，视图的构造基于（ ）
A、基本表 B、视图 C、基本表或视图 D、数据字典 3、用二维表结构表示实体以及实体间联系的数据模型称为（ ） A、网状模型 B、层次模型 C、关系模型 D、面向对象模型 4、SQL语句中Select*Form student中的“*”表示（ ） A、所有记录 B、所有字段 C、所有表 D、都有数据库 5、SQL语言中，Select语句的执行结果是（ ）
A、属性 B、表 C、记录 D、数据库
6、要在GZ表中，选出年龄在20 至25岁的记录，则实现的SQL语句为（ ） A、SELECT FROM GZ WHERE 年龄 BETWEEN 20，25 Ｂ、SELECT FROM GZ WHERE 年龄 BETWEEN 20 AND 25 C、SELECT * FROM GZ WHERE 年龄 BETWEEN 20 OR 25 D、SELECT * FROM GZ WHERE 年龄 BETWEEN 20 AND 25
7、要利用Data控件返回数据库中的记录集，则需要设置（ ）属性。 A、Connect B、DatabaseName C、RecordSource D、RecordType
8、要在文本框中显示数据控件Data1连接的数据库的表中的字段，应将其（ ）属性设置为“Data1”。 A、DataField B、RecordSource C、Connect D、DataSource
9、当Data控件RecordSet对象的EOF属性为True时，表示记录指针出于RecordSet对象的（ ） A、最后一条记录之后 B、最后一条记录 C、第一条记录之前 D、第一条记录 10、数据绑定控件常用的两个属性分别是（ ）
A、DataBaseName和DataField B、DataSource和DataField C、DataBaseName和RecordSource D、DataSource和DataFormat
11、Data控件中使用SQL的Select语句进行查询时，需要把Select语句字符串赋给Data控件的（ ）属性。
A、RecordSetType B、DataSource C、RecordSource D、DataField 12、ADO控件的RecordSource属性表示（ ）
A、与ADO连接的数据库 B、与数据库的连接方式 C、数据库类型 D、ADO控件数据的来源 13、下列控件中（ ）是ActiveX控件
A、DbcomboBox B、Textbox C、ComboBox D、CheckBox 14、DataGrid控件用来和（ ）数据控件绑定使用
A、Data控件 B、ADObe控件 C、DAO控件 D、Access
15、通过设置ADO控件的（ ）属性可以建立该控件到数据源的连接。
A、RecordSource B、RecordSet C、ConnecttionString D、DataBase 二、填空题
1、数据库（Data Base， DB），是指存放数据的仓库，它具有＿＿＿＿、＿＿＿＿、＿＿＿＿特点。 2、数据库由若干＿＿＿＿组成，表是由若干＿＿＿＿和＿＿＿＿构成。
3、查询“学生”表中学生姓名为“王宏”的学生记录，对应的SQL语句是＿＿＿＿。 4、记录集是＿＿＿＿属性返回当前指针值。
5、利用数据绑定控件显示ADO控件所连接的记录集，则应该设置数据绑定控件的＿＿＿＿属性。 6、Data控件的＿＿＿＿属性用来设置所连接的数据库的名称及位置。
7、要使数据绑定控件能够显示数据库记录集中的数据，必须使用＿＿＿＿属性设置数据源，使用＿＿＿＿属性设置要连接的数据源字段的名称。
8、在数据库中插入记录使用SQL中的＿＿＿＿命令。
9、使用Select语句从工资表中查询所有女职工的姓名和实发工资，正确的写法是＿＿＿＿。 10、ADO控件的＿＿＿＿属性用于设置与数据库的连接。