VB基本运算 表达式 赋值语句与分支结构
vb的三种基本结构
③. j = 0 If J＞0 Then J＝J＋1 Endif
2．以下程序，运行后 x的值为 （ ） x =2 y= 3 y=y+1 x=x+y-1 A. l B. 3 C. 5 D. 7 3、以下程序，运行后变量value的值为 ( ) X = 20 If x >= 10 then value = 5 * x else value = 4 * x end if msgbox(value) 最后，变量value的值是（ ） A、50 B、40 C、100 D、80
vb程序的三种基本结构一顺序结构二选择结构三循环结构程序是由若干个基本结构组成的一个基本结构可以包含一条或若干条语句
VB程序的三种基本结构
程序是由若干个基本结构组成的，一个基本结构可以包 含一条或若干条语句。
通常程序有三种最基本的结构：
一、顺序结构 二、选择结构 三、循环结构
1、 顺序结构： 将命令和语句逐条顺序排列。 程序执行时按语句的先后顺序逐条执行。 S1
4、以下程序，运行后 X的值为 （ ） X =2 For i＝1 To 5 If X＜i Then X= X＋i End If Next i A. l B. 3 C. 5 D. 7
例1、 ห้องสมุดไป่ตู้=1 b=2 c=a+b a=c-a b=c-a
最后，变量b的值是（ ）
S2 S3
2、分支结构：（选择结构） 根据条件判断其是否成立，如果成立执行成立的分支；否则 执行另一分支。 其一般形式为： If 条件 Then 语句序列1 C Else 语句序列2 End If 分支结构的简单形式为： If 条件 Then 语句序列 End If S1 S2
C
例4、s=0 for I=1 to 100 s=s+I next 最后，变量s的值是（ ）
4 VB中的3种程序结构
VB应用程序的执行是由事件驱动的，当用户触发 某一事件时，执行相应的事件过程，这些事件过程 之间并没有特定的执行次序。但在每一个事件过程 内部，是有一定的执行控制流程的，这就是通常所 说的3种基本结构： 4.1 顺序结构
4.2 分支(选择)结构
4.3 循环结构
4.1
4.2
分支（选择）结构
2. 块If语句（双分支结构）
格式： If <条件表达式> Then <语句组1> [Else <语句组2>] End If 例4-4 火车站行李费的收费标准是40kg以内（包括40kg） 0.20元/kg，超过部分为0.50元/kg。编写程序，根据输入的 任意重量，计算出应付的行李费。
4.1
顺序结构
(2) 使用文本框输入数据 使用格式： <变量名>=<对象名>.Text 说明： 同InputBox函数一样，文本框的值也是字符型数据。在应 用中，若要得到数值型数据，可通过Val函数将字符型数据转 化为数值型。
4.1
顺序结构
3. 输出数据
(1)Print方法输出数据 Print的格式： [<对象名>.] <Print> [<输出项列表>] [{; | , }]
分类 按钮类型
按钮值
系统符号常量
VbOKOnly VbOKCancel
含义
只显示“确定”按钮 显示“确定”和“取消”按钮
0 1
2
3 4 5
图标类型
VbAbortRetrylgnore
VbYesNoCancel VbYesNo VbRetryCancel VbCritical VbQuestion VbExclamation VbInformation VbDefaultButton1 VbDefaultButton2 VbDefaultButton3
VB6.0第三章-VB语言知识
(2)变量数据类型的前缀
数据类型 Boolean Byte Currency Date Double Integer Long Single String 前缀 bln byt cur dtm dbl int lng sng str 例子 blntrue bytDate curReven dtmToday dblMonet intLoop lngSalary sngSmall strName
可视化程序设计——第三章 VB语言基础
上页
下页
20
3.3 常量和变量
定义变量名时尽量使用前缀来定义变量名
(1）变量作用域的前缀 变量作用域的前缀放置在所 有其他前缀之前，用来说明 该变量的作用范围。
范围 全局 模块级 局部 前缀 g m 无 例子 gstrname mblnYes dblLength
例：Option Explicit 显式声明 Function SafeSqr（num） 加：Dim TempVal As 先定义 TempVal＝Abs（num） SafeSqr＝Sqr（TempVal） End Function
可视化程序设计——第三章 VB语言基础
上页
下页
243.3 常量和变量可视化程序设计——第三章 VB语言基础
上页
下页
9
3.2 数据类型
例： Dim strJust4 As String*4 定长字符串 Dim strAny As String 变长字符串 StrAny＝“Database” Debug.Print strAny strJust4= StrAny Debug.Print= strJust4
上页 下页
29
可视化程序设计——第三章 VB语言基础
VB基本运算、表达式、赋值语句与分支结构
VB基本运算、表达式、赋值语句与分支结构1、算术运算符2、关系运算符3、逻辑运算符算术运算符：注意事项：①、在数学中，乘号可省略；但在VB语句中，乘号*不允许省略②、在求余的时候，若参加的运算数有负号，先取绝对值，结果的符号与被除数相同③、+（连接运算）：两个操作数均为字符串类型；&（连接运算）：两个操作数既可为字符型也可为数值型。
例如："a"+"b"是合法的，而 "a"+2是错误的"a" & "b"是合法的，而"a" & 2也是合法的练一练：1.表达式23/5、 23\5、 23 Mod 5的运算结果分别是_______。
A. 3、 4.6、3B. 4.6、 4、 5C. 4、 4、 5D. 4.6、 4、 32.表达式-10/3、 -10\3、 10 Mod （-3）的运算结果分别是______。
A. -3、 -3.333、3B. -3.333、 -3、 -2C. -4、 -4、 -3.333D. -3.333、 -3、 13.下列哪些表达式是合法的，并求出正确表达式的值。
(1)"hello"+"2014"=(2)"hello"+ 2014=(3)"hello"&"2014"=(4)"hello"& 2014=想一想：表达式3+8^2/4\((11Mod2)-9*3)的返回值是多少？基本运算的规则：1、进行运算时，级别高的先执行2、同级别的运算，按照从左到右的顺序执行3、遇到括号，先进行括号内的运算注意：在VB中，括号只以()形式存在，可以多次嵌套，按照由内向外顺序执行练一练：1、求下列表达式的值(1)Sqr（256）/4-2^2 MOD 5\2(2)（-7）mod Int（3.5）+2^3/4\5(3)7mod (-3)+2^3/4\5关系运算符关系运算符用来比较两个运算量之间的关系，关系表达式的运算结果为逻辑型。
VB教案第3章
3.1.6 循环语句
For 语句 Do语句 语句 While 语句
循环语句之For For语句 3.1.6 循环语句之For语句
计数型
格式： 格式： For 循环变量＝初值 to 终值 [Step 步长 循环变量＝ 步长] 循环体 [Exit For] Next 循环变量
循环语句之For For语句 3.1.6 循环语句之For语句
循环语句之Do Do语句 3.1.6 循环语句之Do语句
例3.4用辗转相除法求两自然数的最大公约数和 用辗转相除法求两自然数的最大公约数和 最小公倍数。 最小公倍数。
1.对于已知两数 ，n，使得 对于已知两数m， ，使得m>n； 对于已知两数 ； 2. m除以 得余数r=m mod n； 除以n得余数 ； 除以 得余数 3.若r=0，则n为最大公约数结束；否则执行 ； 若 为最大公约数结束； ， 为最大公约数结束 否则执行4； 4.m=n，n=r，再重复执行 ， ，再重复执行2; 5.最小公倍数就是 个数的积除以最大公约数 . 最小公倍数就是2个数的积除以最大公约数 最小公倍数就是
开始
输入两个自然数m,n 输入两个自然数 r=m Mod n m=n n=r r<>0 True 输出最大公约数m 输出最大公约数 结束 False
循环语句之while while语句 3.1.6 循环语句之while语句
While 循环条件 循环体 Wend 完全类似于Do-Loop格式 的当型循环 格式1的当型循环 完全类似于 格式
3.1.2 注释语句
Rem 注释内容一行开头 :Rem 注释内容 跟在语句后面
3.1.3 结束语句
End 多种形式： 多种形式： End、 End If、 End Select、End With、 、 、 、 、 End Type、End Sub、 End Function、 、 、 、 作用： 结束一个程序的运行； 作用：End结束一个程序的运行；其余表示某个结 结束一个程序的运行 构的结束，与对应的结构语句配对出现。 构的结束，与对应的结构语句配对出现。 程序运行过程中，工具栏结束（End） 程序运行过程中，工具栏结束（End）按钮或主菜单 Run/End菜单 Run/End菜单 可用于退出程序
VB三种程序结构VisualBasic语言作为结构化程序设计语言提供
3、
当逻辑型赋值给数值型时，True转换为-1，False转
换为0；反之，当数值型赋给逻辑型时，非0转换为True，
0转换为False.
2、MsgBox函数：向用户显示信息（输出
MsgBox语句: MsgBox （提示内容 [,答复按钮+图标][,标题]） MsgBox函数： Dim x As Integer X=MsgBox(提示内容 [,答复按钮+图标][,标题])
? Round(3.89456,3) 结果:3.895 说明：☆ 在三角函数中，以弧度表示；sqr的自变量不能是负数
☆ Rnd函数返回小于1，大于等于0的单精度随机数。 VB用于产生随机数的公式取决于称为种子（seed）的初始值。
默认情况下，每次运行一个应用程序，VB提供一相同的种子， 即Rnd产生相同序列的随机数。为了每次运行时，产生不同序 列的随机数，可执行Randomize语句，格式如下：
•答复按钮+图标：确定在消息框中按钮 的数目和类型，以及图标的类型。
•标题：显示在消息框标题栏上的文本。
"按钮"设置值及意义
分组 内部常数
VbOkOnly VbOkCancel 按 VbAboutRetryIgnore 钮 VbYesNoCancel 数 VbYesNo 目 VbRetryCancel
对 象 可 以 是 窗 体 （ Form ） 、 图 形 框 (PictureBox) 或 打 印 机 （Printer）。如果省略了对象，则在窗体上输出。 说明：① 表达式：可选项。可以是一个或多个表达式。当有多个表达式 时，要用分隔符（逗号、分号）隔开。当表达式缺省时，则屏幕显 示一个空行。 ② 输出格式分为标准输出格式和紧凑输出格式。 标准输出格式：以14个字符宽度划分为一个区段，每个数据项占一个区 段的位置。（数据项之间用逗号隔开） 紧凑输出格式：对于数值型数据，前面有一个符号位，后面有一个空格； 对于每个字符串，各个数据项之间没有间隔。（各数据项之间用分 号或空格作为分隔符）
VB基本理论
算法基本结构【选择结构（分支结构）】：分为（行语句和块语句）行If语句：块If语句：注意：行if语句只有一行。
而块If语句写在多行上，最后需要EndIF结尾【循环结构】:分为For 语句和Do While语句For 语句Do While语句VB基本理论1、Vb书写：对象名·属性名=属性值2、vb常用的工具标签框（Label）：用来标注文字用的文本框（TextBox）:用户输入或输出命令按钮（CommandButton）:编写程序代码3、VB(2)常量常量是指在程序执行过程中其值不能改变的存储单元或数据。
符号常量：用一个符号来代表一个常量，使用符号常量的好处之一是可以使程序具有更好的阅读性，其次也使程序的修改和调试更为方便。
常见的常量类型有：整数常量：如0、100实数常量：如3.14 、－1.1字符串常量：如“信息技术”、“123”、“Welcome”逻辑常量：如True、False符号常量的说明：Const 常量名＝常量如Const x＝100 用符号x来表示常量100，程序中所有的符号x会被VB转换成整数100。
(3)变量在同一个程序中，不同的变量要用不同的名称。
变量名由字母、数字和下划线等字符组成，但必须以字母开头，变量名中不区分大小写字母。
难点释疑：常用的VB命令及常用函数名不可作为变量名，如IF、Int等。
变量的说明：Dim 变量名As 变量的类型如：Dim a As Integer a 是整数变量Dim p As Boolean p是逻辑型变量(4)数组变量数组是一批同类型的变量构成的序列，组成数组的每一个变量称为数组的元素，数组中每个元素的位置由它的下标唯一的确定。
一维数组变量说明语句(只有一个下标)：Dim 数组变量名(A1 To A2) As 元素的类型如Dim d(1 To 100)As Integer 定义了一个由100个元素的一维数组，数组元素分别为：d(1)、d(2)、……、d(100)。
高中程序设计知识点(vb)
高中程序设计知识点(vb)高中《信息技术》程序设计知识点1高中《信息技术》程序设计知识点一、基础知识1．基本概念程序、程序设计、程序设计（计算机语言语言）、流程图，屏幕坐标系、二进制；数据类型、常量、变量、表达式；对象、属性、方法、事件。
2．VB的基本数据类型数值类型：Integer、Long、Single、Double，（类型符依次为%、L、!、#）字符串型：String（类型符$）逻辑型：Boolean3．VB运算符（1）算术运算符：＾(乘方)－(取负数)某(乘)、/(除)mod(求余数)、\\(整除)＋(加)、－(减)（2）关系运算符：＞、＜、＝、＞＝、＜＝、＜＞（3）逻辑运算符：NOT(非)AND(与)OR(或)4．表达式算术表达式，其结果为数值。
如：5某(2^3-4)mod7字符表达式，其结果为字符串。
如：”What”&”iyourname”关系表达式，其结果为True(真)或Flae(假)如：3/2<>3\\2逻辑表达式，其结果为True(真)或Flae(假)如：”abc”<=”A”andint(-1.2)=-25．函数函数格式Int(某)Fi某(某)Ab(某)Sqr(某)Sin(某)Co(某)Rnd 函数功能取不大于某的整数部分取某的整数部分(截尾函数)取某的绝对值取某的算术平方根计算某的正弦值计算某的余弦值随机产生一个(0,1)内的纯小数函数格式RGB(r,g,b)Val()Str(n)InputBo某()Mgbo某()LoadPicture(f)函数功能按指定的值生成颜色将数字串转换成数值将数值转换成字符串输入数据输出数据加载图片6．变量变量用于存储数据，其特点是“读之不尽，新来旧去”。
不同类型的数据要用相应类型的变量存储;一般在使用变量前应该先定义(声明)该变量的类型。
例：已知y=|某|，编程从输入对话框输入某的值，从输出对话框输出y的值DIM某ASingle,yAingle‘定义二个单精度变量某，y语句也可写为DIM某!,y!某=inputBo某(“a=”,”输入变量的值”,0)If(某>=0)Theny=某Eley=-某MgBo某y7．VB语句的书写规则语句不区分字母大小写，每行字符最多255个；一条语句可以写在多行上，续行符为空格后跟下划线；多条语句可以写在一行上，语句间必须用冒号分隔；注释语句以单引号开头，可单独占一行或放在其它语句末尾。
程序设计基础(2)顺序结构和分支结构
25
思考 下列程序的运行结果是？
a=1 b=3 b = IIf(a = b, b + 1, b - 1) MsgBox ( b)
2
26
6. Select Case语句
格式:
Select Case <测试表达式> Case< 表达式值1> <语句块1> Case< 表达式值2> <语句块2> …… [Case Else 语句块n+1]
privatesubbutton1clickdimcjasintegercjinputbox请输入您的考试成绩selectcasecjcaseis90msgbox您的考试成绩为a级caseis80msgbox您的考试成绩为b级caseis70msgbox您的考试成绩为c级caseis60msgbox您的考试成绩为d级caseelsemsgbox您的考试成绩为f级endselectendsub
5
一、顺序结构
表达式中的变量必须是赋过值的，否则变量的初值 自动取零值(变长字符串变量取空字符)。
Dim a as integer, b as integer, c as Integer
a=1
c=a+b+3
′b未赋过值，为0
执行后，c 值为 4
赋值语句跟数学中等式具有不同的含意，例如
x=x+1
End Sub
22
4.If...Then ...ElseIf语句(多分支结构)
If<条件1>Then <语句块1>
ElseIf <条件2>Then <语句块2>
VB中结构
格式： If < 条件表达式 > < 语句块1> Else < 语句块2> End If
Then
T 表达 F 式
语句(块)1
语句(块)2
功能：当表达式的值为非0（True）时,执行Then后面的 语句块1，否则执行Else后面的语句块2。
例：判断两个数的乘积是否是正数。
Private Sub Command1_Click() Dim x As Integer, y As Integer x = Val(Text1.Text) y = Val(Text2.Text) If x * y > 0 Then
〈语句块1〉
ElseIf 〈表达式2〉Then
〈语句块2〉
……
[Else
表达式1
F
〈语句块 n+1 ] End If
表达式2
F…
T
T
表达式
nn T
语句块11
语句块2 …… 语句块nn
语句块n+11
说明：
① 不管有几个分支，程序执行了一个分支后， 其余分支不再执行。
② ElseIf子句的数量没有限制，可以根据需 要使用任意多个ElseIf子句。
（一）顺序结构
程序中的语句依照其在程序中的位置依次顺序 地执行，叫做语句的顺序执行。
赋值语句 格式： 变量名/对象属性名 = 表达式 功能：将赋值号右边表达式的值赋给赋值号左边的 变量或对象属性。
举例：
a = 300 b = a * 2 + 100 Form1.Width = b
注意：
① 赋值号左边只能是变量，不能是表达式、常量。
3．Select Case语句（多分支结构）
VB程序基本控制结构
循环次数
Int
(
终值初值 步长
1)
步长
21
>0 初值<终值 =1 时，可省略 <0 初值>终值 =0 死循环
上一页
下一页
For循环语句
循环变量=初值
循环变量是否在
F
终值范围内
T
语句块
T 有 Exit For
F 语句块
循环变量=循环变量+步长
本章目录
循环流程： (1) 循环变量被赋初值，它仅 被赋值一次。 (2) 判断循环变量是否在终值 内，如果是，执行循环体； 如果否，结束循环，执行 Next的下一语句。 (3) 循环变量加步长，转(2)， 继续循环
9
2. MsgBox函数和MsgBox过程 本章目录
作用：打开一个信息框，等待用户选择一个按按钮。 MsgBox函数返回所选按钮的值，MsgBox过程不返回值 MsgBox函数形式：
变量[%] = MsgBox(提示[,按钮][,标题]) MsgBox过程形式：
MsgBox 提示[,按钮][,标题] 按钮：可选项，数值表达式是值的总和，指定显示“按钮” 的数目及形式，使用的图标样式以及缺省“按钮”是什么。
表达式
或 If 表达式 Then 语句1 Else 语句2
当表达式的值为True时，执行Then后面的语 句块1，否则执行Else后面的语句块2
15
上一页
F 语句块 2
下一页
双分支结构例
本章目录
计算分段函数
y
sin
x
x2 1
x0
cos x x 3 3x x 0
单分支结构实现: If x<>0 Then y=sin(x)+sqr (x*x+1) Else y=cos(x)－ x^3+3*x
职高一年级vb知识点
职高一年级vb知识点Visual Basic（VB）是一种基于事件驱动的编程语言，常用于Windows应用程序的开发。
在职高一年级学习VB时，需要掌握以下知识点：一、VB环境搭建了解VB的开发环境，在Windows操作系统上安装VB开发工具，如Visual Studio等。
二、VB程序基本结构1. 模块（Module）：VB程序的最小执行单位，包含函数和子程序。
2. 过程（Procedure）：程序中的一个特定的代码段，可供其他部分调用和执行。
3. 变量（Variable）：用于存储数据的存储单元。
4. 控件（Control）：用于与用户交互的界面元素。
三、VB语法基础1. 变量和数据类型：- 定义变量的规则和常用数据类型，如整数、浮点数、字符串等。
- 变量的声明、初始化和赋值。
2. 运算符和表达式：- 常用的算术运算符（加、减、乘、除等）和逻辑运算符。
- 条件表达式、循环表达式和运算符优先级。
3. 控制流程：- 分支结构（if-else语句、选择性结构）和循环结构（for循环、while循环）的使用。
- 跳转语句（跳出循环、跳转到指定过程等）。
4. 函数和过程：- 创建和调用函数和子程序，传递参数和返回值。
- 内置函数和自定义函数的使用。
四、VB图形界面设计1. 窗体设计：- 创建窗体、设置窗体属性和布局。
- 添加和编辑控件，如文本框、按钮、标签等。
2. 事件处理：- 响应控件的各种事件，如鼠标点击、键盘按下等。
- 编写事件处理程序，实现事件与代码的关联。
3. 调试与发布：- 调试程序，查找和修复错误。
- 发布程序，生成可执行文件或安装包。
五、VB数据库编程1. 数据库连接：- 连接数据库，如Access、SQL Server等。
- 设置连接字符串和连接属性。
2. 数据操作：- 执行SQL语句，如查询、插入、更新和删除数据。
- 使用或其他数据访问技术进行数据操作。
3. 数据绑定：- 将数据库中的数据绑定到控件，实现数据的展示和交互。
VB语句——赋值、选择
开始 N 表达式1为true？ Y 表达式2为trN 表达式3为true？ Y 语句3 N Else? Y 语句0
多分支结构
结束
多分支
块 If语句 If 条件表达式1 Then 语句块1 ElseIf 条件表达式2 Then 语句块2 …… ElseIf 条件表达式n Then 语句块n Else 语句块 0 End If
VB基本语句
1.赋值语句 2.选择语句
3.循环语句
开始
Y 表达式是否为true？ (周一不下雨？)
语句1 (升国旗)
N
结束
单分支结构
单分支结构
If 条件表达式 Then 语句
If 周一不下雨 then 升国旗
If 条件表达式 then 语句 End If
If 周一不下雨 then 升国旗 End If
Y
条件？
语句
N
例1 有如下VB程序段： s=2 : k=1 If Not k=s Then s=s+k 该程序段运行后，s的值是（ A） A. 3 B.2 C.1 D.0
练1 “如果a，b中任意一个为0，那么y=y+l”。能实现该功能的VB语 句是（ ） B A．If a=0 And b=0 Then y=y+1 B．If a*b=0 Then y=y+1 C．If a=0,b=0 Then y=y+1 D．If a,b=0 Then y=y+1
a初值为4，b初值为7
c
a
a=4 b=7 c=a a=b b=c
a=4:b=7 c=a : a=b : b=c
a
b
实现变量值的交换
b c
赋值语句
VB语言分支结构
VB语言分支结构VB语言是一种面向对象的编程语言，它具有分支结构的功能，可以根据不同的条件执行不同的代码块。
分支结构允许程序根据不同的条件进行不同的处理，增加了程序的灵活性和可扩展性。
下面将介绍VB语言中的分支结构。
VB语言中的分支结构有三种形式，分别是If语句、Select语句和三目运算符。
首先是If语句，它用于根据条件执行特定的代码块。
If语句有两种形式，分别是单行If语句和多行If语句。
单行If语句只有一条执行语句。
例如：```If condition Then statement```多行If语句有多个执行语句，并且可以使用Else语句和ElseIf语句。
例如：```If condition Thenstatement1statement2ElseIf condition2 Thenstatement4Elsestatement5statement6End If```其中，condition是一个逻辑表达式，如果为True，则执行If语句中的代码块；否则，根据情况执行其他的代码块。
Else语句是可选的，如果所有的条件都不满足，则执行Else语句中的代码块。
接下来是Select语句，它用于根据不同的条件执行不同的代码块。
Select语句有多个Case语句，每个Case语句后面可以跟多个执行语句。
例如：```Select Case expressionCase value1statement1statement2Case value2statement3Case Elsestatement5statement6End Select```其中，expression是一个表达式，根据它的值来选择执行相应的代码块。
如果expression的值和一些Case语句中的value相等，则执行该Case语句中的代码块。
如果所有的Case语句都不满足，则执行Case Else语句中的代码块。
最后是三目运算符，它是一个简洁的分支结构形式。
VB中的IF语句
用来解决有关选择 结构的问题。
VB中的选择语句 ——IF语句
选择结构与选择语句
if 条件 then 语句A end if
If和end if 要成对出现
if
条件 then 语句A else 语句B end if
例1：输入一个数到变量a，输出它的绝对值（不用绝对值
函数）
a = inputbox("")
分支嵌套——双分支嵌套双分支
条件1 then 语句1 elseif 条件2 then 语句2 else 语句3 end if end if if
分 支 结 构 1
分 支 结 构 2
注意：每一层的end if结束本层判断。
练习2：
购买地铁车票，若乘1—4站，3元/位；若乘5—9 站，4元/位；若乘10站以上，5元/位；输入人数 person、站数n，输出应付款pay。
4．有如下VB程序段： Private Sub Command1_Click() a ＝ 3: b ＝ 4: c ＝ 5 If a >＝ b And a >＝ c Then Max ＝ a ElseIf b >＝ c Then Max ＝ b Else Max ＝ c End If End Sub 该程序运行后，整数型变量max的值为 A．0 B．3 C．4
(
)
C
8．某景区针对门票的销售编写了如下VB程序代码： Private Sub Command1_Click() m ＝ InputBox("请输入身高") If m <＝ 120 Then Label1.Caption ＝ "免票" ElseIf m <＝ 150 Then Label1.Caption ＝ "半价票" Else Label1.Caption ＝ "全价票" End If End Sub 运行程序，单击命令按钮Command1，若在出现的对话框中输 半价票 入“125”，在标签Label1上显示的内容是___________________ 。
VB编程序的基本结构
双分支结构练习
例: 计算当 0<x<10时，y=x，否则 y=100 ,正确的语句 是_____。 A. If 0<x<10 then y=x else y=100 B. If 0<x and x<10 then y=x
else y=100
C. If 0<x and x<10 then y=x else y=100 D. If 0<x or x<10 then y=x else y=100
b
3
t
也可改写成行IF语句，如下所示，
If b > a Then t = a ： a = b： b = t
双分支结构
多行形式 If 表达式 Else Then
T Then 语句块1
If
表达式
语句块1
语句块2
F Else 语句块2
End If
If 表达式
单行形式
Then 语句块1 Else 语句块2 当表达式的值为True时，执行Then后面的语句块1，否则执行 Else后面的语句块2
注意： • 变量的类型或表达式的结果 必须为数值或字符串。 • 对于多个变量进行条件判断 时，不能使用select case语句， 只能使用IF 语句
表达式列表 i 必须与 “变量或表达式”的类型相同 1.表达式 例: “A“ 2.表达式1 To 例：60 To 100 3. Is 例： 5 表达式2
Dim Number%
Number = Val(InputBox("输入整数")) Select Case Number Case 1 To 5 ' 范围为[1,5] Msgbox( "Between 1 and 5“)
模块的类型
模块的类型：1、类模块 2、标准模块 3、将宏转换为模块创建模块：一、在模块中加入过程1、Sub过程可以用call调用2、Function过程不可以用call调用直接引用函数过程名。
二、在模块中执行宏Docmd.RunMacromacroName[,repeatCount][,repeatExp ression]VBA程序设计基础一、面向对象程序设计的基本概念1、对象和集合2、属性和方法3、事件和事件过程二、visual basic编辑环境三、数据类型和数据库对象1、标准数据类型A、布尔型数据true -1 false 0B、日期型数据必须前后用#C、变体类型数据VBA中没有规定数据类型则默认为变体数据2、用户定义的数据类型type…and type3、数据库对象四、变量与常量1、变量的声明A显示声明Dim…[As<VarType>]B隐含声明Dim m，n 、’m,n为变体Variant变量2、强制声明option explicit3、变量的作用域A局部范围B 模块范围C 全局范围4、数据库对象变量！分隔开对象名称和控件名称对象名称有空格或标点符号用方括号5、数组用Dim定义数组缺省0~下标上限用to则非0下限Dim newArray（5，5，5）As Integer 6*6*6=216 Global 或Dim说明动态数组为全局的和模块级的范围，如Static取代Dim说明数组，则在程序运行的时候保留上次运行的值。
6、变量标识命名法则表Tbl 查询Qry 窗体Frm……7、符号常量Const来定义8、系统常量五、常用标准函数1、算数函数2、字符串函数A 字符串检索函数InStrB字符串长度检测函数LenC字符串截取函数left right midD生成空格字符函数spaceE大小写转换函数Ucase LcaseF删除空格函数3、日期/时间函数A获取系统日期和时间函数Date（）Time（）Now（）返回当前系统日期B截取日期份量函数Year/Month/Day/Weekday（<表达式>）C截取时间分量函数Hour/Minute/Second(<表达式>)D日期/时间增加或减少一个时间间隔DateAddE计算两个日期的间隔值函数DateDiff F返回日期指定时间部分函数DatePart G返回包含指定年月日的日期函数DateSerial4、类型转换函数A字符串转换字符代码函数AscB字符代码转换字符函数ChrC数字转换成字符串函数StrD字符串转换成数字函数ValE字符串转换日期函数DateValueF Nz函数Nz六、运算符和表达式1、运算符A、算术运算符*/ \Mod……B、关系运算符=><>=<=C、逻辑运算符And Or NotD、连接运算符& +2、表达式和优先级true -1 false 0 VBA流程控制语句一、赋值语句[Let]变量名=值或表达式二、条件语句1、If—Then语句（单分支结构）2、If—Then—Else语句（双分支结构）3、If—Then—Elself语句（多分支结构）4、Select Case—End Select语句表达式的值用逗号隔开 To表示两个数值的范围 Is接关系运算符5、条件函数 IIf函数根据条件决定函数返回值 Switch函数根据条件式来返回选项列表的某个值Choose函数根据索引式的值来返回选项列表的某个值三、循环语句1、For—Next语句执行特定次数循环次数=（终值-初值+1）/步长2、Do While—Loop语句结果为真，持续到条件式为假3、Do Until—Loop语句条件值为假，重复执行到条件式值为真4、Do—Loop While语句5、Do—Loop Until6、While—Wend语句四、其他语句——标号和GoTo语句五、过程调用和参数传递1、过程调用A、子过程的定义和调用Sub Public关键字可使用所用模块中所有其他过程Private关键字可使该子过程只适用于同一模块中的其他过程B、函数过程的定义和调用Function 定义一个新函数过程、接受的函数、返回的变量、运行该函数过程的代码2、参数传递ByVal单向ByRef 双向六、VBA程序运行错误处理On Error GoTo 标号On Error Resume Next 遇到错误发生时不会考虑错误，并继续执行下一条语句On Error GoTo 0 用于关闭错误处理七、程序的调试：设置断点、单步跟踪、设置监视窗口1、断点概念2、调试工具的使用中断工具钮本地窗口工具钮会自动显示所在当前过程中的变量声明和变量值立即窗口工具钮在中断模式下安排一些调试语句监视窗口工具钮监视窗口区会弹出快捷菜单，了解一些变量或表达式的变化情况快速监视工具钮快速观察到该变量或表达式的当前值。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
本框 Text1 中输入数据 60，在文本框 Text2 中输入数据 178，
单击命令按钮 Command1 后，文本框 Text3 中显示的内容是
（）
Private Sub Command1_Click( )
Dim t As Integer, h As integer
Dim ans as integer
运算
8
非 not
9
与 and
10 或 or
表达式
Not(3>2) (25>=10)and(25<=100)
(25>100)or(25<2)
Hale Waihona Puke 结果FALSE TRUE FALSE
算术运算符：
注意事项：
①、在数学中，乘号可省略；但在 VB 语句中，乘号*不允许省
略
②、在求余的时候，若参加的运算数有负号，先取绝对值，结
C、x Mod 5 = 0
D、x Mod 2 = 0
19、下列程序段运行后,m 的值为( )
A=2: b=1: c=5
If A < b Then m = A Else m = b
If c < m Then m = c
选项：
A、1
B、2
C、5
D、提示错误，无答案
20、下列 VB 语句中，正确的是（ ）
A. 3、 4.6、3
B. 4.6、 4、 5
C. 4、 4、 5
D. 4.6、 4、 3
2.表达式-10/3、 -10\3、 10 Mod （-3）的运算结果分别是
______。
A. -3、 -3.333、3
B. -3.333、 -3、 -2
C. -4、 -4、 -3.333 D. -3.333、 -3、 1
b=a+1
c=a+b
它的基本结构属于（
）
A、顺序结构 B、选择结构 C、循环结构 D、树型结构
14、下列 VB 程序运行后，变量 x 的值为(
).
x=2
Print x+l
Print x+2
A、2
B、3
C、5
D、8
15、以下是一段 Visual Basic 程序:
If I=1 Then
X=X+1
Else
8、语句 i=i+1 的正确含义是：
A.变量 i 与 i+1 的值相等
B.将变量 i 的值赋到 i+1 中
C.将变量 i 的值加 1 后赋值给变量 I D.变量 i 的值为 1
9、下列语句中正确的是：
A.txt3.Text=txt1.Text+txt2.Text
=cmdOK
A、 z 是 a 的倍数，但不是 b 的倍数
B、 z 既是 a 的倍数，又是 b 的倍数
C、 z 是 a 的倍数或者是 b 的倍数
D、 z 既不是 a 的倍数，也不是 b 的倍数
3、 将数学表达式 Y=写成 VB 表达式，正确的是：
A、y=x^2+1/Abs(x)+3
B、y=(x^2+1)/(Sqr(x)+3)
5、设 A=7.5，B=2,C=-3.6，表达式
A>B And C<A Or Not C>B And A<C 的值是：
A、True B、False C、-1 D、1
6、下列赋值语句正确的是：
A.a+b=5 B.a=a2+3 c.a2+3=a D.a-b=a+b
7 表达式 a+5<a 是：
A.非法表达式 B.字符串表达式 C.关系表达式 D.逻辑表达式
能的 VB 语句是（ ）
A．If a=0 And b=0 Then y=y+1 B．If a*b=0 Then
y=y+1
C．If a=0,b=0 Then y=y+1
D．If a,b=0 Then
y=y+1
23、小明在大街上经常看见一种测量身高体重并提示肥瘦的机
器，很感兴趣，就在 VB 中编写了如下程序，程序运行时，在文
VB 基本运算、表达式、赋值语句与分支结构
1、 算术运算符
优先 基本运算 运算 表达式
级别
符号
1
乘幂
^
2^3
2
取负
-
-a
3
乘法
*
3 实数除法 /
3*2.5 5/2
4 整数除法 \
5\2
5
求余数 mod 5mod2
6
加法
+
a+b
6
减法
-
A-b
结果
8 a 的相反值
7.5 2.5 2 1 a 与 b 的和 a 与 b 的差
Dim x As Integer
x=Val(Text1. Text)
If ____ = 0 Then
Labell.Caption=这个数是能被 5 整除的偶数
Else
Labell.Caption=这个数不是能被 5 整除的偶数
End If
选项：
A、(x Mod 5) = 0 And (x Mod 2 ) = 0 B、x Mod 10 = 0
关系运算符
关系运算符用来比较两个运算量之间的关系，关系表达式的运
算结果为逻辑型。若关系成立，结果为 True，若关系不成立，
结果为 False。
注意：
（1）当两个操作式均为数值型，按数值大小比较；
（2）字符串比较,则按字符的 ASCII 码值从左到右一一比较,直
到出现不同的字符为止；
逻辑运算符：
Not 计算结果与原始数据的逻辑值相反
Dim xs as single
t = Val(Text1.Text)
h = Val(Text2.Text)
xs=t^2/h
If xs<18 Then
Ans="偏瘦"
Elseif xs<=25 then
Ans="正常"
Else
Ans="肥胖"
Endif
Text3.Text =Ans
End Sub
A.偏瘦
果的符号与被除数相同
③、+（连接运算）：两个操作数均为字符串类型；
&（连接运算）：两个操作数既可为字符型也可为数值型。
例如："a"+"b"是合法的，而 "a"+2 是错误的
"a" & "b"是合法的，而"a" & 2 也是合法的
练一练：
1.表达式 23/5、 23\5、 23 Mod 5 的运算结果分别是_______。
bel1.Caption=1234
mand1.Caption=45*12
10、对应 VB 语句 If i=1 Then j=1,下列说法正确的是：
A.i=1 和 j=1 均为赋值语句
B.i=1 和 j=1 均为关系表达式
C.i=1 为关系表达式，j=1 为赋值语句
D.i=1 为赋值语句，j=1 为关系表达式
C、①输人的数存人 n 变量②如果 n/2=Int(n/2)成立，就显示 n
中值
D、①输人的数存人 n 变量②如果 n/2=Int(n/2)不成立，就显
示 n 中值
18、下面是判断变量 x 是不是能被 5 整除的偶数的程序，横线
上的逻辑表达式应为( )
Private Sub commandl_Click()
语句块 1 ElseIf 条件表达式 2 Then
语句块 2 ……… ElseIf 条件表达式 n Then
语句块 n Else
语句块 0 End If 块 If 语句的 ElseIf 语句部分和 Else 语句部分是可选的。
选择题：
1、在 VB 中，已知 z、a、b 均为正整数，当逻辑表达式
(z Mod a=0) And (z Mod b=0)为真时，则表示：
C、y=(x^2+1)/(Abs(x)+3) D、y=x^2+1/Sqr(x)+3
4、在 VB 中，若 a、b 都是大于 0 的整数，且
关系表达式（a+b）Mod 2=1，则下列说法正确的是：
A、a、b 一定同时为奇数
B、a、b 一定同时为偶数
C、a、b 中必是一个为偶数，另一个为奇数
D、以上说法都不对
11、有如下程序段运行后，a 的值为：
a=5:b=2:a=a-b:b=a+b:a=b-a
A.2
B.3
c.4
D.5
12、有如下程序段运行后，y 的值是：
X=6:y=-10
If Not x>0 Then x=y-5 Else y=x+4
A.10
B.-10
c.15
D.-15
13、以下是一段 VB 程序：
a=1
2、同级别的运算，按照从左到右的顺序执行
3、遇到括号，先进行括号内的运算
注意：在 VB 中，括号只以()形式存在，可以多次嵌套，按照由
内向外顺序执行
练一练：
1、求下列表达式的值
(1)Sqr（256）/4-2^2 MOD 5\2
(2)（-7）mod Int（3.5）+2^3/4\5
(3)7mod (-3)+2^3/4\5
A．x=|x-y|
B．loop=y+1
C．If 5>8x>0 Then s=y
D．a(i)=a(i)+a(i+1)