vb学习笔记

参考书籍：Visual Basic程序设计项目教程/郭晓平，朱鸣华著.—北京：机械工业出版社，2014.2
测试环境：Visual Studio 2010 专业版

Visual Basic 集成开发环境

IDE 各部分介绍

窗口名	主要功能
主窗口	其余各种窗口的容器
设计窗口	提供代码编辑、可视化编程的主要工做空间
工具箱窗口	添加各种控件
属性窗口	修改各种控件属性
解决方案资源管理器	管理解决方案文件(.sln)、项目文件(.vbproj)和模块文件(.vb)

项目的建立与运行

Windows 窗体应用程序的建立

1. 执行“文件/新建/项目/Windows窗体应用程序”，输入“项目名”，执行“肯定”
2. 在“解决方案资源管理器中”右击项目名，执行“添加/添加Windows窗体”，输入“名称”，执行“添加”
3. 编辑完成按“Ctrl+F5”运行

控制台应用程序的建立

1. 执行“文件/新建/项目/控制台应用程序”，输入“项目名”，执行“肯定”
2. 编辑完成按“Ctrl+F5”运行

窗体和基本控件

窗体

设置启动窗体

在“解决方案资源管理器”中右击项目名，执行“属性”，在弹出的对话框中，肯定启动窗体

窗体经常使用成员

属性：Name、text、BackColor、ForeColor、Font、Location(x,y)、Icon、MinButton、MaxButton、ControlBox、FormBorderStyle、WindowsState、BackGroundImage、StartPosition
方法：Show()、Close()
时间：Load、Click

窗体的设计技巧

• 以组为单位对控件设置属性值
• 用“格式”菜单编辑控件组
• 编辑控件的Tab顺序

基本控件

控件的属性

控件的基本属性：
Name、Text、Location(x,y)、Size(Width,Height)、Enable、Visible、Fone、BackColor、Cursor

控件的方法

控件名称.方法名称

控件的事件

事件的语法格式

Private Sub 控件名_事件名(事件参数)
    事件响应的代码
End Sub

用Handles 语句共享事件处理程序

声明时关联 Handles

Private Sub 过程名(事件参数) Handles 控件名1.事件名1,控件名2.事件名2

其中，“过程名”默认为“控件名1_事件名1”格式

动态关联 AddHandler

AddHandler 事件，AddressOf 处理程序

解除关联 RemoveHandler

RemoveHandler 事件，AddressOf 处理程序

经常使用控件的主要成员

控件名称	主要成员
Label	AutoSize、BackColor、BordersSyle、Image、TextAlign
Button	AutoSize、FlatStyle、Image、ImageAlign、TextAlign、TextImageRelation
PoctureBox	Image、BorderStyle、SizeMode、Hide
TextBox	CharaterCasing、MultiLine、PasswordChar、ScrollBars、AppendText()、KeyPress()、TextChanged()
GroupBox	Text
Panel	AutoScroll
ToolTip	Enabled
Timer	Enabled、InterVal、Tick()

Visual Basic 语法基础

编码规则

1. VB中代码不区分大小写
2. 单个语句用“_”拆分为多行，多个语句用“：”合并在一行
3. 注释以单引号“’”打头

标准数据类型

标准数据类型

数据类型	关键字	类型符	存储长度/Byte
整型	Integer	%	4
单精度型	Single	！	4
字符串型	String	$
布尔型	Boolean		2
日期型	Date		8
对象	Object		4

标准类型间的转换

1. 扩展型转换
   向存储长度大于等于原始数据长度的数据类型转换，通常不致使数据失真
2. 紧缩型转换
   向存储长度小于原始数据长度的数据类型转换，一般致使数据失真

3. 显式转换
   经过类型转换函数执行的转换

   经常使用类型转换函数：
   CBool、CDate、CInt、CObj、CSng、CStr、CType

4. 隐式转换
   系统自动执行的转换，在VB中将隐式转换限制在扩辗转换，经过“工具/选项/项目和解决方案/VB默认值/Option Strict”更改

常量与变量

常量

常量的声明

[Public|Private] Const 常量名 [As 数据类型] = 表达式

系统预约义常量

预约义常量名	说明
vbCrlf	回车/换行组合符
vbCr	回车符
vbLf	换行符
vbNewLine	换行符
vbTab	Tab字符
vbBack	退格字符

变量

变量的声明

Dim 变量名 [As 类型]

Dim 变量名类型符

