VB程序设计阶段性作业41.docx

中国地质大学（武汉）远程与继续教育学院

中国地质大学(武汉)远程与继续教育学院

VB程序设计课程作业4（共4 次作业）

学习层次：专升本 涉及章节：第10章——第12章

一、判断题

在窗体上绘制CommonDialog控件时，控件的大小、位置可由用户自己加以设定。

当一个菜单项不可见时，其后的菜单项就会往上填充留下来的空位。

用Cls方法能清除窗体或图片框中用Picture属性设置的图形。

影像框和图片框一样，也可以作为其他控件的容器。

BorderWidth属性表示指定直线和形状边界线的线条宽度，该属性值不能设置为0。

目录列表框的Path属性，只能用程序代码设置，不能通过属性窗口设置。

若某文件已存在，用OUTPUT方式打开该文件，等同于用APPEND方式打开该文件。

可以用AddItem方法向目录列表框中加入新表项。

文件操作语句Name不仅可以修改文件名称，而且可以移动文件的位置。

文件以INPUT模式打开后可以往文件中写入数据。

用OUTPUT模式打开文件，如果指定文件和路径不存在，则会自动创建指定文件及路径。

二、选择题

1．用户可以通过设置菜单项的 属性值为False来使该菜单项失效。A、Hide B、Visible C、Enabled D、Checked2．菜单编辑器中，同层次的 设置为相同，才可以设置索引值。

A、Caption B、Name C、Index D、ShortCut3．将图片框的 属性设置成True时，可使图片框根据图片调整大小。

A、Picture B、AutoSize C、Stretch D、AutoRedraw

4． 属性可以用来设置所绘线条宽度。

A、DrawStyle B、BorderStyle C、DrawWidth D、FillColor5．语句“Circle(1000,1000),800,,,,2”绘制的是 。

A、弧 B、椭圆 C、扇形 D、同心圆6．BorderStyle属性是用来表示线条的 。

A、长度 B、宽度 C、线形 D、颜色7．下列 方法或函数可以调用外部的可执行文件。

A、Show B、Shell C、Input D、Open8．执行语句“Write#1,234;-34.56,hello;Date”后，相应文件内被写入 。A、234,-34.56,hello,2001-08-03 B、234,-34.56,hello,2001-08-03C、234,-34.56,hello,#2001-08-03# D、234 -34.56 hello2001-08-03

下面 选项能表示目录列表框控件dir1的当前目录。A、dir1.list(list1.listindex) B、dir1.list(-1)

C、dir1.list(list1.listcount) D、dir1.list(0)

方式打开的文件只能读不能写。

A、append B、random C、output D、input

语句“openc:\dat.txtforoutput”用于打开一个顺序文件，该语句的一个重要错误是没有 。

A、指定打开方式 B、指定文件号 C、指定文件名 D、指定打开类型

三、填空题

如果工具箱中还没有CommonDialog控件，则应从 菜单中选定 ，并将控件添加到工具箱中。

在设计菜单时，可在VisualBasic主窗口的菜单栏中选择 ，单击后从它的下拉菜单中选择“菜单编辑器”菜单项。

在图片框中加一幅图片（从磁盘装入）可用 函数来实现。

若控件Picture1中要显示C:盘Windows目录下的Cloud.bmp图片，则它的方法是 。

画椭圆的方法中，半径以后的参数依次是 、 、 、 。

文件的当前读写位置是否到达文件末尾，应用 函数。

读文件的 语句从文件的当前位置起至换行符前的所有字符读入到字符串变量。

四、程序阅读题

程序1.写出程序运行时单击窗体后的结果。

PrivateSubForm_Click()DimiAsInteger

Fori=1To1000CallCircledemo

NextiEndSub

SubCircledemo()

DimRadiusAsSingle,XPosAsSingle,YPosAsSingleR=255*Rnd:G=255*Rnd:B=255*Rnd

XPos=ScaleWidth*Rnd:YPos=ScaleHeight*RndRadius=((YPos*