大家好，又见面了，我是你们的朋友全栈君。

一、什么是VB

1.1 VB程序设计是要干什么？

1.添加、设置对象；
2.对对象添加功能。

1.2 编程的基本要素

– 对象object

– 类class

– 属性property

– 方法method

– 事件event

事件过程的一般格式：

private sub 对象名称_事件名称()
  ......
  事件响应程序代码
  ......
End sub

1.3编码规则及结构化程序设计

1.3.1编码规则

（1）一行需要写多条语句，语句之间用”:”分隔。

sum=sum+x:count=count+1

一行最多1023个字符。
（2）如果一条语句很长，一行写不下，可以使用”空格+_”进行续行。

print text1.text & text2.text & _
        text3.text

（3）不区分大小写
（4）关键字和变量名、常量名、过程名之间一定用空格分隔
（5）使用左缩进格式体现代码的逻辑结构和嵌套关系
（6）除字符串常量和注释内容外，都是用英文半角符号

1.3.2结构化程序设计

顺序结构

入口
 ↓
语句1
 ↓
语句n
 ↓
出口

选择结构

    入口
     ↓
 真←条件→假
 ↓       ↓
语句1     语句2
  →  ↓ ←
     出口

循环结构

     入口
 ---→↓
 |   条件→假---|
 |    ↓       |
 |    真       |
 |    ↓       |
 |  循环体      |
 |____|        |
               ↓
              出口

二、VB基础知识

2.1 基本构成

2.1.1窗体

窗体的基本属性

1.name（名称）
2.caption（标题）
3.autoRedraw（重绘）
4.backcolor（背景颜色）
5.borderstyle（边框类型）
6.controlbox（控制框）
是否在窗体左上角出现控制菜单按钮，默认为TRUE。
7.enabled（允许）
是否相应用户事件，默认为TRUE。
8.font___（字体）
9.height（高）width（宽）top（顶边位置）left（左边位置）
10.icon（最小化图标）
11.maxbutton，minbutton（是否显示最大/小化按钮）
12.picture（图形）
13.visible（可见性）
14.windowstate（窗口状态）
0（默认）-正常状态；1-最小化状态；2-最大化状态

窗体的事件

【格式】

private sub form_事件名(参数表)
 ......
end sub

【注意】
在事件过程名中的窗体名只能使用form（如form_load），但在过程内对窗体进行引用时必须用到窗体名字（如form1.caption）
【常用事件】
1.load（加载事件）
2.unload（卸载事件）
3.activate（活动事件）deactivate（非活动事件）
4.paint（绘画事件）
该事件被触发的前提是窗体的autoredraw属性被设置为False。当首次显示窗体，窗体被移动或改变大小，或者窗体被其他窗体覆盖时，将触发paint事件。
5.click（单击事件）
6.dblclick（双击事件）
7.keypress（按键事件）

窗体的方法

1.show（显示方法）