Visual Basic 2010 支持变量不声明就使用，将“工具/选项/项目和解决方案/VB默认值/Option Explicit”设置为 Off 启用

运算符

算术运算符

^、-、*、/、\、mod、+、-

关系运算符

=、<>、>、<、>=、<=

逻辑运算符

Not、And、Or

赋值运算符

=、+=、-=、*=、/=、\=、^=、&=

字符串运算符

&、+

经常使用内部函数

数学函数

Abs、Cos、Sin、Tan、Exp、Log、Pow、Sqrt

字符串函数

Format、FormatDateTime、InStr、LCase、Left、Len、LTrim、Mid、Right、RTrim、Space、StrComp、Trim、UCase

日期时间函数（属性）

Now、Hour、Minute、Second、Year、Month、Day、DateAdd、DateDiff、WeekDay、Today、TimeOfDat

随机函数

Randomize、Rnd

转换函数

Asc、Chr、Str、Val

格式化输出函数

Format(表达式，格式化字符串)

控制结构

顺序结构

赋值语句

目标操做符 = 表达式

控制台输入/输出

Consloe.Read()

Consloe.ReadLine()

Consloe.Write(格式，参数列表)

Consloe.WriteLine(格式，参数列表)

其中格式化字符以下：

字符	功能
C或c	以货币形式显示数据，以$开头
Dn或dn	以指定n位数显示十进制数据，空白处补0
E或e	以指数形式显示数据
Fn或fn	以n位小数显示数据
G或g	以通常格式显示
N或n	使用千位符号，若为N1，表示保留一位小数，若为N或N2，表示保留两位小数

选择结构

If 块结构

If-Then 语句

If 条件表达式 Then
    语句块
End If

语句在一行内时可省略End If语句

If 条件表达式 Then 语句块

If-Then-Else 语句

If 表达式 Then
    语句块1
Else
    语句块2
End If

If-Then-ElseIf 语句

If 表达式1 Then
    语句块1
ElseIf 表达式2 Then
    语句块2
ElseIf 表达式3 Then
    语句块3
    …
[Else
    语句块 n+1]
End If

If 语句的嵌套

If <表达式1> Then
    If <表达式2> Then
    …
    End If
    …
End If

Select Case 语句

Select Case 测试条件 Case 表达式列表1 [语句块1] Case 表达式列表2 [语句块2] … Case 表达式列表n [语句块n] End Select

其余选择结构

IIf 条件函数

IIf(表达式，当表达式为True时的返回值，当表达式为False时的返回值)

Choose 函数

Choose(整数表达式，值为1的返回值，值为2的返回值… )

循环结构

For-Next 语句

For 循环变量 [As 数据类型] = 初值 to 终值[Step 步长]
    语句块1
    [Exit For
    语句块2]
Next [循环变量]

While 循环

While 条件
    语句块1
    [Exit While
    语句块2]
End While

Do-Loop 循环

前测型循环结构

Do {While|Until} 条件
    语句块1
    [Exit Do
    语句块2]
Loop

后测型循环结构

Do
    语句块1
    [Exit Do
    语句块2]
Loop {While|Until} 条件

循环辅助控制语句

GoTo 语句

GoTo 语句用于无条件地转向指定位置处执行，通常不使用

GoTo mark

Exit 语句

Exit 语句能够退出任何过程或块

Exit [Do|For|Select|While|…]

End 和Stop 语句

End 语句强制应用程序中止运行
Stop 语句停止执行，不关闭任何文件或清除任何变量，至关于在程序中设置断点

With 语句

With 语句用来执行重复引用一个个体的一系列语句

With 个体名
    语句块
End With

数组、枚举和集合

数组

数组的声明

一维数组

Dim 数组名 ([下标上界]) [As 数据类型]

一维数组中元素的引用

数组名(索引)

多维数组

Dim 数组名([下标上界1],[下标上界2],[下标上界3]…) [As 数据类型]

多维数组中元素的引用

数组名(索引1，索引2，索引3…)

动态数组

在VB中，规定不能改变已声明数组的维数，但能够经过ReDim语句改变已声明数组的大小

ReDim [Preserve] 数组名 (下标上界)

'例程：
Dim array_sample(,) As Integer
ReDim array_sample(3,3)

'例程：
Dim array_sample(10,10) As Integer
ReDim Preserve array_sample(10,15)

Array 类

