VB基础教程：第三章第三节VB的公共函数
- 格式：doc
- 大小：38.50 KB
- 文档页数：18
下载文档原格式
合集下载
第三章 VB 语言基础
只有两个值True或False 代表真或假 如：1>4为False 40<100为True
1、基本数据类型
货币型：Currency
表示钱款，精确到小数点后4位 如：12.02, 1.27
1、基本数据类型
日期型：Date
表示100/1/1至9999/12/31的日期和时间，必 须用#号括起来。 如： #1999/01/01# #2007/3/18 12:00:00#
2、数值常量
货币型常数
货币数据类型是为表示钱款而设臵的。 精确到小数点后4位(小数点前有15位) 。
如：23.03@
2、数值常量
浮点数（实数）
单精度实型（Single）,双精度实型（Double） 1）十进制小数形式： 例如0.123、.123、122.0、123！、123#等 2）指数形式： 例如1.25E+3 和 1.25D+3, 相当于1250.0 或者 1.25×103
乘，除（浮点）x*y，5/3=1.66666667 取余数（模
4+6
算术运算符的优先级
高 ^ 指数
*，/
1、优先级是运算的 先后次序。 取负 2、同级，从左到右。 乘，除（浮点） 3、先计算括号内
\
Mod 低 +，-
整数除
取余数（模） 加法，减法 3+5*6/（1+2）
[Public | Private] Enum类型名称 成员名[＝常数表达式] 成员名[＝常数表达式] End Enum [] 内的参量为可选参量
三 运算符和表达式
运算符对操作数(常量,变量,函数值)的运算,组
成了表达式 运算符的定义与数学上不完全一致 哪个运算符先运算的问题就是优先级 x = 8*Count+2,x = Sum/Count (算术) 如果 x>=10 ,打印x (关系) 如果 (I>0) And (I<100),打印I (逻辑)
VB中的常用函数
VB中的常用函数1 VB中常用的函数和语句一、Val 函数返回包含于字符串内的数字，字符串中是一个适当类型的数值。
语法Val(string)必要的string 参数可以是任何有效的字符串表达式.说明Val 函数，在它不能识别为数字的第一个字符上，停止读入字符串。
那些被认为是数值的一部分的符号和字符，例如美圆号与逗号，都不能被识别。
但是函数可以识别进位制符号&O （八进制）和&H（十六进制）。
空白、制表符和换行符都从参数中被去掉。
下面的返回值为1615198：Val(" 1615 198th Street N.E.")在下面的代码中，Val 为所示的十六进制数值返回十进制数值-1。
Val("&HFFFF")注意Val 函数只会将句点（.）当成一个可用的小数点分隔符。
当使用不同的小数点分隔符时，如在国际版应用程序中，代之以CDbl 来把字符串转换为数字。
'=====================================Val 函数示例本示例使用Val 函数返回字符串中所含的数值。
Dim MyValueMyValue = Val("2457") ' 返回2457。
MyValue = Val(" 2 45 7") ' 返回2457。
MyValue = Val("24 and 57") ' 返回24。
参考资料：MSDN VB参考二、Str 函数返回代表一数值的Variant (String)。
语法Str(number)必要的number 参数为一Long，其中可包含任何有效的数值表达式。
说明当一数字转成字符串时，总会在前头保留一空位来表示正负。
如果number 为正，返回的字符串包含一前导空格暗示有一正号。
使用Format 函数可将数值转成必要的格式，如日期、时间、货币或其他用户自定义格式。
VB学习指导
VB学习指导第一章 Visual Basic 概述一、知识点1．基本概念（1）对象（2）对象类（3）实例（4）窗体（5）控件（6）属性（7）方法（8）事件VB 集成开发环境（IDE）2．基本理论（1）面向对象的程序设计方法（2）事件驱动方式的程序设计原理3．主要操作流程（1）创建应用程序的一般步骤（2）VB 集成开发环境的基本操作–创建一个新工程二、要点、难点1．对象的实例化2．对象的属性、方法、事件3．事件驱动4．创建、打开和保存窗体文件和工程文件三、例题1．例：VB 是面向___________ 的程序设计语言：A．过程B．工程C．事件D．对象正确答案：D解释：传统的结构化语言都是采用面向过程的编程方法来解决问题，其中最主要的缺陷就是程序的可维护性差。
面向对象编程（OOP：Object Oriented Programming）则将数据和处理数据的代码封装到一个类中，类的实例就是对象。
面向对象的编程方法有三个优点①程序易于阅读；②程序易于修改；③对象能重复使用多次。
VB 支持OOP ，并且运用OOP 的方法将代码和数据封装起来形成一个个可视的图形对象（如窗体和控件等），使对象成为有形的实在的东西。
2．例：一个对象可以执行的动作与可被一个对象所识别的动作分别称为________。
A．事件、方法B．方法、事件C．属性、方法D．过程、事件正确答案：B解释：方法指对象可以进行的动作或行为。
通过“方法”，可使对象以指定的方式去做某种动作或改变行为。
VB程序中每个窗体或控件对象都具有若干可改变其行为或实现某个特定动作（操作）的方法。
例如，窗体可被“显示”或被“隐藏”。
事件是指由系统预先设置好的，能被对象识别的动作，如单击鼠标、移动鼠标、按下键盘上的某个键。
四、习题1．VB 的使用目的是_________。
A．开发Windows应用程序B．图像处理C．制作W A V文件D．文字处理2．对象的_________确定当一个事件发生时执行代码。
VB基础语法
使用static声明变量 使用static声明变量 static 变量名 as 数据类型 static a as integer 使用static声明变量为静态变量。它与dim声明的变量不同之处 使用static声明变量为静态变量。它与dim声明的变量不同之处 在于在执行一个过程结束时，过程中所用到的static变量的值会 在于在执行一个过程结束时，过程中所用到的static变量的值会 保留，下次再调用此过程时，变量的初值是上次调用结束时被子 保存留的值，而dim 保存留的值，而dim 声明的变量在过程结束时不保留，每次调用 时需要重新初始化。 3.3 运算符和表达式 算术运算符 + * / \（整除） mod ^ 关系运算符 = > >= < <= <> 逻辑运算符 not and or xor(逻辑异或） eqv(逻辑等于） xor(逻辑异或） eqv(逻辑等于）
3.5 以对象为核心的程序设计 在VB的程序设计中，对象起着最重要的角色，窗体是一个对象， VB的程序设计中，对象起着最重要的角色，窗体是一个对象， 每一个放置在窗体上控件也都是对象。由于VB是面向对象的程序 每一个放置在窗体上控件也都是对象。由于VB是面向对象的程序 设计语言，它的代码结构与对象有着很大关系，在VB中每一 设计语言，它的代码结构与对象有着很大关系，在VB中每一 个窗体和控件都有一些预先定义好了的事件。 例：命令按钮对象，当用户单击命令按钮时，命令按钮对象会产 生click事件。 click事件。
currency
逻辑类型 boolean 逻辑型变量的取值范围只能是true(-1)或false(0)。 逻辑型变量的取值范围只能是true(-1)或false(0)。 Dim switch as boolean switch=true switch=switch=-1 这两条赋值语句功能是相同。 这两条赋值语句功能是相同。 变体类型 variant 变体型变量是一种十分灵活的变量，可以保存各种类型 的数据。 在定义变量中没有明确指明数据类型时，变量缺省时定义为变体 类型。 dim x dim y as variant 上述两个语句都是定义一个变体变量。
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知识点总结大全第一章VB入门（*）1.2.2 主窗口1．标题栏三种工作模式（1）设计模式：可进行界面设计、代码编制（2）运行模式：不可编辑界面、代码（3）中断模式：不可编辑界面，可以编辑代码2．菜单栏3．工具栏1.2.3 设计窗口1．窗体设计窗口2．代码设计窗口（1）打开方式：1.单击菜单栏的视图——选择代码窗口2.双击窗体、控件3.单击工程资源管理器窗口的“查看代码”（2）主要内容1.对象列表框：显示所选对象的名称。
列出窗体所有可用的对象名。
2.过程列表框：列出所有对象列表框中对象的事件过程或自定义过程的名称。
1.2.4属性窗口由四部分组成：1.对象列表框2.属性排列方式：按字母排列、按分类排列3.属性列表框：左边为属性名，右边为相应的属性值4.属性含义说明：显示所选属性的含义1.2.5 工程资源管理器窗口（1）3个按钮1.“查看代码”：切换到代码窗口，显示和编辑代码2.“查看对象”：切换到窗体窗口，显示和编辑对象3.“切换文件夹”：切换到文件夹显示方式（2）包含两种类型的文件1.窗体文件（.frm文件）：储存窗体上所有控件对象和有关的属性、对象相应的事件过程、程序代码。
2.标准模块文件（.bas文件）：储存所有模块级变量和用户定义的通用过程，该类型可选。
1.2.6 工具箱窗口一般由21个按钮形式的图标构成。
除指针外的20个为标准控件（指针不是控件），每个也是一个类。
如：文本类、图形类等。
1.3.1 建立一个应用程序的步骤1.建立用户界面的对象2.对象属性的设置3.创建对象事件过程及编程4.运行和调试程序5.保存程序和生成可执行文件1.3.2 VB程序结构和编码规则1.程序结构（1）最上面为通用声明段，主要编写模块级以上的变量声明、Option选项的设置等。
（2）以下为程序代码的块结构，也就是事件过程或自定义过程，这构成程序的主体。
块的先后次序与程序执行次序无关。
2.编码规则（1）代码不区分字母的大小写（2）语句书写自由1.同一行可书写多个语句，语句间用冒号分隔2.一个语句可分多行写，要在本行末加续行符“-”（空格和下划线）（3）为了程序的阅读、维护和调试，可加注释1.一般用’(撇号)注释内容2.也可使用工具栏的文本编辑器中的注释第二章可视化编程基础（***）2.1.2 类和象1.对象：具体的控件或窗体等都是对象。
2VB基本语言表达式函数
表达式执行的顺序
算术运算 字符串运算 比较运算 逻辑运算
23
指数(^)
取负(-) 乘、除(*、/) 整除( \ ) 取模(Mod) 加减(+、-)
连接&、+
相等=
不等<>
Not
And
小于<
大于> 不大于<= 不小于>= Like Is
Or
Xor Eqr Imp
例：用人单位招聘秘书：年龄小于40岁，女性，学历专科或本科 年龄<=39 性别=“女” (学历=“专科” 学历=“本科 And And Or ”)
24
例：表示算术表达式：
3 x 7
或 3<=x Or x<=7
a 小数 b 大数
正确的VB表达式： 3<=x And x <=7 错误的VB表达式： 3<=x<=7
比a小，比b大 ：用 Or
比a大，比b小 ：用 And
a 小数
b 大数
25
写出下列算式的表达式：
cos (c d )
2
(Cos (c+d))^2 5^2+3*(7-2*b)^(1/2) 2*a^(1/2)/((7+b)*(4-c))
Object Variant
5
3.3 变量与常量
一.变量和常量的命名规则 变量：在程序运行中其存储的值可以改变。 常量：在程运行中其值不可以改变。 命名 规则： 1.以字母或汉字开头，后可跟字母、数字或下划线组 成，长度小于等于255个字符； 2.不能使用VB中的关键字； 3.VB中不区分变量名的大小写. 4.为了增加程序的可读性，可在变量名前加一个缩写的前缀来 表明该变量的数据类型。
第三章 VB基本语法
必须为常数
Dim a（10） As Integer
2、多维数组
如：student.strname表示学生姓名
3.3 变量与常量 命名规则： （1）必须以字母或汉字开头，由字母、汉字、 数字或下划线组成，长度小于255个字符； （2）不能用VB中关键字； （3）不区分大小写字母； （4）最好在变量名前加可以用来表明变量数据 类型的前缀。
1、变量： 在程序运行的过程中可以变化的量。 声明方式： （1）用Dim语句 Dim 变量名 [As 类型] 注意： 若省略“As 类型”，则为变体类 型 变量名后可以加类型符来代替“As 类型” 一条Dim语句可以同时定义多个变量。
5、Select Case语句（情况语句）
Select Case 变量或表达式 Case 表达式列表1 语句块1 语句块2 · · · · · · · · · · · · · · [Case Else 语句块n+1] End Select
可以是数值 型或字符型
用逗号分隔的枚举表达式；
Байду номын сангаас
Case 表达式列表2 表达式1 To 表达式2； Is 关系运算符表达式。
所有的变量都具有数据类型，变量的数据类型 决定了如何把变量的值存储到计算机的内存中。 3.2.1 标准数据类型 3.2.2 自定义类型 定义正确数据类型的意义： 1、减少错误发生
2、节省内存
1、数值数据类型
Visual Basic 的数值型数据分为整型数和浮点数 两类。其中整型数又分为整数和长整数，浮点 数分为单精度浮点数和双精度浮点数。 （1）整型数（integer)： 不带小数点和指数符号的数。
Else
<语句块2>
语句块1
Dim a（10） As Integer
2、多维数组
如：student.strname表示学生姓名
3.3 变量与常量 命名规则： （1）必须以字母或汉字开头，由字母、汉字、 数字或下划线组成，长度小于255个字符； （2）不能用VB中关键字； （3）不区分大小写字母； （4）最好在变量名前加可以用来表明变量数据 类型的前缀。
1、变量： 在程序运行的过程中可以变化的量。 声明方式： （1）用Dim语句 Dim 变量名 [As 类型] 注意： 若省略“As 类型”，则为变体类 型 变量名后可以加类型符来代替“As 类型” 一条Dim语句可以同时定义多个变量。
5、Select Case语句（情况语句）
Select Case 变量或表达式 Case 表达式列表1 语句块1 语句块2 · · · · · · · · · · · · · · [Case Else 语句块n+1] End Select
可以是数值 型或字符型
用逗号分隔的枚举表达式；
Байду номын сангаас
Case 表达式列表2 表达式1 To 表达式2； Is 关系运算符表达式。
所有的变量都具有数据类型，变量的数据类型 决定了如何把变量的值存储到计算机的内存中。 3.2.1 标准数据类型 3.2.2 自定义类型 定义正确数据类型的意义： 1、减少错误发生
2、节省内存
1、数值数据类型
Visual Basic 的数值型数据分为整型数和浮点数 两类。其中整型数又分为整数和长整数，浮点 数分为单精度浮点数和双精度浮点数。 （1）整型数（integer)： 不带小数点和指数符号的数。
Else
<语句块2>
语句块1
第三章VB语言基础
11
5 可变（Variant）类型数据 是一种可变的数据类型，可以表示任何值 包括数值、字符串、日期/时间等 当把它们赋予Variant型时，不必在这些数据的类型间进 行转换，VB会自动完成任何必要的转换。 要尽量少用Variant数据类型，以避免发生错误 6 对象（Object）型数据 Object型数据可用来表示应用程序中或某些其他应用 程序中的对象。表示图形或OLE对象或其他控件对象 可以用Set语句指定一个被声明为Object的变量去引用应 用程序所识别的任何实际对象。 Private Sub Form_Click() Dim objDb As Object Set objDb = Command1 objDb.Caption = "FHDDGF" 12 End Sub
本章目录
17
(2)也可以用常用的类型说明符来定义:
整型 : % 例: 长整型 : & Dim a as integer Dim a% 单精度: ! Dim B as integer,stname as string 双精度: # 货币型: @ Dim B%,stname$ 字符型: $ 例：设有如下语句：关于这段代码的叙述中，错误的是 Dim a，b As Integer c=―VisualBasic‖ d=#7／20／2005# A．a被定义为Integer类型变量 B．b被定义为Integer类型变量 C．c中的数据是字符串 D．d中的数据是日期类型
22
(3) 强制显式声明 良好的编程习惯都应该是“先声明变量，后使用变量”， 这样做可以提高程序的效率，同时也使程序易于调试。 Visual Basic 中可以强制显式声明，可以在窗体模块、 标准模块和类模块的通用声明段中加入语句: Option Explicit 使用Option Explicit语句，程序中如果存在未声明的变 量，运行时则给出“变量未定义”的错误信息。 例： Option Explicit Private Sub Form_Click() Sum = 0 a = 10: b = 20 Sum = a + b Print "Sum="; Sum End Sub
5 可变（Variant）类型数据 是一种可变的数据类型，可以表示任何值 包括数值、字符串、日期/时间等 当把它们赋予Variant型时，不必在这些数据的类型间进 行转换，VB会自动完成任何必要的转换。 要尽量少用Variant数据类型，以避免发生错误 6 对象（Object）型数据 Object型数据可用来表示应用程序中或某些其他应用 程序中的对象。表示图形或OLE对象或其他控件对象 可以用Set语句指定一个被声明为Object的变量去引用应 用程序所识别的任何实际对象。 Private Sub Form_Click() Dim objDb As Object Set objDb = Command1 objDb.Caption = "FHDDGF" 12 End Sub
本章目录
17
(2)也可以用常用的类型说明符来定义:
整型 : % 例: 长整型 : & Dim a as integer Dim a% 单精度: ! Dim B as integer,stname as string 双精度: # 货币型: @ Dim B%,stname$ 字符型: $ 例：设有如下语句：关于这段代码的叙述中，错误的是 Dim a，b As Integer c=―VisualBasic‖ d=#7／20／2005# A．a被定义为Integer类型变量 B．b被定义为Integer类型变量 C．c中的数据是字符串 D．d中的数据是日期类型
22
(3) 强制显式声明 良好的编程习惯都应该是“先声明变量，后使用变量”， 这样做可以提高程序的效率，同时也使程序易于调试。 Visual Basic 中可以强制显式声明，可以在窗体模块、 标准模块和类模块的通用声明段中加入语句: Option Explicit 使用Option Explicit语句，程序中如果存在未声明的变 量，运行时则给出“变量未定义”的错误信息。 例： Option Explicit Private Sub Form_Click() Sum = 0 a = 10: b = 20 Sum = a + b Print "Sum="; Sum End Sub
VB常用函数
3.3VB的公共函数
1.数学函数
VB中常用的数学函数
2.字符函数
（1）字符串编码
在Windows采用的DBCS（Double B yte Character Set）编码方案中，一个汉字在计算机内存中占2个字节，一个西文字符（ASCII码）占1个字节，但在VB 中采用的是Unicode（ISO字符标准）来存储字符的，所有字符都占2个字节。
为方便使用，可以用StrConv函数来对Unicode 与DBCS进行转换，可以用函数Len（）函数求字符串的字符数，用LenB（）函数求字符串的字节数。
（2）常用的字符串函数
3.日期与时间函数
常用的日期与时间函数
增减日期函数：DateAdd（要增减日期形式，增减量，要增减的日期变量）例：计算期末考试日期：DateAdd("ww",15,#2002/3/19#)求日期之差函数：DateDiff（要间隔日期形式，日期一，日期二）例：计算距毕业天数：DateDiff("d", Now, #2005/6/30#)日期形式
4.转换函数。
VB程序设计3VisualBasic语言基础
• 使用Dim语句声明变量时，系统自动给该变量赋一 个初值。若为数值型，则值为0；若为字符串型， 则值为空串;若为布尔型，则值为False。
VB程序设计3VisualBasic语言基础
28
窗体模块
Dim a1 As Integer 窗体级变量，在该窗体内有效 Public b1 As Integer 全局变量，在工程内有效
• 货币型（Currency）
– 货币数据类型是为表示钱款而设置的。该类 型数据以8个字节存储，精确到小数点后四 位，小数点前有15位，小数点后4位以后的 数字将被舍去。
– 浮点数中的小数点是“浮动”的，而货币类型 数据的小数点是固定的。
• 变体型（Variant）
– 变体数据类型是一种可变的数据类型，可以 表示任何值，包括数值、字符串及日期等。
Private Sub CmdOK_Click() Rem 2003年1月编写如下代码
‘若用户单击了确认按钮，则执行下列代码
…………
End Sub
VB程序设计3VisualBasic语言基础
10
3.2 Visual Basic 数据类型
• 整数
– 整数是不带小数点和指数符号的数，在机器内 以二进制补码形式表示。
• 浮点数 – 浮点数也称实型数或实数，是带有小数部分的 数值。它由三部分组成：符号、指数和尾数。 – 单精度型（Single）：以4个字节存储，符号1 位，指数8位，尾数23位，1位隐含位。用E来 表示指数。例如：-9.654E-6 – 双精度型（Double）：以8个字节存储，符号1 位，指数11位，尾数52位，1位隐含位。用D 来表示指数。例如：-8.573264907D-15
• 常量
——在程序中取值始终保持不变的数据， 可以是具体的数值，也可以是专门说明 的符号。（10、PI）
VB程序设计3VisualBasic语言基础
28
窗体模块
Dim a1 As Integer 窗体级变量，在该窗体内有效 Public b1 As Integer 全局变量，在工程内有效
• 货币型（Currency）
– 货币数据类型是为表示钱款而设置的。该类 型数据以8个字节存储，精确到小数点后四 位，小数点前有15位，小数点后4位以后的 数字将被舍去。
– 浮点数中的小数点是“浮动”的，而货币类型 数据的小数点是固定的。
• 变体型（Variant）
– 变体数据类型是一种可变的数据类型，可以 表示任何值，包括数值、字符串及日期等。
Private Sub CmdOK_Click() Rem 2003年1月编写如下代码
‘若用户单击了确认按钮，则执行下列代码
…………
End Sub
VB程序设计3VisualBasic语言基础
10
3.2 Visual Basic 数据类型
• 整数
– 整数是不带小数点和指数符号的数，在机器内 以二进制补码形式表示。
• 浮点数 – 浮点数也称实型数或实数，是带有小数部分的 数值。它由三部分组成：符号、指数和尾数。 – 单精度型（Single）：以4个字节存储，符号1 位，指数8位，尾数23位，1位隐含位。用E来 表示指数。例如：-9.654E-6 – 双精度型（Double）：以8个字节存储，符号1 位，指数11位，尾数52位，1位隐含位。用D 来表示指数。例如：-8.573264907D-15
• 常量
——在程序中取值始终保持不变的数据， 可以是具体的数值，也可以是专门说明 的符号。（10、PI）
VB函数说明及使用方法
b、Lock Shared:任何机器上的任何进程都可以对该文件进行读写操作
c、Lock Read:不允许其他进程读该文件。只在没有其他Read存取类型的进程访问该文件时，才允许这种锁定。
d、Lock Write:不允许其他进程写这个文件。只在没有其他Write存取类型的进程访问该文件时，才允许这种锁定
a、Output:指定顺序输出方式，将覆盖原有内容
b、Input:指定顺序输入方式
c、Append:指定顺序输出方式，在文件未尾追加内容
d、Random:指定随机存取方式，也是默认方式，在Random方式时，如果没有Access子句，则在执行Open语句时，VB将按下列顺序打开文件：读/写、只读、只写
Mid$(字符串,p,n)
从位置p开始取字符串的n个字符
Len(字符串)
测试字符串的长度
String$(n,字符串)
返回由n个字符组成的字符串
Space$(n)
返回n个空格
InStr(字符串1,字符串2)
在字符串1中查找字符串2
Ucase$(字符串)
把小写字母转换为大写字母
Lcase$(字符串)
把大写字母转换为小写字母
MsgBox(msg,[type]…)
跳出一个提示窗口
文本操作函数
1、Open文件名[For方式] [Access存取类型] [锁定] AS [#]文件号[Len=记录长度]
功能：为文件的输入输出分配缓冲区，并确定缓冲区所使用的存取方式
说明：
1)方式：指定文件的输入输出方式，可选,默认是Random,可以是以下值
举例：Open “” for Output as #1
Open “C:\” forradomas #1 len=256
c、Lock Read:不允许其他进程读该文件。只在没有其他Read存取类型的进程访问该文件时，才允许这种锁定。
d、Lock Write:不允许其他进程写这个文件。只在没有其他Write存取类型的进程访问该文件时，才允许这种锁定
a、Output:指定顺序输出方式，将覆盖原有内容
b、Input:指定顺序输入方式
c、Append:指定顺序输出方式，在文件未尾追加内容
d、Random:指定随机存取方式，也是默认方式，在Random方式时，如果没有Access子句，则在执行Open语句时，VB将按下列顺序打开文件：读/写、只读、只写
Mid$(字符串,p,n)
从位置p开始取字符串的n个字符
Len(字符串)
测试字符串的长度
String$(n,字符串)
返回由n个字符组成的字符串
Space$(n)
返回n个空格
InStr(字符串1,字符串2)
在字符串1中查找字符串2
Ucase$(字符串)
把小写字母转换为大写字母
Lcase$(字符串)
把大写字母转换为小写字母
MsgBox(msg,[type]…)
跳出一个提示窗口
文本操作函数
1、Open文件名[For方式] [Access存取类型] [锁定] AS [#]文件号[Len=记录长度]
功能：为文件的输入输出分配缓冲区，并确定缓冲区所使用的存取方式
说明：
1)方式：指定文件的输入输出方式，可选,默认是Random,可以是以下值
举例：Open “” for Output as #1
Open “C:\” forradomas #1 len=256
VB语法基础 (重要)
号来代替该常量，这样不仅在书写上方便，而且有效地改进 了程序的可读性和可维护性。
VB中使用关键字Const 声明符号常量。其格式如下：
Const 常量名 [As 类型|类型符号]=常数表达式 例如：
Const PI#=3.1415926535 等价于：
Const PI As Double=3.1415926535
Private Sub Form_Click() Print "n="; n End Sub
程序运行后单击窗体，其输出结果是什么？
最新课件
19
3.4.2 窗体/模块级变量
窗体/模块级变量： 在“通用声明”段中用Dim语句或用Private语句声
明的变量，可被本窗体/模块的任何过程访问。但其他模 块却不能访问该变量。
最新课件
22
3种变量声明及使用规则如下表：
最新课件
23
3.4.4窗体/模块级变量 与全局变量应用举例
Public Temp As Integer
' 定义全局变量
Private Sub Form_Load()
Temp = 1
' 将全局变量Temp 的值设置成 1
End Sub
Private Sub Command1_Click()
但是当把temp在通用中定义： Dim Temp As Integer ‘ 定义窗体变量 Form2中将不能显示form1.temp
最新课件
25
3.4.5 静态变量
概念
除作用域之外，变量还有存活期，在这一期间变量能 够保持它们的值。
在应用程序的存活期内一直保持模块级变量和全局变 量的值。但是，对于Dim声明的局部变量仅当过程执行期 间存在，当一个过程执行完毕，它的局部变量的值就已经 不存在，而且变量所占据的内存也被释放。当下一次执行 该过程时，它的所有局部变量将重新初始化。
VB中使用关键字Const 声明符号常量。其格式如下：
Const 常量名 [As 类型|类型符号]=常数表达式 例如：
Const PI#=3.1415926535 等价于：
Const PI As Double=3.1415926535
Private Sub Form_Click() Print "n="; n End Sub
程序运行后单击窗体，其输出结果是什么？
最新课件
19
3.4.2 窗体/模块级变量
窗体/模块级变量： 在“通用声明”段中用Dim语句或用Private语句声
明的变量，可被本窗体/模块的任何过程访问。但其他模 块却不能访问该变量。
最新课件
22
3种变量声明及使用规则如下表：
最新课件
23
3.4.4窗体/模块级变量 与全局变量应用举例
Public Temp As Integer
' 定义全局变量
Private Sub Form_Load()
Temp = 1
' 将全局变量Temp 的值设置成 1
End Sub
Private Sub Command1_Click()
但是当把temp在通用中定义： Dim Temp As Integer ‘ 定义窗体变量 Form2中将不能显示form1.temp
最新课件
25
3.4.5 静态变量
概念
除作用域之外，变量还有存活期，在这一期间变量能 够保持它们的值。
在应用程序的存活期内一直保持模块级变量和全局变 量的值。但是，对于Dim声明的局部变量仅当过程执行期 间存在，当一个过程执行完毕，它的局部变量的值就已经 不存在，而且变量所占据的内存也被释放。当下一次执行 该过程时，它的所有局部变量将重新初始化。
VB第3章VB语言基础（类型常变量表达式内部函数语句）
VB第3章VB语言基础（类型常变量表达式内部函数语句）第三章语言基础VB试题班级：________考号：________姓名：________总分：_____第一部分:vb（234分）一、单项选择1、系统符号常量的定义通过（）获得 ( )(2分)A、对象浏览器B、代码窗口C、属性窗口D、工具箱2、函数INT（RND（0）*100）是下列哪个范围内的整数 ( )(2分)A、（0，10）B、（1，100）C、（0，100）D、（1，99）3、以下可以作为VB变量名的是 ( )(2分)A、SINB、CO1C、COS（X）D、X（-1）4、VB表达式INT(-4.8)*6\3^2+FIX(-4.8)的值是_____________________( )(2分)A、0B、-5C、-4D、-65、下列可作为Visual Basic变量名的是 ( )(2分)A、A#AB、4AD、constA6、删除字符串前导和尾随空格的函数是( )(2分)A、Ltrim()B、Rtrim( )C、Trim( )D、Lcase7、在窗体画一个名称为COMMAND1的命令按钮，然后编写如下事件过程private sub command1_click()c=1234c1=trim(str(c))for i = 1 to 4print ________nextend sub程序运行后，单击命令按钮，要求在窗体上显示如下内容：1121231234则在下划线处应填入的内容为( )(2分)A、right(c1,i)B、left(c1,i)C、mid(c1,i,1)D、mid(c1,i,i)8、以下合法的Visual Basic标识符是( )(2分)A、ForLoopB、ConstC、9abc9、在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：Private Sub Command1_Click（)Static X As IntegerStatic Y As IntegerClsY=1Y=Y+5X=5+XPrint X,YEnd Sub程序运行时，三次单击命令按钮Commandl后，窗体上显示的结果为 ( )(2分)A、15 16B、15 6C、15 15D、5 610、下列（）是日期型常量 ( )(2分)A、"2/1/02"B、2/1/02C、#2/1/02#D、|2/1/02|11、要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句( )(2分)A、Option Base 0B、Option ExplicitC、Option Base 1D、Option Compare12、下面可以正确定义2个整型变量和1个字符型变量的语句是( )(2分)A、Dim n, m As Integer, s As StringB、Dim a%, b$, c As StringC、Dim a As Integer, b, c As StringD、Dim x%, y As Integer, z As String13、Rnd函数不可能产生的（）值 ( )(2分)A、0B、1C、0.1234D、0.0000514、设a=4，b=3，c=2，d=1，下列表达式的值是a>b+1 Or c<="" and="" b="" c(="" mod="" p="">A、TrueB、1C、-1D、015、执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是( )(2分)A、VisualB、BasicC、6D、1116、执行如下两条语句，窗体上显示的是a=9.8596Print Format（a,"$00,00.00") ( )(2分)A、0,009.86B、$9.86C、9.86D、$0,009.8617、函数INT（-13.2）的结果为： ( )(2分)A、-13.2B、13.2C、-13D、-1418、不能正确表示条件“两个整型变量A和B之一为0，但不能同时为0”的布尔表达式( )(2分)A、A*B=0 AND A<>BB、（A=0 OR B=0） AND A<>BC、A=0 AND B<>0 OR A<>0 AND B=0D、A*B=0 AND （A=0 OR B=0）19、假设变量BOOLVAR是一个布尔型变量，则下面正确的赋值语句是 ( )(2分)A、BOOLVAR='TRUE'B、BOOLVAR=.TRUE.C、BOOLVAR=#TRUE#D、BOOLVAR=3<420、设有如下变量声明 Dim TestDate As Date 为变量TestDate 正确赋值的表达方式是 ( )(2分)A、T estDate=#1/1/2002#B、TestDate=# "1/1/2002" #C、TestDate=Date("1/1/2002")D、TestDate=Format("m/d/yy", "1/1/2002")21、下列字符串常量中，最大的是( )(2分)A、"北京"B、"上海"C、"天津"D、"广州"22、代数式x1 - | a | + ln10 + sin(x2 + 2л) / cos(57 o)对应的Visual Basic表达式是 ( )(2分)A、X1 - Abs(A) + Log(10) + Sin(X2+2*3.14) /Cos(57*3.14/180)B、X1 - Abs(A) + Log(10) + Sin(X2+2*л) / Cos(57*3.14/180)C、X1 - Abs(A) + Log(10) + Sin(X2+2*3.14) / Cos(57)D、X1 - Abs(A) + Log(10) + Sin(X2+2*л) / Cos(57)23、如果将布尔常量值TRUE赋值给一个整型变量，则整型变量的值为 ( )(2分)A、0B、-1C、TRUED、FALSE24、函数String（n, "str")的功能是 ( )(2分)A、把数值型数据转换为字符串B、返回由n个字符组成的字符串C、从字符串中取出n个字符D、从字符串中第n个字符的位置开始取子字符串25、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)a$="VisualBasic"Print String(3,a$)End Sub程序运行后，单击命令按钮，在窗体上显示的内容是( )(2分)A、VVVB、VisC、sicD、1126、将数学表达式Cos2(a+b)+5e2写成Visual Basic的表达式，其正确的形式是( )(2分)A、Cos(a+b)^2+5*exp(2)B、Cos^2(a+b)+5*exp(2)C、Cos(a+b)^2+5*ln(2)D、Cos^2(a+b)+5*ln(2)27、NULL是指： ( )(2分)A、0B、空格C、未知的值或无任何值D、空字符串28、以下（）程序段可以实施X、Y变量值的变换 ( )(2分)A、Y=X：X=YB、Z=X：Y=Z：X=YC、Z=X：X=Y：Y=ZD、Z=X：W=Y：Y=Z：X=Y29、将任意一个正的两数N的个位数与十位数对换的表达式为( )(2分)A、（N-INT（N/10）*10）*10+INT（N/10）B、N- INT（N/10）*10）*10+INT（N）/10C、INT（N/10）+（N-INT（N/10）D、（N- INT（N/10）*10）*10+INT（N/10）30、设a=2，b=3，c=4，d=5，下列表达式的值是Not a<=c Or 4*c=b^2 And b<>a+c( )(2分)A、-1B、1C、TrueD、False31、表达式25.28 Mod 6.99的值是( )(2分)A、1B、5C、4D、出错32、设A、B、C表示三角形的3条边，表示条件“任意两边之和大于第三边”的布尔表达式可以用（）表示。
VB经典教程-精心整理(快速入门)
Visual Basic对象可以极大简化重复代码的编写，使开发人员 精力集中在程序内容而不是数量庞大的代码上。Visual Basic后续版本增强了该功能，并添加了许多新的面向对 象的编程功能。
VB从入门到实践
1.1.5 数据访问
在现代信息技术高度发达的今天，数据信息已经成为最重要 资源之一。Visual Basic为开发人员提供了强大的数据访 问技术，能够更快捷、更迅速、更高效地存储和读取数据 信息。Visual Basic提供了更为强大功能来支持大中型数 据库，如Oracle、SQL Server、Sybase等。
VB从入门到实践
1.2 Visual Basic 6安装
本节将介绍如何安装Visual Basic 6开发环境。将Visual Basic 6 的安装光盘放入计算机的光驱内，一般情况下计算机可以自 动运行其中的安装程序。如果计算机没有自动运行安装程序 ，双击光盘盘符下的Setup.exe文件，将显示Visual Basic安装 程序界面，按照安装程序的提示进行相应的操作。
双精度型（Double） D
货币型（Currency） C
在Visual Basic环境下，开发人员利用事件驱动的编程机制、 新颖易用的可视化设计工具，使用Windows内部的应用程 序接口（API）函数、动态链接库（DLL）、对象的链接 与嵌入（OLE）、开放式数据连接（ODBC）等技术，可 以高效、快速地开发Windows环境下功能强大、图形界面 丰富的应用软件系统。
Visual Basic特点 Visual Basic安装 Visual Basic集成开发环境
VB从入门到实践
1.1 Visual Basic简介
Visual Basic是一种可视化的、面向对象和采用事件驱动机制 的结构化高级程序设计语言。它可用于开发Windows环境 下的各类应用程序。它具有简单易学、效率高、功能强大 的特点，可以与Windows专业开发工具SDK相媲美。
VB从入门到实践
1.1.5 数据访问
在现代信息技术高度发达的今天，数据信息已经成为最重要 资源之一。Visual Basic为开发人员提供了强大的数据访 问技术，能够更快捷、更迅速、更高效地存储和读取数据 信息。Visual Basic提供了更为强大功能来支持大中型数 据库，如Oracle、SQL Server、Sybase等。
VB从入门到实践
1.2 Visual Basic 6安装
本节将介绍如何安装Visual Basic 6开发环境。将Visual Basic 6 的安装光盘放入计算机的光驱内，一般情况下计算机可以自 动运行其中的安装程序。如果计算机没有自动运行安装程序 ，双击光盘盘符下的Setup.exe文件，将显示Visual Basic安装 程序界面，按照安装程序的提示进行相应的操作。
双精度型（Double） D
货币型（Currency） C
在Visual Basic环境下，开发人员利用事件驱动的编程机制、 新颖易用的可视化设计工具，使用Windows内部的应用程 序接口（API）函数、动态链接库（DLL）、对象的链接 与嵌入（OLE）、开放式数据连接（ODBC）等技术，可 以高效、快速地开发Windows环境下功能强大、图形界面 丰富的应用软件系统。
Visual Basic特点 Visual Basic安装 Visual Basic集成开发环境
VB从入门到实践
1.1 Visual Basic简介
Visual Basic是一种可视化的、面向对象和采用事件驱动机制 的结构化高级程序设计语言。它可用于开发Windows环境 下的各类应用程序。它具有简单易学、效率高、功能强大 的特点，可以与Windows专业开发工具SDK相媲美。
VB教程第3章
字节型数可以表示无符号的整数 0～255
4. 货币型(Currency) 8字节
@
专门为处理货币而设计的数据类型 它可最多保留小数点右边4位和小数点左边15位
8
主页
实数有小数形式和指数形式
小数形式： 如：32.5、0.5、.5 指数形式： mEn mDn m可以是整数或实数，n必须是整数，m、n不 能省略。 11E2 、12.3D-1
Double
#
8
Currenc y Byte
@ 无
8 1 字符长 度 2 8 无固定 15 无固定
字符串型
布尔型 日期型 对象型 变体型
String
Boolean Date Object Variant
$
无 无 无 无
0—65535个字符
True ( -1) 或False( 0 ) 100年1月1日—9999年12月31日 任何对象的引用 无固定
表达式
2
主页
3.1程序格式与约定
1、 语句及语法
VB中的程序语句是执行具体操作的指令。由VB关键字、 属性、表达式以及VB可识别符号的组合。 表达式是常量、 例如，下列两个语句：
Print a – 2 * b ↑ ↑ 关键字 表达式
变量、函数用运 算符连接而成， 单独一个常量， 或变量，或函数 都可以看作是一 个表达式
3.3.1 常量
3、系统定义符号常量
可使用对象浏览器查看VB内部常量。在 “对象浏览器”中可以查看内部常量。 选择“视 图（View）”菜单中的“对象浏览器（Object Browser）”，则打开“对象浏览器”窗口查看
例：单击按钮发出响声
Private Sub Command1_Click( ) Beep ‗内部常量 End Sub
4. 货币型(Currency) 8字节
@
专门为处理货币而设计的数据类型 它可最多保留小数点右边4位和小数点左边15位
8
主页
实数有小数形式和指数形式
小数形式： 如：32.5、0.5、.5 指数形式： mEn mDn m可以是整数或实数，n必须是整数，m、n不 能省略。 11E2 、12.3D-1
Double
#
8
Currenc y Byte
@ 无
8 1 字符长 度 2 8 无固定 15 无固定
字符串型
布尔型 日期型 对象型 变体型
String
Boolean Date Object Variant
$
无 无 无 无
0—65535个字符
True ( -1) 或False( 0 ) 100年1月1日—9999年12月31日 任何对象的引用 无固定
表达式
2
主页
3.1程序格式与约定
1、 语句及语法
VB中的程序语句是执行具体操作的指令。由VB关键字、 属性、表达式以及VB可识别符号的组合。 表达式是常量、 例如，下列两个语句：
Print a – 2 * b ↑ ↑ 关键字 表达式
变量、函数用运 算符连接而成， 单独一个常量， 或变量，或函数 都可以看作是一 个表达式
3.3.1 常量
3、系统定义符号常量
可使用对象浏览器查看VB内部常量。在 “对象浏览器”中可以查看内部常量。 选择“视 图（View）”菜单中的“对象浏览器（Object Browser）”，则打开“对象浏览器”窗口查看
例：单击按钮发出响声
Private Sub Command1_Click( ) Beep ‗内部常量 End Sub
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
VB基础教程：第三章第三节VB的公共函数
3.3 VB的公共函数
1. 数学函数
VB中常用的数学函数
函数名
功能
示例
结果
Sqr（x）
求平方根
Sqr（9）
3
Log（x）
求自然对数，x>0
Log（10）
2.3
Exp（x）
求以e为底的幂值,即求ex
Exp（3）
20.086
Abs（x）
求x的绝对值
Abs（-2.5）
2.5
Hex[$]（x）
求x的十六进制数，返回的是字符型值
Hex[$]（28）
"1C"
Oct[$]（x）
求x的八进制数，返回的是字符型值
Oct[$]（10）
"12"
Sgn(x)
求x的符号, 当x>0, 返回1 ；x=0, 返回0；x Sgn(15)
Rnd(x)
产生一个在（0，1）区间均匀分布的随机数，每次的值都不同；若x=0，则给出的是上一次本函数产生的随机数
Rnd(x)
0-1之间的数
Sin(x)
求x的正弦值，x的单位是弧度
Sin(0)
Cos(x)
求x的余弦值，x的单位是弧度
Cos(1)
0.54
Tan(x)
求x的正切值，x的单位是弧度
Tan(1)
1.56
Atn(x)
求x的反正切值，x的单位是弧度，函数返回的是弧度值
Atn(1)
0.79
2. 字符函数
（1）字符串编码
在Windows采用的DBCS（Double Byte Character Set）编码方案中，一个汉字在计算机内存中占2个字节，一个西文字符（ASCII码）占1个字节，但在VB中采用的是Unicode（ISO字符标准）来存储字符的，所有字符都占2个字节。
为方便使用，可以用StrConv函数来对Unicode 与DBCS进行转换，可以用函数Len（）函数求字符串的字符数，用LenB（）函数求字符串的字节数。
（2）常用的字符串函数
函数名
功能
示例
结果
Len（x）
求x字符串的字符长度(个数)
Len("ab技术")
LenB（x）
求x字符串的字节个数
LenB("ab技术")
8
Left（x，n）
从x字符串左边取n个字符
Left("ABsYt",2)
"AB"
Right（x，n）
从x字符串右边取n个字符
Right("ABsYt",2)
"Yt"
Mid（x，n1，n2）
从x字符串左边第n1个位置开始向右取n2个字符Mid（"ABsYt",2,3）
"BsY"
Ucase（x）
将x字符串中所有小写字母改为大写Ucase（"ABsYug"）
ABSYUG
Lcase（x）
将x字符串中所有大写字母改为小写Ucase（"ABsYug"）
absyug
Ltrim（x）
去掉x左边的空格
Lrim(" ABC ")
"ABC "
Rtrim（x）
去掉x右边的空格
Trim(" ABC ")
" ABC"
Trim（x）
去掉x两边的空格
Trim(" ABC ")
"ABC"
Instr（x，"字符", M）
在x中查找给定的字符,返回该字符在x中的位置,M=1不区分大小写,省略则区分
Instr("WBAC","B")
2
String（n，"字符"）
得到由n个首字符组成的一个字符串
String(3,"abcd")
"aaa"
Space (n)
得到n个空格
Space (3)
"□□□"
Replace(C,C1,C2,N1,N2)
在C字符串中从N1开始将C2替代N2次C1,如果没有N1表示从1开始
Replace("ABCASAA","A","12",2,2) "ABC12S12A"
StrReverse (C)
将字符串反序
StrReverse ("abcd") "dcba"
3. 日期与时间函数
常用的日期与时间函数
函数名
含义
示例
结果
Date ()
返回系统日期
Date ()
02-3-19
Time()
返回系统时间
Time()
3:30 :00 PM
Now
返回系统时间和日期
Now
02-3-19 3:30 :00
Month(C)
返回月份代号（1-12）Month("02,03,19")
3
Year(C)
返回年代号（1752-2078）Year("02-03-19")
2002
Day(C)
返回日期代号（1-31）Day("02,03,19")
19
MonthName(N)
返回月份名
MonthName(1)
一月
WeekDay()
返回星期代号（1-7），星期日为1
WeekDay("02,03,17")
1
WeekDayName(N)
根据N返回星期名称，1为星期日
WeekDayName(4)
星期三
增减日期函数：DateAdd（要增减日期形式，增减量，要增减的日期变量）
例：计算期末考试日期：
DateAdd("ww",15,#2002/3/19#)
求日期之差函数：DateDiff（要间隔日期形式，日期一，日期二）
例：计算距毕业天数：DateDiff("d", Now,
#2005/6/30#)
日期形式日期形式yyyy
q
m
y
d
w
ww
h
n
s
意义
年
季
月
一年的天数日
一周的天数星期
时
秒
4. 转换函数
函数名
功能
示例
结果
Str (x)
将数值数据x转换成字符串Str (45.2)
"45.2"
Val(x)
将字符串x中的数字转换成数值Val("23ab")
23
Chr(x)
返回以x为ASCII码的字符Chr(65)
"A"
Asc(x)
给出字符x的ASCII码值，十进制数Asc("a")
97
Cint(x)
将数值型数据x的小数部分四舍五入取整Cint(3.6)
4
Int(x)
取小于等于x的整数
Int(-3.5)
Int(3.5)
-4
3
Fix(x)
将数值型数据x的小数部分舍去
Fix(-3.5)
- 3
CBool(x)
将任何有效的数字字符串或数值转换成逻辑型CBool(2) CBool("0")
True
False
CByte(x)
将0-255之间的数值转换成字节型
CByte(6)
6
CDate(x)
将有效的日期字符串转换成日期
CDate(#1990,2,23#)
1990-2-23
CCur(x)
将数值数据x转换成货币型
CCur(25.6)
25.6
Round(x，N)
在保留N位小数的情况下四舍五入取整Round(2.86，1)
2.9
CStr(x)
将x转换成字符串型
CStr(12)
"12"
CVar(x)
将数值型数据x转换成变体型
CVar("23")+"A"
"23A"
CSng(x)
将数值数据x转换成单精度型
CSng(23.5125468)
23.51255
CDbl(x)
将数值数据x转换成双精度型
CDbl(23.5125468) 23.5125468
【。