`private sub form_load()
    show
    print "内容已显示"
 END sub

2.print（打印方法）
3.cls（清除方法）
4.move（移动方法）
移动并改变窗体或控件的位置和大小，格式为

[对象.]move left[,TOP[,WIDTH[],HEIGHT]]

left：移动对象至目标位置的x坐标
top：移动对象至目标位置的y坐标
width：移动后对象的宽度
height：移动后对象的高度

焦点与Tab键序

1.焦点
【说明】
焦点在任何时候只能有一个，改变焦点将触发焦点事件。当对象得到或失去焦点时分别产生gotfocus或lostfocus事件。
【将焦点赋给对象的方法】
（1）用鼠标选定对象
（2）按快捷键选定对象
（3）按Tab或shift+tab切换
（4）在代码中用setfocus方法在设置焦点

text1.setfocus '把焦点设置在文本框text1上

【注意】
只有当对象的enabled和visible属性为true时，它才能接受焦点。
2.Tab键序
【说明】
当向窗体中设置控件时，系统会自动按顺序给每个控件指定一个tab键序。tab键序也反映在控件的tabindex属性中。通过改变控件的tabindex属性值，可以改变默认的焦点移动顺序。

2.1.2控件

控件的公共属性

命令按钮

1.常用属性
2.常用事件和方法

标签

1.常用属性
2.常用事件和方法

文本框

1.常用属性
2.常用事件和方法

2.1.3使用对话框

inputbox

【格式】

inputbox(a,b,c,xpos,ypos,helpfile,helpcontext)

【说明】
a表示显示的内容
b表示标题
c表示默认值
xpos表示左边距
ypos表示上边距

msgbox

【格式】

msgbox(a,type,b)

【说明】
a表示显示的内容
type表示按钮的类型
b表示标题
type值=表1+表2+表3

表1——出现的按钮

表2——图标类型

表3——默认活动按钮

2.2 模块

窗体模块

包含窗体、控件

标准模块

只有代码，供各个窗体中的事件过程来调用

类模块

包含代码和数据，可以看作一个控件，通过它可以制造一个对象，将它应用于窗体模块中

2.3 数据类型

2.3.1基本数据类型

2.3.2用户定义数据类型

将不同类型的变量组合起来定义成一个特定类型的变量
【格式】
Type 用户定义类型名称
元素名 As 基本类型
元素名 As 基本类型
……
End Type
【说明】
标准模块中，Type前面可以是public或private；窗体模块中，Type前面必须是private
【示例】

Type Data_Student
  Name as String
  Age  as Integer
  Sex  as String
End Type

2.3.3枚举类型

【格式】
public|private Enum 类型名称
枚举1 =常数表达式
枚举2 =常数表达式
……
End Enum
【示例】
public Enum Days
sunday
monday
End enum

2.4 常量和变量

2.4.1常量

1.文字常量

字符串常量：可以是双引号和回车符以外的任何ASCII字符
数值常量：整型、长整型、货币型、单/双精度浮点数

2.符号常量

【格式】
const 常量名 = 表达式
【示例】
const π= 3.1415926，dollar = 7.99

2.4.2变量

1.变量的命名规则

（1）变量必须以字母或汉字开头
（2）只能由字母、汉字、数字和下划线组成，不能有小数点、空格等
（3）字符个数不超过255个
（4）不能使用VB关键字
（5）不区分大小写

2.变量的类型和声明

（1）在定义变量时指定其类型
【格式】
declare 变量名 as 类型
【说明】
– declare 可以是dim、static、redim、public、private
– dim自动变量
– static静态变量
– private和dim一样，但是不能在过程中定义变量，只能在标准模块或窗体的声明部分定义变量
– redim主要用于定义数组
– public用来在标准模块中定义全局变量或数组
– 类型可以是基本数据类型或者自定义数据类型
（2）用DefType语句定义
【格式】
DefType 字母范围
【说明】
（3）用类型说明符定义变量
【示例】

Dim Aa$  '定义一个字符串变量Aa

（4）自定义类型变量
【格式】
变量.成员
【示例】
自定义数据类型：

Type Data_Student
  Name as String
  Age  as Integer
  Sex  as String
End Type

定义一个名为Hunter的Data_Student数据类型变量，并为该变量的每个成员赋值

Dim Hunter as Data_Student
 Hunter.age = 18
 Hunter.name= “kitty”
 Hunter.sex= “女”

3.变量的作用域

【说明】

（1）局部变量
又称过程级变量，在过程中声明，只能该过程内部的代码才能访问。用dim、static声明。
（2）模块变量
又称模块级变量，主要包括窗体变量和标准模块变量。用private、dim声明。
（3）全局变量
又称全程变量，在标准模块的声明部分中声明，不能在窗体或过程中声明。用public、global声明。
【示例】

2.5常用内部函数

2.5.1数学函数

2.5.2转换函数

2.5.3字符串函数

2.5.4时间/日期函数

2.5.5格式输出函数

【格式】
format (表达式，[,格式串])
【功能】
根据“格式串”规定的格式输出表达式的值。其中，“表达式”为输出的内容，可以是数值、日期/时间、字符串
【格式串常用符号】

2.5.6随机函数

【说明】
rnd(x)随机产生一个0~1(不包括0和1)之间的单精度随机数。（x）可以省略不写。
【示例】
生成一个1~16之间的随机数

private sub form_click()
  randomize  '用来避免每次重启程序后产生和上次一样的随机数
  print rnd()*16
End sub

生成一个1~4之间的随机整数

private sub form_click()
  randomize  '用来避免每次重启程序后产生和上次一样的随机数
  print int(rnd()*4+1）
End sub

生成一个a~b之间的随机整数

private sbu form_click()
  randomize  
  print int((b-a+1)*rnd()+a)
End sub

2.6运算符与表达式

以下运算优先级从上到下，由高到低；从做到右，由高到低

三、基本程序语句

3.1赋值语句

【格式】
[LET] 变量名或属性名 = 表达式
【功能】
计算右端的表达式，并把结果赋值给左端的变量或对象属性。let表示复制，通常可以省略。符号=被称为赋值号。

3.2数据的输入和输出

3.2.1使用print方法输出数据

【格式】
[对象名.] print [表达式列表]
【说明】
（1）对象名可以是窗体（form）、图片框（picturebox）或打印机（printer）的名称。如果省略对象名，则在当前窗体上直接输出。
（2）当输出多个表达式时，各表达式之间用分号“;”或“,”隔开。使用分号分隔符，则按紧凑格式输出；使用逗号分隔符，则各输出项按区段格式输出。
【示例】

private sub form_click()
 a=3:b=4
   print a,b,4+a,
   print 2*b
   print a,,b
   print
   print "a=";a,"b=";b
end sub

（3）用print输出字符串时，前后不留空格；输出数值数据时，前面有一个符号位，后面留有一个空格。
（4）print 后面没有内容则输出一个空行。
（5）若语句行末没有分隔符，则自动换货。若以分号或逗号结束，则输出不换行。

3.2.2使用print方法的配合函数

print tab(n)

从第n列开始输出，一个汉字占2个位置，当n大于行宽时，输出位置为：n Mod行宽

输入：

print tab(2);"学号";tab(11);"姓名";tab(21);"成绩"

结果：

_ 学号 _ _ _ _ _ 姓名 _ _ _ _ _ _ 成绩

print spc(n)

输入：

print "学号";spc(2);"姓名";spc(5);"成绩"

输出：

学号 _ _ 姓名 _ _ _ _ _ 成绩

print tab(n)

输入：

print tab(2);"学号";tab(11);"姓名";tab(21);"成绩"

输出：
_ 学号 _ _ _ _ _ 姓名 _ _ _ _ _ _ 成绩

四、选择结构程序设计

VB中实现选择结构的语句主要有：IF语句和select case语句。

4.1条件表达式

条件表达式分为俩类：关系表达式和逻辑表达式。取值为：真和徦。

4.1.1关系表达式

是用比较运算符把俩个表达式连接起来的式子。
【表达式示例】

【说明】
（1）所有比较运算符的优先级都相同，运算时按其出现的顺序从左到右执行。
（2）比较运算符俩侧可以是算数表达式、字符串或日期表达式，也可以是作为表达式特例的常量、变量或函数，但两侧的数据类型必须一致。
（3）字符型数据按其ascII码值进行比较。比较俩个字符串时，先比较俩个字符串的第一个字符，其中字符大的字符串大。如果第一个字符相同，则取第二个字符比较。
例如：
a 小于 b
abc 小于 b
123 小于 2
abc 大于 ab2
abc 大于 ab

4.1.2逻辑表达式

【逻辑运算符】
and、or、not、xor（异或）、eqv（等价）、imp（蕴含）
【说明】
（1）逻辑表达式的运算顺序是：先进行算数运算或字符串运算，在做比较运算，最后运行逻辑运算。括号优先，同级运算从左到右执行。
（2）一个逻辑表达式里还包含多个逻辑符，运算时，按not、and、or、xor、eqv、imp的优先级执行。

4.2IF语句

【分类】
单分支IF语句
双分支IF语句
嵌套IF语句（多分支IF语句）
【单分支IF语句】

             ↓
            条件----
            ↓真    |假
          语句组    |
            ↓————

（1）单行结构

if 条件 then 语句组

（2）块结构

if 条件 then
   语句组
end if

【双分支IF语句】

          ↓
        —条件—
    ↓真        |假
语句组1        语句组2
    | |
     ——     ——
          ↓

（1）单行结构

if 条件 then 语句组1 else 语句组2

（2）块结构

if 条件 then 
  语句组1
else
  语句组2
End if

4.3多分支语句

4.4选择性控件

4.5计时器控件

附:

private 和 public

dim 和 private

sub 和 withevents

byVal…as…

variant和string

双精度和单精度