名称	说明
Length	得到数组的全部维数中元素的总数
Rank	得到数组的维数
Clear()	将数组中的一系列元素设置为0、False或Nothing
Copy()	将一个数组的一部分元素复制到另外一个数组中
CopyTo()	将当前一维数组的全部元素复制到指定的一维数组中
GetLength()	获取数组的指定维中的元素数
GetLowerBound()	获取数组中指定维度的下界
GetUpperBound()	获取数组中指定维度的上界
GetValue()	获取当前数组中指定元素的值
Revserse()	反转一维数组或部分数组中元素的顺序
SetValue()	将当前Array中的指定元素设置为指定值
Sort()	对一维数组中的元素进行排序

枚举

声明枚举类型

[访问权限] Enum 枚举名
    成员名 [=常量表达式]
    成员名 [=常量表达式]
    …
End Enum

引用枚举类型

枚举类型变量名.成员名

集合

集合的建立

Dim 集合名 As New Microsoft.VisualBasic.Collection

集合的经常使用成员

成员	说明
Count	集合中元素总数
Item	索引，从1开始
Clear()	清空集合并移除全部元素
Add(Value,[Key])	向集合中添加集合元素
Remove(Index|Key)	从集合中移除指定元素
Contains(Key)	判断元素是否存在

For Each-Next 遍历集合

For Each-Next 语句也适用于数组，但不能用于枚举

For Each 变量名 [As 数据类型] In 集合名
    [语句块1]
    [Exit For
    语句块2]
Next 语句

函数与过程

Function 函数

定义Function 函数

[访问权限] Function 函数名([形参列表]) As 数据类型
    语句块1
    函数名 = 表达式
    [Return 语句] 
    [Exit Function
    语句块2]
End Function

形参说明

[ByVal|ByRef] 变量名 [()] [As 类型]

其中，ByVal表示值传递，ByRef表示地址传递

Sub 子过程

定义Sub 子过程

[访问权限] Sub 子过程名 [形参列表]
    [语句块1]
    [Exit Sub
    语句块2]
End Sub

调用Sub 子过程

使用Call语句

Call 子过程名(实参列表)

直接用子过程名

子过程名 实参列表

形参与实参

形参与实参的概念

形参是定义过程时在过程当中出现的形式参数，实参是调用过程时传递的实际参数

对应方式

实参和形参的对应方式有如下两种：

• 按位置对应
• 按名称对应

参数的传递方式

实参数的传递方式有如下两种：

• 传值：经过ByVal实现
• 传地址：经过ByRef实现

嵌套与递归调用

嵌套

在一个过程当中调用另外一个过程，称为过程的嵌套调用

递归

过程直接或间接地调用自身，称为过程的递归调用

做用域

块做用域

块做用域也称为结构做用域，结构是由两条对应语句组成的编码区，例如If-Then结构，Do-Loop结构。结构内建立的变量，在结构结束后被自动销毁

过程级做用域

在过程内部声明的变量，其做用域是过程级的，一般称为局部变量，其余过程不可访问。若是在过程当中没有声明而直接使用某个变量，该变量也是局部变量。过程体结束后，局部变量自动消失

模块级做用域

凡是用Private、Dim关键字，在窗体模块的通用声明段或在标准模块声明的变量都是模块级变量。模块级变量能够被所声明的模块中的任何过程访问，其做用域是其所在的模块。使用模块级变量主要解决多个事件过程、过程间数据的共享

全局做用域

在标准模块的声明区中，用Public声明的变量都是全局变量。全局变量的做用域是整个应用程序，便可被应用程序的任何过程访问，不管过程所处在哪一个模块

静态变量

Static 变量名 As 数据类型

只能对局部变量使用Static，即只能在过程或过程当中的块内声明静态变量

类

类和对象

对象是类的实例，类是对象的抽象

类和类的变量

建立类

[访问权限] Class 类名
    Public 若干成员
    Private 若干成员
    Protected 若干成员
End Class

省略“访问权限”时默认为Public

建立类的变量

Dim 类变量名 As New 类名([初始化列表])

对象变量的释放

类变量名 = Nothing

命名空间

声明命名空间

Namespace 命名空间名
    若干成员
    …
End Namespace

“命名空间”内能够定义“子命名空间”

命名空间内成员的引用

命名空间名.成员名

设置字段和属性

字段

类的字段仅用于类内的数据成员，不与类外程序交互

[Private|Protected] 字段名 As 数据类型

属性

