VB（图像处理用）授课内容

图像处理暨Visual Basic语言授课内容

为小于或等于32767(字节)的一个数。对于用随机访问方式打开的文件，该值就是记录长度。对于顺序文件，该值就是缓冲字符数。

如果指定的文件不存在，那么，在用Append、Binary、Output、或Random方式打开文件时，可以建立这一文件。

重要：在Binary、Input和Random方式下可以用不同的文件号打开同一文件，而不必先将该文件关闭。在Append和Output方式下，如果要用不同的文件号打开同一文件，则必须在打开文件之前先关闭该文件。

三、文件的关闭，格式为： Close [[#]] [, [#]] . . .

其中：为任何有效的文件号。若省略参数，则将关闭Open语句打开的所有活动文件。在执行Close语句时，文件与其文件号之间的关联将终结。

第三节 顺序文件

一、顺序文件的写操作：

(一)Print #语句，格式为：

Print #, [] 其中：为任何有效的文件号。

为要打印的表达式或是表达式列表。 参数的设置如下：

[{Spc(n) | Tab[(n)]}] [] []

Spc(n)用来在输出数据中插入空白字符，而n指的是要插入的空白字符数。

Tab(n)用来将插入点定位在某一绝对列号上，这里，n是列号。使用无参数的Tab将插入点定位在下一个打印区的起始位置。

为要打印的数值表达式或字符串表达式。

指定下一个字符的插入点。使用分号将插入点定位在上一个显示字符之后。用Tab(n)将插入点定位在某一绝对的列号上，用无参数的Tab将插入点定位在下一个打印区的起始处。如果省略，则在下一行打印下一个字符。

注意：如果今后想用Input #语句读出文件的数据，就要用 Write #语句而不用Print #语句将数据写入文件。因为在使用Write #时，将数据域分界就可确保每个数据域的完整性，因此可用Input #再将数据读出来。

(二)Write #语句，格式为： Write #, [] 其中：为任何有效的文件号。

为要写入文件的数值表达式或字符串表达式，用一个或多个逗号将这些表达式分界。

二、顺序文件的读操作：

(一)Input #语句，格式为： Input #, 其中：为任何有效的文件号。

是用逗号分界的变量列表，将文件中读出的值分配给这些变量；这些变量不可能是一个数组或对象变量。但是，可以使用变量描述数组元素或用户定义类型的元素。

(二)Line Input #语句，格式为： Line Input #, 其中：为任何有效的文件号。 为有效的Variant或String变量名。

注：Line Input #语句从已打开的顺序文件中读出一行并将它分配给String变量。该语句一次只从文件中读出一个字符，直到遇到回车符(Chr(13))或回车–换行符(Chr(13)+Chr(10))为止。回车–换行符将被跳过，而不会被附加到字符串上。

(三)Input$函数，格式为： Input[$](, [#])

第 17 页

图像处理暨Visual Basic语言授课内容

其中：为任何有效的数值表达式，指定要返回的字符个数。 为任何有效的文件号。

注：通常用Print #或Put将Input函数读出的数据写入文件。Input函数只用于以Input或Binary方式打开的文件。

与Input #语句不同，Input函数返回它所读出的所有字符，包括逗号、回车符、空白列、换行符、引号和前导空格等。

第四节 随机文件

略。

第五节 二进制文件的打开与读写操作(重点！)

一、二进制文件的打开，格式为：

Open For Binary As [#]

二、二进制文件的读写操作，格式为： Get|Put [#], [], 其中：为任何有效的文件号。

为字节数，以表示在此处开始读出数据。 为一个有效的变量名，将读出的数据放入其中。

第六节 文件系统控件

一、驱动器列表框、目录列表框和文件列表框：DriveListBox、DirListBox、FileListBox。 二、通用对话框：CommonDialog(在部件Microsoft Common Dialog Control 6.0中)。可用方法： 对话框类型 打开文件 保存文件 选择颜色 选择字体 打印 调用Help文件 方法 ShowOpen ShowSave ShowColor ShowFont ShowPrinter ShowHelp 第七章作业 一、创建一个简单的记事本程序。在窗体上创建菜单栏，加入一“文件”菜单项，该菜单项包括4个菜单命令(“新建”、“打开”、“保存”、“退出”)，再向窗体中添加一个通用对话框和一个文本框，单击“新建”菜单命令时，清空文本框，由用户输入文本内容，单击“保存”菜单命令时，可弹出“保存文件”对话框，由用户指定文件的路径和文件名。当单击“打开”菜单命令时，可弹出“打开文件”对话框，由用户从中选择所需要的文件，并把打开的文本的内容写在文本框中显示，由用户进行修改。

二、今有三个图像，文件名分别为100.BMP、1010.BMP和A.BMP，请任选其中的一个图像，完成以下程序：

1.读入并显示该文件的类型标识符、文件长度、位图数据的偏移量以及位图的宽度和高度； 2.读入该文件的位图数据到数组中，并在适当的控件中用PSET方法显示出来。 3.把学号姓名等信息显示在表单的标题栏中。

4.要求源程序存放在\\<学号姓名>\\的文件夹下，项目文件和表单文件名(扩展名除外)均为学号。

三、

第八章 常用标准控件(Control Object)

第一节 窗体(Form)

第 18 页

图像处理暨Visual Basic语言授课内容

(一)窗体的属性：Appearance(外观)、AutoRedraw(自动重画)、BackColor(背景颜色)、

50515253

BorderStyle(边框类型)、Caption(标题)、ControlBox(控制框)、Enabled(可用性)、Font(字形属性

54555657

设置)、ForeColor(前景颜色)、Height,Width(高,宽)、Icon(图标)、MaxButton,MinButton(最大,最

5859606162

小化按钮)、Name(名称)、Picture(图形)、Top,Left(顶边,左边位置)、Visible(可见性)、

63

WindowState(窗口状态)，

646566

(二)窗体事件。常见的窗体事件：Click(单击)、DblClick(双击)、Load(装入)、Unload(卸

67686970

载)、Activate, Deactivate (活动、非活动)、Paint(绘画)、Resize(改变大小)。

717273

(三)常见的窗体的方法：Show方法、Hide方法、Print方法。

例(二级)：下面是窗体Form1的Click事件过程，实现运行时每次单击窗体时，窗体均向右移动100缇。 Private Sub ⑴74

⑵75 intleft As Integer intleft=intleft+100

Form1. ⑶76 =intleft End Sub

⑴A.Form1_Click B.Form_Click C.Command_Click D.Command1_Click ⑵A.Dim B.Static C.Private D.Public ⑶A.Caption B.Top C.Width D.Left 4748

47

48

49

该属性用来设置窗口的类型，有两种取值：一种是3D(三维)类型，另一种是Flat(平面)类型。 该属性控制屏幕图像的重建，主要用于多窗体程序设计中。取值为Boolean值。 49

选择该属性后，单击后面的下拉式箭头，出现两个选项卡，其中一个是“调色板”颜色，另一个是“系统”颜色，都用来设置窗体的背景颜色。 50

该属性用于设置窗体的边界类型，边界类型共有6种：0-None窗体无边界；1-Fixed Single固定的单边界，无控制按钮；2-Sizable可调尺寸边界；3-Fixed Dialog固定对话框；4-Fixed ToolWindow固定工具窗口；5-Sizable ToolWindow可变大小工具窗口。 51

该属性用来设置标题栏中显示的文本，可以通过属性框设置，还可以通过代码设置。 52

该属性用来设置窗体标题栏上的图标和按钮的有无。控制框有两种取值：True或False，默认为True，如果为False则窗体标题栏上只剩下标题，其他两项消失。 53

该属性用于设置窗体的状态，默认值为True，窗体处于活动状态；如果取值为False，运行窗体后虽然窗体上有控制按钮，但都不起作用，窗体处于失效状态。 54

该属性用来设置输出字符的各种特性，包括字体名称、大小、效果等。可通过属性窗口设置，也可通过程序代码设置。 55

该属性用于设置窗体的前景色。 56

用于设置窗体的高度和宽度。 57

该属性用于改变窗体标题栏左侧的控制图标，当窗体最小化时，窗体以该图标的形式存在。 58

用来显示窗体右上角的最大、最小化按钮。 59

该属性用来定义对象的名称。用Name属性定义的名称是在程序代码中使用的对象名，与对象的标题(Caption)不是一回事。在运行时，对象的名称不能改变。 60

该属性用于在窗体上加载图形，窗体的背景就会显示为该图形。 61

用于设置窗体左上角的属性。 62

该属性用于设置窗体的可见性，该属性有两种取值：True、False，默认值为True。如果将属性值设置为False，运行程序后窗体是不可见的。 63

该属性用于设置窗体的状态，有3种取值：0-Normal窗体处于正常状态；1-Minimized窗体处于最小化状态；2-Maximized窗体处于最大化状态，将充满整个屏幕。 64

窗体的单击事件。窗体运行后单击窗体时触发的动作。 65

窗体的双击事件。窗体运行后双击窗体时触发的动作。 66

窗体的载入事件。自动触发，向窗体中装载控件等。 67

窗体的卸载事件。对应Load事件，卸载窗体时触发的事件。 68

当窗体变为活动窗口时触发Activate事件，而在另一个窗体变为活动窗口前触发Deactivate事件。 69

窗体的绘画事件。移动窗体就会触发Paint事件。 70

当一个窗体的大小发生改变时，该事件被触发。 71

该方法用来显示一个窗体，其格式为：<窗体名称>.Show。如果省略窗体名称，将显示当前窗体。 72

该方法使窗体隐藏，不在屏幕上显示。其格式为：<窗体名称>.Hide。 73

该方法用来输出数据、文本。其格式为：<窗体名称>.Print [表达式1；表达式2；??；表达式n]。 74

B 75

B 76

D

第 19 页

图像处理暨Visual Basic语言授课内容

第二节 按钮类控件：命令按钮(Command Button)

(一)命令按钮的属性：Caption、Enabled、Font、Height、Left、Name、Top、Visible、Width

77787980

等属性同前。Cancel(取消)、Default(默认)、Style(样式)、Picture(图形)、DownPicture(按下的

8182

图形)、DisabledPicture(禁止使用的图形)、

(二)命令按钮的事件：Click(单击)。注意：命令按钮不支持DblClick(双击)事件。

83

例(二级)：任何控件都具有( )属性。 A.Text B.Caption C.Name D.ForeColor

84

例(二级)：决定控件上文字的字体、字形、大小、效果的属性是( )。 A.Text B.Caption C.Name D.Font

85

例(二级)：为了防止用户随意将光标置于控件上，应( )。 A.将控件的TabIndex属性设置为0 B.将控件的TabStop属性设置为True C. 将控件的TabStop属性设置为False D. 将控件的Enabled属性设置为False

86

例(二级)：要把一个命令按钮设置成无效，应设置其哪一属性值( )？ A.Visible B.Enabled C.Default D. Cancel 例(二级)：为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，

87

这个属性是( )。 A.Value B.Cancel C.Enabled D.Default

第三节 文本类控件

一、文本框(TextBox)

77

当一个命令按钮的Cancel属性被设置为True时，按Esc键与单击该命令按钮的作用相同。一个窗体中，只允许有一个命令按钮的Cancel属性被设置为True。 78

当一个命令按钮的Default属性被设置为True时，按回车键与单击该命令按钮的作用相同。一个窗体中，只允许有一个命令按钮的Default属性被设置为True。 79

该属性在运行期间是只读的。可取两种值：①0(或vbButtonStandard)，标准样式。只显示文本(Caption属性)，没有相关的图形。此为默认设置。 ②1(或vbButtonGraphical)，图形格式。在命令按钮中不仅显示文本(Caption)属性，而且可以显示图形(Picture属性)。 80

用该属性可以给命令按钮指定一个图形。为使用此属性，必须把Style属性设置为1，否则无效。 81

该属性用来设置当控件被单击并处于“按下”状态时，在控件中显示的图形。为使用此属性，必须把Style属性设置为1，否则将被忽略。 82

该属性用来设置对一个图形的引用。当命令按钮禁止使用(即Enabled属性被设置为False)时，在按钮中显示该图形。必须把Style属性设置为1才能生效。 83

C 84

D 85

D 86

B 87

D

第 20 页