类的属性既用于类内，也能够与类外程序交互

自动实现的属性

Public Property 属性名 As 数据类型

“自动实现的属性”的基本属性自动在后台建立，并为属性过程提供基本逻辑

完整定义属性

'例程：
Class SampleClass
    Private m_Sample As String 
    '定义字段变量
    Public Property Sample() As String
    '定义属性过程
        Get
        '定义读取字段变量的值
            Return m_Sample
        End Get
        Set(ByVal Value As String)
        '定义写入字段变量的值
            m_Sample = Value
        End Set
    End Property
End Class

创建只读属性

1. 使用ReadOnly Property 语句

   [访问权限] ReadOnly Property 属性名 As 数据类型

2. 使用Property 语句，不提供Set-End Set方法

创建只写属性

1. 使用WriteOnly Property 语句

   [访问权限] WriteOnly Property 属性名 As 数据类型

2. 使用Property 语句，不提供Get-End Get方法

成员函数

[访问权限] Sub 子过程名[(参数列表)]
    过程语句块
End Sub

[访问权限] Function 函数名[(参数列表)]
    函数语句块
End Function

构造函数和析构函数

构造函数

Public Sub New(参数列表)
    语句块
End Sub

析构函数

Protected Overrides Sub Finalize()
    语句块
End Sub

重载

使用重载必须有相同的名称，但必须有不一样的形参列表。在一个类中重载属性或过程，可选用Overloads修饰符，可是若在某个声明中使用了Overloads修饰符，则在全部声明都得使用。重载构造函数不能用Overloads修饰符

Class ClassSapmle
    Public Overloads Function Sum(ByVal x As Integer,ByVal y As Integer)
        Sum = x + y
    End Function
    Public Overloads Function Sum(ByVal x As Single,ByVal y As Single)
        Sum = x + y
    End Function
End Class

共享成员

共享成员仅有一个副本，经过类来使用

[访问权限] Shared 共享成员名 As 数据类型 = 初始值

继承和多态

继承

Public Class 类名
    Interits 父类名
    语句块
End Class

Public Class 类名 : Interits 父类名
    语句块
End Class

多态性

子类中从新定义父类的成员，必须将父类的成员声明为Overridable，子类的成员定义为Overrides

多媒体编程

GDI+ 绘图

建立Graphics 类变量

1. 在窗体或控件的Paint事件中，经过PaintEventArgs参数中的Graphics来得到

   Dim graphic1 As System.Drawing.Graphics = e.Graphics

2. 调用控件或窗体的 CreateGraphics方法

   Dim objGraphics As Graphics = TextBox1.CreateGraphics

Graphics 类经常使用方法

方法	说明
Clear()	清除整个绘图面并以指定背景色填充
Dispose()	释放由Graphics使用的全部资源
DrawArc()	绘制一段弧线，它表示由一对坐标、宽度和高度指定的椭圆部分。可重载
DrawEllipse()	绘制一个由边框（该边框由一对坐标、高度和宽度指定）定义的椭圆。可重载
DrawIcon()	在指定坐标处绘制由指定的Icon表示的图像。可重载
DrawIconUnstretched()	绘制指定的Icon表示的图像，而不缩放该图像
DrawImage()	在指定位置而且按原始大小绘制指定的Image。可重载
DrawImageUnscaled()	在由坐标对指定的位置，使用图像的原始物理大小绘制指定的图像。可重载
DrawImageUnscaledAndClipped()	在不进行缩放的状况下绘制指定的图像，并在须要时剪辑该图像以适合指定的矩形
DrawLine()	可重载。绘制一条链接由坐标对指定的两个点的线条
DrawLines()	可重载。绘制一系列链接一组Point结构的线段
DrawPath()	绘制GraphicsPath
DrawPie()	可重载。绘制一个扇形，该形状由一个坐标对、宽度、高度以及两条射线所指定的椭圆定义
DrawPolygon()	可重载。绘制由一组Point结构定义的多边形
DrawRectangle()	可重载。绘制由坐标对、宽度和高度指定的矩形
DrawRectangles()	绘制一系列由Rectangle结构指定的矩形。可重载
DrawString()	在指定位置而且用指定的Brush和Font对象绘制指定的文本字符串。可重载
FillEllipse()	填充边框所定义的椭圆的内部，该边框由一对坐标、一个宽度和一个高度指定。可重载
FillPath()	填充GraphicsPath的内部
FillPie()	填充由一对坐标、一个宽度、一个高度以及两条射线指定的椭圆所定义的扇形区的内部。可重载
FillPolygon()	可重载。填充Point结构指定的点数组所定义的多边形的内部
FillRectangle()	填充由一对坐标、一个宽度和一个高度指定的矩形的内部。可重载
FillRectangles()	填充由Rectangle结构指定的一系列矩形的内部。可重载
FillRegion()	填充Region的内部
Flush()	强制执行全部挂起的图形操做并当即返回而不等待操做完成。可重载

多媒体播放

添加Windows Media Player 控件

1. 点击“工具”菜单，选择“选择工具箱项”
2. 在弹出的“选择工具箱项”窗口中，选“COM组件”选项卡，勾选“Windows Media Player”，单击“肯定”

Windows Media Player 控件经常使用成员

Windows Media Player 控件经常使用成员

成员名称	说明
FullScreen	是否启用全屏播放
EnableContextMenu	是否支持右键快捷菜单
StretToFit	是否拉伸画面到合适大小
UiMOde	播放器界面模式，枚举值：Full，Mini, None, Invisible
URL	文件的位置，支持本地和网络地址
PlayState	播放状态，枚举值：1(中止)，2(暂停)，3(播放)，6(正在缓冲)，9(正在链接)，10(准备就绪)
Visible	可见性，播放视频时须要设置为False
Settings.Volume	音量大小，枚举值0到100
Settings.AutoStart	是否自动播放
Settings.Mute	是否静音
Settings.PlayCount	播放次数
Ctlcontrols.Play()	播放
Ctlcontrols.Pause()	暂停
Ctlcontrols.Stop()	中止
Ctlcontrols.Fastforward()	快进
Ctlcontrols.Fastreverse()	快退

经常使用控件

菜单控件

MenuStrip 控件

MenuStrip控件是运行时控件，用于生成菜单栏。输入“-”可插入分割栏，输入“& 字母符号”能够插入快键键，单击菜单项或按下“Alt+快捷键”时，会触发Click事件

ContextMenuStrip 控件

ContextMenuStrip控件又称快捷菜单、浮动菜单，或弹出式菜单。当建立ContextMenuStrip控件后，VB会将此控件链接到窗体中有ContextMenuStrip属性的控件中。VB容许同一窗体中创建多个不一样的ContextMenuStrip控件

单选按钮和复选框

单选按钮 RadioButton

单选按钮的经常使用成员

成员名称	说明
Appearance	设定界面样式 其中：Normal为“小圆圈+文字”样式，Button为“文字样式” 代码示例：RadioButton1.Appearance = Appearance.Button
Text	用于显示该按钮的提示信息
Image	单选按钮以指定的图像显示 代码示例：RadioButton1.Image = Image.FromFile(“C:\sample.jpg”)
Checked	判断是否选中
Click()	单击按钮时触发该事件
CheckedChanged()	Checked属性值改变时触发该事件

窗体中如有不一样性质的单选按钮，就必须用GroupBox控件或Panel控件来来分隔成不一样分组，不然VB将其视为同一分组选项

复选框 CheckBox

复选框除了有单选按钮的经常使用成员外，还有如下经常使用成员

属性	说明
ThreeState	是否支持三态
CheckState	选项状态，有Unchecked、Checked、Indeterminate

列表框工具

列表框 ListBox

列表框可设定单选或多选，有如下经常使用成员

成员名称	说明
Text	设计模式下无此属性，程序中某个项目被选中时，会将该项目的内容放入Text属性中
MultiColumn	是否启用多栏显示
ColumnWidth	列表框多栏显示时每一个字段的宽度
Items	项目集合
Item	设计模式下无此属性，是Items的子属性，用于选取Items中的某项，例：ListBox1.Items.Item(i)
Count	运行时属性，是Items的子属性，返回被选中项目的个数，例：ListBox1.Items.Count
Clear()	是Items属性的方法，清空列表框
Add()	是Items属性的方法，增长一个项目
HorizontalScrollBars	是否启用水平滚动条
ItemHeight	列表框内项目的高度
SelectionMode	列表框选择项目的模式
Sore	是否让列表框内的选项以字母顺序排序
SeclectItems	运行时属性，取得当前列表框中被选中项目的集合
SeclectItems	运行时属性，取得当前列表框中被选中的项目
SeclectItems	运行时属性，取得当前列表框中被选中项目的索引号
Contains()	检查是否包含某选项
Remove()	删除项目
FindString()	返回列表框中第一个以指定字符串开头的项目的索引号
SelectedIndexChanged()	改变被选中的选项时触发此事件

复选列表框 CheckedListBox

复选列表框比列表框每一个选项前面多一个复选标记，除了有列表框的成员外，还有如下经常使用成员

成员名称	说明
CheckState	运行时属性，选中的选项打钩
CheckOnClick	是否启用单击选中
SetItemChecked()	设定第i个项目打钩
SetItemCheckState()	设定第i个项目的状态
GetItemChecked()	返回第i个项目是否已打钩
GetItemCheckState()	返回第i个项目的状态

组合框 ComboBox

组合框由顶部的文本框和下部的列表框组成。用户能够从文本框输入选项，也能够从列表框中选择项目。有如下经常使用成员

成员名称	说明
MaxLength	下拉列表中每一个选项所容许的最大宽度
MaxDropDownItems	下拉列表中显示项目的最大数量
IntegralHeight	是否启用自动调整大小
DropDownStyle	组合框样式，具体说明以下 DropDown：运行时列表隐藏，可输入，可拉选) DropDownList：运行时列表隐藏，不可输入，可拉选 Simple：列表框始终显示，可输入，可拉选

用户交互

InputBox 函数

执行InputBox函数将产生一个对话框，并能够获得用户输入的字符串。

调用

变量[$] = InputBox(消息[,标题][,默认值][,X坐标值][,Y坐标值])

形参说明

1. 消息：输出交互信息
2. 标题：显示在对话框的标题栏，省略时显示应用程序名
3. 默认值：输入栏显示的默认值，省略时为空字符串
4. X坐标值：对话框左上角的水平坐标，省略时对话框水平居中
5. Y坐标值：对话框左上角的竖直坐标，省略时对话框离上边界约1/3屏幕高

返回值

InputBox函数返回用户输入的字符串，没有输入时返回默认值，默认值为空时返回空字符串

MessageBox 对话框

调用

MessageBox对话框用于显示消息给用户，用户不能输入数据，用户点击按钮后，对话框将消失。语法格式以下：

MessageBox.Show(消息[,标题][,按钮数][,图标][,默认按钮])

形参说明

1. 消息：输出交互信息
2. 标题：显示在对话框的标题栏，省略时标题栏为空
3. 按钮数：参数是MessageBoxButtons类型，枚举值AbortRetryIgnore、OK、OKCancel、YesNoCancel、YesNo、RetryCancel
4. 图标：参数是MessageBoxIcon类型，枚举值Exlcamation、Information、None、Question、Stop、Warning
5. 默认按钮：参数是MessageBoxDefaultButton类型，枚举值Button一、Button二、Button3

返回值

DialogResult返回值枚举

成员	按钮名称	返回值
OK	肯定	1
Cancel	取消	2
Abort	终止	3
Retry	重试	4
Ignore	忽略	5
Yes	是	6
No	否	7

MsgBox 函数

MsgBox函数是从老版本VB保留下来的一个内部信息传递函数

调用

[变量名 = ]MsgBox(信息内容[,按钮类型][,对话框标题])

形参说明

1. 信息内容：用户交互信息
2. 对话框标题：显示在对话框的标题栏，省略时显示应用程序名
3. 按钮类型：数值表达式，包括“按钮数目”、“图标类型”和“默认按钮”三项内容的和，为阅读方便，一般写成“a + b + c”的形式

“按钮类型”设置值及含义

分组	内部常数	值	显示的按钮
按钮数目	MsgBoxStyle.OKOnly	0	肯定
按钮数目	MsgBoxStyle.OKCancel	1	肯定、取消
按钮数目	MsgBoxStyle.AbortRetryIgnore	2	终止、重试、忽略
按钮数目	MsgBoxStyle.YesNoCancel	3	是、否、取消
按钮数目	MsgBoxStyle.YesNo	4	是、否
按钮数目	MsgBoxStyle.RetryCancel	5	重试、取消
图标类型	MsgBoxStyle.Critical	16	错误
图标类型	MsgBoxStyle.Question	32	疑问
图标类型	MsgBoxStyle.Exclamation	48	警告
图标类型	MsgBoxStyle.Information	64	提示
默认按钮	MsgBoxStyle.DefaultButton1	128	消息框的第一个按钮
默认按钮	MsgBoxStyle.DefaultButton2	256	消息框的第二个按钮
默认按钮	MsgBoxStyle.DefaultButton3	512	消息框的第三个按钮

返回值

DialogResult返回值枚举

成员	按钮名称	返回值
OK	肯定	1
Cancel	取消	2
Abort	终止	3
Retry	重试	4
Ignore	忽略	5
Yes	是	6
No	否	7

ColorDialog 控件

ColorDialog 控件经常使用属性

属性	说明
AllowFullOpen	代表用户是否能用对话框自定义颜色
AnyColor	代表对话框是否显示基本颜色组中的全部可用颜色
Color	代表用户所选的颜色
CustomColors	代表显示在对话框中的自定义颜色组
FullOpen	代表当对话框打开时，用来建立自定义颜色的控件是否可见
ShowHelp	代表是否在对话框中显示Help按钮
SolidColorOnly	代表对话框是否限制用户只能选择纯色

FontDialog 控件

FontDialog 控件经常使用属性

属性	说明
AllowScriptChange	是否容许用户更改“脚本”组合框中指定的字符集，以显示除了当前所显示字符集之外的字符集改成字体的脚本
AllowVectorFonts	是否能够选择字体列表中的矢量字体
AllowVerticalFonts	是否可选择字体列表中垂直字体
FixedPitchOnly	在字体列表中显示固定大小的字体，默认为False
MaxSize	定义用户选择的最大字号
MinSize	定义用户选择的最小字号
ShowApply	显示“应用”按钮，用户能够查看更新的字体，无需退出字体对话框
ShowColor	是否在字体对话框中选择字体颜色
ShowEffects	是否启用Strikeout和Underline复选框来处理字体

Shell 函数

Shell函数的功能是调用应用程序，同时分别操做，互补影响

调用

[变量名 =]Shell("文件名"[窗口类型,等待,等待时间])

形参说明

1. 文件名：要调用的应用程序的完整路径名
2. 窗口类型：整型，表示执行应用程序的窗口大小，默认为1
3. 等待：布尔值，是否等待应用程序完成默认为False
4. 等待时间：整型，单位为毫秒，默认为10，当等待为True时有效

返回值

返回被调用程序的进程ID

其余控件

滚动条 Scroll

ScrollBar控件的经常使用属性

属性	说明
Value	与滚动条位置相对应的一个Integer值
Maximum	滚动条Value属性的最大值，默认为100
Minimum	滚动条Value属性的最小值，默认为0
LargeChange	当用户按下PageUP、PageDown，或单击滚动条轨迹时Value属性改变的值
SmallChange	当用户按下某个箭头键，或单击滚动条按钮时Value属性改变的值

进度条 ProgressBar

ProgressBar控件的经常使用成员

成员	说明
Value	与进度条显示的进度相对应的一个Integer值，运行时经过程序设定
Maximum	进度条Value属性的最大值，默认为100
Minimum	进度条Value属性的最小值，默认为0
Increment()	增长进度条Value属性值
PerformStep()	减小进度条Value属性

日历 DateTimePicker

DateTimePicker控件经常使用属性

属性	说明
Value	当前所选择的日期/时间
Text	当前显示的字符串

计时器 Timer

Timer控件经常使用成员

成员	说明
Enabled	是否启用计时器
Interval	每两个Tick事件触发的时间间隔，单位毫秒
Start()	计时器打开
Stop()	计时器关闭，关闭后计时器重置
Tick()	Interval时间间隔触发的事件

文件的基本操做

顺序文件操做

打开文件

FileOpen(文件号，文件名，模式)

1. 文件号是一个整数，能够用FreeFile函数得到一个可用的文件号
2. 模式枚举：Output、Append、Input

关闭文件

FileClose([文件号[,文件号，…]])

能够一次关闭多个文件号，当缺省文件号时，关闭全部文件

写操做

Print|PrintLine|Write|WriteLine(文件号,输出列表)

Write函数会在各项和字符串两边的引号之间插入逗号，其中可用Spc(n)和Tab(n)函数分隔，Write将数据写入问价，仅支持数字、Boolean、日期、Null和Error数据格式

读操做

Input(文件号,变量名)

InputString(文件号,表达式)

经常使用文件函数

函数名称	说明
EOF()	文件是否到达末尾
LOF()	返回文件的长度

随机文件操做

打开文件

FileOpen(文件号,文件名[,OpenMode.Random,OpenAccess.Default,OpenShare.Default,记录长度])

读写操做

FileGet(文件号,变量名,记录号)

FilePut(文件号,变量名,记录号)

用Stream 读写文本文件

1. 写入文本文件
   Dim 变量名 As New System.IO.StreamWriter("文件名",[False|True])
   建立StreamWrite变量后，可用Write或WriteLine方法写入
2. 读取文本文件
   Dim 变量名 AsNew System.IO.StreamReader("文件名")
   建立StreamReader变量后，可用ReadToEnd或ReadLine方法读出

文件操做控件

OpenFileDialog 控件

OpenFileDialog提供一个标准的打开文件对话框，在其中能够指定驱动器、文件夹、文件类型和文件名。OpenFileDialog经常使用成员以下：

成员	说明
AddExtension	用户省略扩展名时是否自动添加默认扩展名
CheckFileExitsts	是否检查文件名合法性
CheckPathExists	是否检查路径名合法性
DefaultExt	默认文件扩展名
DereferenceLinks	在从对话框返回前是否取消引用快捷方式
FileName	对话框中选定的文件名字符串
FileNames	对话框中全部选定的文件的文件名
Filter	要在对话框中显示的文件名筛选器字符串，例：”文本文件(*.txt)|*.txt|全部文件(*.*)|*.*”
FilterIndex	在对话框中选择的文件筛选器的索引，若是选第一项就设为1
InitialDirectory	对话框的初始目录
MultiSelect	是否容许选择多个文件
ReadOnlyChecked	是否选定“只读复选框”
RestoreDirectory	控制对话框在关闭以前是否恢复当前目录
ShowHelp	是否显示”帮助”按钮
ShowReadOnly	是否显示“只读复选框串”
Title	将显示在对话框标题栏中的字符
ValiDateNames	控制对话框检查文件名中是否含有无效的字符或序列
CreateObjectRef()	建立一个对象，包含生成与远程对象进行通讯的代理所需的所有相关信息
Dispose()	释放Component占用的资源
Equals()	肯定两个Object实例是否相等
OpenFile()	打开用户选定的只读文件
Reset()	重置全部属性为默认值
ShowDialog()	显示通用对话框
FileOk()	当用户点击”打开”或”保存”按钮时要处理的事件
HelpRequest()	当用户点击”帮助”按钮时要处理的事件

SaveFileDialog 控件

SaveFileDialog控件经常使用成员

成员	说明
AddExtension	获取或设置一个值，该值指示若是用户省略扩展名，对话框是否自动在文件名中添加扩展名
CheckFileExists	获取或设置一个值，该值指示若是用户指定不存在的文件名，对话框是否显示警告
CheckPathExists	获取或设置一个值，该值指示若是用户指定不存在的路径，对话框是否显示警告
CreatePrompt	获取或设置一个值，该值指示若是用户指定不存在的文件，对话框是否提示用户容许建立该文件
DefaultExt	获取或设置默认文件扩展名
DereferenceLinks	获取或设置一个值，该值指示对话框是否返回快捷方式引用的文件的位置，或者是否返回快捷方式 (.lnk) 的位置
FileName	获取或设置一个包含在文件对话框中选定的文件名的字符串
FileNames	获取对话框中全部选定的文件的文件名
Filter	获取或设置当前文件名筛选器字符串，该字符串决定对话框的“另存为文件类型”或“文件类型”框中出现的选择内容
FilterIndex	获取或设置文件对话框中当前选定筛选器的索引
InitialDirectory	获取或设置文件对话框显示的初始目录
OverwritePrompt	若是用户指定的文件名已存在，对话框是否显示警告
RestoreDirectory	对话框在关闭前是否还原当前目录
ShowHelp	是否显示“帮助”按钮 Title
ValidateNames	是否只接受有效的 Win32 文件名
Click()	在命令按钮上按下而后释放一个鼠标按钮时发生
CreateObjectRef()	建立一个对象，包含生成与远程对象进行通讯的代理所需的所有相关信息
Dispose()	释放Component占用的资源
Equals()	肯定两个Object实例是否相等
KeyPress()	当用户按下和松开一个ANSI键时发生
OpenFile()	打开用户选定的只读文件
Reset()	重置全部属性为默认值
ShowDialog()	显示通用对话框
FileOk()	当用户点击”打开”或”保存”按钮时要处理的事件
HelpRequest()	当用户点击”帮助”按钮时要处理的事件