VB程序设计第三章.ppt

VisualBasic程序设计教程 内蒙古科技大学实践训练中心 第三章VisualBasic语言基础 3 1字符集 1 字符集 数字 0 9 大小写英文字母 a z A Z 特殊字符 空格 等 2 关键字又称保留字 是语法的组成部分 在语法上有固定的含义 用于表示系统提供的标准过程 函数 运算符 常量等 3 2数据类型 1 字符串 String 数据类型 类型符 字符串是用双引号界定的一个字符序列 由ASCII字符 除双引号和回车符之外 汉字及其他可打印字符组成 例如 Hello VisualBasic程序设计 空字符串 说明 1 字符串中包含的字符个数称为字符串长度 字符串分为变长字符串 0 231个字符 和定长字符串 0 216个字符 长度为0 即不含任何字符 的字符串成为空字符串 2 双引号起界定字符串的作用 字符串输出时不显示双引号 从键盘输入一个字符串时也不需要键入双引号 3 字符串中的字符靠ASCII识别的 故大小写是有区别的 3 2数据类型 2 数值 Numeric 数据类型在VB中 数值分为整数和实数两大类 1 整型 类型符 整型数是不带小数点和指数符号 但可以带正 负号的整数 如 1475886 300等十进制整数 整型数按示数范围的不同分为整型 长整型和字节型整数 其中整型数和长整数又可分别用十进制 八进制和十六进制表示 3 2数据类型 2 数值 Numeric 数据类型 整型 Integer 十进制整数以两个字节 16位二进制码 表示和参加运算 取值范围位 32768 216 32767 216 1 八进制整数由0 7的序列组成 前面冠以 或 O 可以带正负号 取值范围 177777 177777 十六进制整数由0 9 A F或 a f 的序列组成 前面冠以 H 可以带正负号 取值范围 HFFFF HFFF 3 2数据类型 2 数值 Numeric 数据类型 长整型 Long 类型符 十进制长整数是以4个字节 32位二进制 存储 取值范围 2147483648 232 2147483647 232 1 当以八进制或十六进制表示长整数 数字序列都应以符号 结尾 其取值范围分别为 0 37777777777 和 H0 HFFFFFFFF 字节型 Byte 以一个字节 8位二进制 存储为无符号整型数 取值范围 0 255 3 2数据类型 2 数值 Numeric 数据类型 2 实型实型数是带有小数点的数 分为浮点数和定点数 浮点数由三部分组成 符号 指数和尾数 单精度浮点数 Single 类型符 负数的取值范围 3 402823E 38 1 401298E 45 正数的取值范围 1 401298E 45 3 402823E 38 3 2数据类型 2 数值 Numeric 数据类型 2 实型 双精度浮点数 Double 类型符 负数的取值范围 1 797693134862316E 308 4 94065645841247E 324 正数的取值范围 4 94065645841247E 324 1 797693134862316E 308 货币类型数据 Currency 类型符 精确到小数点后四位 取值范围 922337203685477 58808 92337203685477 58808浮点数的小数点的位置可以通过调整指数而定 货币型的小数点是固定的 3 2数据类型 3 逻辑型 Boolean 数据类型逻辑性数值只有两个可能的值 True 逻辑真 或者False 逻辑假 当把逻辑值转化为数值时 False转化为0 True转化为 1 当把其他类型数据转化为逻辑数据时 非0数转换为True 0转换为False 3 2数据类型 4 日期 Date 数据类型表示方法 1 以符号 括起来的任何在字面上可被认作日期和时间的字符 January1 1998 1Jan 98 2001 1 112 30 00pm 2 用数字序列表示 小数点左边的数字便是日期 右边的数字表示时间 0为午夜 0 5为中午12点 负数代表1899年12月31日之前的日期和时间 5 对象 Object 数据类型用来表示图形或OLE对象或其他对象 3 2数据类型 6 变体 Variant 数据类型Variant是一种特殊的数据类型 是所有未定义类型的变量的缺省类型 即若程序中的变量类型未定义类型 VB将视之为变体类型 它可以用来存储上面介绍的任一种类型的数据 3 3常量与变量 3 3 1常量或变量的命名规则 常量或变量的名字必须以字母或汉字开头 后跟字母 汉字 数字或下划线组成的序列 长度不能超过255个字符 不能使用VB的关键字命名常量或变量 VB不区分常量或变量的大小写字母 为便于区别 一般常量名全部用大写 变量名首字母大写 其余字母小写 为提高程序的可读性 可在变量名前加一个缩写的前缀来表达该变量的数据类型 做到见名知义 3 3常量与变量 3 3 2常量 VB的常量分为 用户声明的常量 系统提供的常量 1 用户声明的常量常量说明的一般格式 Const常量名 As类型 表达式其中 常量名 是用户为常量命的名 即用户定义标识符 As类型 可选项 用来说明常量的数据类型 表达式 可以是数值常数 字符串常以及由除Is以外的任意的算术运算符和逻辑运算符所构成的表达式 在一行中说明多个常数时使用逗号分隔 如 ConstMyVar 488ConstMystr VisualBasic6 0 Constpiasdouble 3 14159 3 3常量与变量 3 3 2常量 注意 常量声明格式中的 As类型 可用类型说明符 例如 ConstOne 1 长整型常数ConstTwo 2 双精度型常数 常量名不能与关键字或所在过程内的变量或其他常量名同名 其有效作用范围为常量声明语句所在的程序单位 经过声明的常量是常数值的名字 不能在程序代码中修改它的值 常量声明时若不指明数据类型 有时存在多义性 如3 01可能是单精度型 也可能是双精度或货币型 VB将选择选择需要内存容量最小的表示方法 值3 01通常被作为单精度数处理 3 3常量与变量 3 3 2常量 2 系统提供的常量在VB的对象库中 提供了应用程序和控件的系统常量 在 对象浏览器 中的VisualBasic VB VisualBasicforApplication VBA 等对象库中列举了VisualBasic的常量 其他提供对象库的应用程序如Excel Project以及每个ActiveX控件的对象库等也提供了常量 这些常量可与应用程序的对象 方法和属性一起使用 为避免不同对象中同名常量的混淆 可使用2个小写字母的前缀来指定常量所在的对象库 如 vb表示VB和VBA中的常量 xl表示Excel的常量 db表示DataAccessObject库中的常量 3 3常量与变量 3 3 3变量 在程序中使用变量前 一般必须先声明变量名及其数据类型 系统根据所作的声明分配存储单元 在VB中可以显式或隐式声明变量及其类型 1 变量的声明 1 用Dim语句声明变量 显式声明 格式 Dim变量名 As类型 其中 变量名 是用户定义的标识符 应遵循变量命名规则 As类型 可以是VB提供的各种标准类型名称或用户自定义类型名称 若省略 则所声明的变量默认为变体类型 Variant 一条Dim语句可同时定义多个变量 但每个变量必须有自己的类型声明 类型声明不能共用 变量声明之间用逗号分隔 也可把类型说明符放在变量名的尾部 标识不同类型的变量 3 3常量与变量 3 3 3变量 例如 DimintXAsinteger SngTotalAsSingleDimintA intBAsinteger dblCAsDouble字符串变量的声明 Dim字符串变量名Asstring 不定长字符串变量或Dim字符串变量名 不定长字符串变量 Dim字符串变量名AsString 字符数 定长字符串变量说明 对于定长字符串变量 若赋值的字符数少于定义的字符数 则右端补空格 反之 将多余部分截取 在VB中 一个汉字占两个字节 在VB中 除用Dim声明变量后 还可以用Static Public和Private等关键字声明变量 3 3常量与变量 3 3 3变量 2 隐式声明在VB中 一个变量未经Dim语句声明便直接使用 称为隐式声明 使用时系统会以该名字自动创建一个变量 并默认为变体类型 Variant 但这会造成程序的可读性差 甚至会造成程序出错 temp aa bb temp temp aa bb tmp 交换a b的值 正确 b temp拼错 系统为tmp重新创建一个变量 并初始化为0 故最后结果为 b 0 3 3常量与变量 3 3 3变量 2 变体类型变量定义方法 1 在Dim语句中使用类型关键字Variant定义 DimvarExampleAsVariant 2 在Dim语句中仅定义变量名而不声明类型 DimvarA varB 3 隐式声明的变量 系统默认为变体类型变量在Variant变量中 可以存放任何类型的数据 如数值 字符串 日期和时间 对其赋值时 VB会自动完成各种必要的转换 VarA 110 值为字符串 110 VarA VarA 10 值为数值100VarA ABC Str VarA 值为字符串 ABC100 3 3常量与变量 3 3 3变量 使用Variant类型变量注意事项 1 若对Variant变量进行算术运算 必须确保变量中存放的是某种形式的数值或可以解释为数值的字符串 如 Variant变量中的内容是 ABC123 则不能对其进行算术运算 2 运算符 可以作数值相加 也可以用作字符串连接 但执行字符串连接时 尽量使用运算符 3 可以使用VB提供的函数VarType 检测变体类型变量存储的数据类型 3 4运算符与表达式 3 4 1算术运算符与算术表达式 3 4运算符与表达式 3 4 1算术运算符与算术表达式1 指数运算指数运算用来计算乘方和方根 运算符为 a 0 a b a 0 a 0 b可为任何数值 b必须为整数 2 浮点数除法与整数除法浮点数除法的运算符为 整除的运算符是 整除的操作数一般为整型数 若操作数带小数点时 VB首先对其四舍五入 而后进行整除运算 运算结果简单地截取整数部分 小数不作四舍五入处理 例如 10 4 结果为220 2 6 结果为625 63 6 78 结果为3 3 4运算符与表达式 3 4 1算术运算符与算术表达式3 取模运算取模运算Mod用于求余数 结果是第一个操作数整除以第二个操作数所得的余数 若左右操作数为实数 则VB首先对其四舍五入 然后求模 运算结果的符号取决于左操作数的符号 例如 10Mod4 结果为220Mod2 6 结果为225 63Mod6 78 结果为5 5Mod2 结果为 1 5Mod 2 结果为 15Mod 2 结果为1 3 4运算符与表达式 3 4 1算术运算符与算术表达式4 算术表达式中算术运算符的优先级 当一个表达式含有多个算术运算符时 必须按以上顺序求值 同级运算符从左到右运算 若含有括号 则先计算括号内表达式的值 多层括号 则从内层括号到外层括号计算 乘除运算符 整除运算符 取模运算符Mod 取负运算符 指数运算符 加减运算符 3 4运算符与表达式 3 4运算符与表达式 3 4 2字符串运算符与字符串表达式字符串运算符 用途 将两个字符串依次连接起来 生成一个新的字符串 例如 a Visual b Basic 则a b 和a b 的值均为 VisualBasic 注 使用运算符 时 变量与运算符 间应加一个空格 与 的区别 连接两旁的操作数均为字符型 若一个为数值型或另一个为数字字符串时 则进行算术运算 若一个为含有非数字字符的字符型数据 另一个为数值型数据 则出错 连接符两旁的操作数不管是字符型还是数值型 进行连接前 系统先将操作数转换为字符型 而后再连接 如 xyz 123 结果为 xyz123 例 100 123 结果为223 100 123 结果为100123 Abc 123 出错 100 123 结果为100123100 123 结果为100123 Abc 123 结果为Abc123 Abc 123 结果为Abc123 3 4运算符与表达式 3 4 3关系运算符与关系表达式关系运算符也叫比较运算符 作用是将两个操作数进行大小比较 关系表达式的运算结果是一个逻辑值 关系成立 则返回True 1 值 否则返回False 0 值 3 4运算符与表达式 3 4 3关系运算符与关系表达式对关系运算符需注意以下规则 1 若两个操作数是数值型 则按大小比较 但对于单精度或双精度数进行比较时 由于机器的运算误差 可能会得不到希望的结果 应避免直接判断两个浮点数是否相等 改为对两个数误差的判断 如 Abs num1 num2 ABCDC 结果为True ABCDE ABCDC 结果为False 3 关系运算符的优先级相同 4 Like运算符用来比较字符串表达式和SQL表达式中的样式 主要用于数据库查询 Is运算符用于两个对象变量引用比较 可在SelectCase中使用 3 4运算符与表达式 3 4 4逻辑运算符与逻辑表达式逻辑运算又称布尔运算 逻辑运算符的左右操作数要求为逻辑值 用逻辑运算符连接两个或多个逻辑量组成的式子称为逻辑表达式或布尔表达式 逻辑运算的结果是逻辑值True或False 3 4运算符与表达式 3 4 4逻辑运算符与逻辑表达式例如 Not 5 8 取反结果为True42Xor82XorTrue 异或结果为False5 2EqvTrue 等价结果为True5 2ImpTrue 蕴含结果为True注意事项 对于算术运算符 若两边的操作数是数字字符或逻辑型 则自动转换成数值型后再运算 如 30 True 结果为31 因为True转换为数值为 1 3 4运算符与表达式 3 4 5表达式的运算顺序 1 计算机对表达式求值的顺序 函数运算 算术运算 关系运算 逻辑运算例如 x sin 5 x 3 6 4 又如 设i 1 x 2 y 2 则下列逻辑表达式的运算顺序为 x 2orNoty 0And x y i0 最终结果为 True 3 4运算符与表达式 3 4 5表达式的运算顺序 2 在算术运算中 若有不同类型的数据类型混合运算 则VB规定运算结果的数值类型采用精度高的数据类型 Integer Long Single Double Currency但当Long型数据和Single型数据运算时 结果为Double型数据 3 书写时应注意 表达式要在同一行上书写成线性序列 如 数学表达式 写成VB表达式为 a b c d 乘号 不能省略 也不能用 代替 如 2y应写成2 y 括号可以改变运算顺序 表达式中只能使用圆括号 且可以嵌套 3 4运算符与表达式 3 4 5表达式的运算顺序数学表达式VB表达式 Cos a 1 2 n n 1 x y n 1 sqr x a 3 14159 2 log x 3 5常用内部函数 VB系统的内部函数分为 转换函数 数学函数 字符串函数 时间 日期函数和随机函数 也允许用户自定义函数过程 函数的引用 写出函数名 填入函数的参数 参数必须在函数名后用括号括起 若有多个参数 则参数之间用逗号隔开 若函数不带参数 则直接写出函数名即可 例如 Sin x 2 返回x的正弦平方值Format Now hh mm ss 返回当前时刻的 hh mm ss 格式Now 取出当前系统时序的序数 3 5常用内部函数 3 5 1转换函数转换函数用于数据类型或形式的转换 包括整型 浮点型 字符串型之间以及ASCII码之间的转换 1 Str 功能 将数值型数据转换成字符串型数据 参数 只有一个 可为整型 长整型 单精度浮点型 双精度浮点型和货币型中任何一种 返回值 是一个字符串型常数 例 3 1 X 5645 X为整型变量A Str X 将X转换成字符串型数据后赋给变量A结果 A 5645 3 5常用内部函数 3 5 1转换函数 2 Val 功能 将数字字符串转换成数值型常数 参数 只有一个字符串类型的变量或常量或表达式 返回值 若参数字符串中包含 则只将最左边的一个 转换成小数点 若参数字符串中包含有 或 则只将字符串首的 转换为正 负号 若参数字符串中还包含除数字以外的其他字符 则只将其他字符以前的串转换成数值 例 3 2 A 3 14 2 B 156B C 25 25 2868 X Val A 结果为 3 14Y Val B 结果为 156Z Val C 结果为 25 25 3 5常用内部函数 3 5 1转换函数 3 Chr 功能 将ASCII码转换成字符串 格式 Chr ASCIICode 参数 以一个ASCII代码作为参数 返回值 返回值为由一个字符组成的字符串 例 3 3 A Chr 97 结果为 A a 字符 a 的ASCII码为97 4 Asc 功能 将由一个字符组成的字符串转换成ASCII码值 格式 Asc String 参数 要求一个字符组成的字符串变量或常量或表达式 返回值 为该字符串中字符对应的ASCII码 为一个整型常数 例 3 4 A Asc C 结果 A 67 即 C 的ASCII码为67 3 5常用内部函数 3 5 1转换函数 5 Cint 功能 将数值的小数部分进行四舍五入 然后返回一整型量 格式 Cint Var 参数 可以为一个任何类型的数值型常量或变量或表达式 返回值 是将参数的小数部分四舍五入后得到的整型量 例 3 5 X Cint 23 512 结果 X 24 6 Fix 功能 截去浮点数或货币型数的小数部分格式 Fix Var 参数 可为一个单精度型或双精度型或货币型的常量或变量或表达式返回值 为一个整型常量 例 3 6 X Fix 218 92 结果 X 218 3 5常用内部函数 3 5 1转换函数 7 Int 功能 将浮点数或货币型量转化为小于或等于该数的最大整型量 格式 Int Var 参数 可以为一个浮点数或一个货币型的常量或变量或表达式 返回值 不大于参数的最大整数 例 3 7 X Int 6 5 结果为 X 6Y Int 7 8 结果为 Y 8 8 Ccur 功能 将数值型量转化为货币型量 格式 Ccur Var 参数 为一个数值型的常量或变量或表达式 返回值 为一个只有4位小数的货币量 若参数小数部分多于4位 则将多出部分四舍五入 例 3 8 X 123 5678921Y Ccur X 结果 Y 123 5679 3 5常用内部函数 3 5 1转换函数 9 Lcase 功能 将大写字母转化为小写字母 格式 Lcase Var 参数 为一个字符串常量或变量或表达式 返回值 将参数字符串中的大写字母转换为小写字母后得到的字符串例 3 9 X AbCdEF Y Lcase X 结果为 Y abcdef 10 Ucase 功能 将小写字母转化大写字母 格式 Ucase Var 参数 为一个字符串常量或变量或表达式 返回值 将参数字符串中的小写字母转换为大写字母后得到的字符串 例 3 10 X AbCdEF Y Ucase X 结果 Y ABCDEF 3 5常用内部函数 3 5 2数学函数 1 Sin 功能 计算角度的正弦值 格式 Sin x 参数 x为一个用弧度表示的数值型常量或变量或表达式 返回值 返回一个单精度浮点数或双精度浮点数型数值量 2 Cos 功能 计算角度的余弦值 格式 Cos x 参数 x为一个用弧度表示的数值型常量或变量或表达式 返回值 返回一个单精度浮点数或双精度浮点数型数值量 3 Tan 功能 计算角度的正切值 格式 Tan x 参数 x为一个用弧度表示的数值型常量或变量或表达式 返回值 返回一个单精度浮点数或双精度浮点数型数值量 说明 当x接近 2或 2时 会出现溢出 3 5常用内部函数 3 5 2数学函数 4 Atn 功能 计算角度的反正切值 格式 Atn x 参数 x为一个用弧度表示的数值型常量或变量或表达式 返回值 返回一个单精度浮点数或双精度浮点数型数值量 5 Log 功能 计算自然对数值 格式 Log x 参数 x为一个数值型常量或变量或表达式 返回值 返回一个单精度浮点数或双精度浮点型常量 说明 x 0 6 Exp 功能 计算以e为底的幂 格式 Exp x 参数 x为一数值型常量或变量或表达式 返回值 返回一个单精度浮点数或双精度浮点数型常量 3 5常用内部函数 3 5 2数学函数 7 Sqr 功能 计算平方根 格式 Sqr x 参数 x为一数值型常量或变量或表达式 返回值 返回数值型量 说明 x 0 8 Abs 功能 计算绝对值 格式 Abs x 参数 x为一个数值型常量或变量或表达式 返回值 为一个大于或等于零的数值常数 9 Hex 功能 将十进制的数值转换为十六进制的数值或字符串 格式 Hex x 参数 x为十进制数值型常量或变量或表达式 返回值 与十进制数x对应的十六进制数组成的字符串 3 5常用内部函数 3 5 2数学函数 10 Oct 功能 将十进制数值转换为八进制数值或字符串 格式 Oct x 参数 x为十进制数值常量或变量或表达式 返回值 与十进制数x对应的八进制数值或字符串 11 Sgn 功能 判断参数的符号 格式 Sgn x 参数 x为一个数值型常量或变量或表达式 返回值 当x 0 返回值1 当x 0 返回值0 当x 0 返回值 1 3 5常用内部函数 3 5 3字符串函数说明 Windows系统采用的DBCS编码 即西文与ASCII码为单字节 中文为双字节 VB系统采用的是UNICODE编码 即所有字符均为双字节字符 1 InStr 功能 从字符串String1中的第N个字符开始找字符串String2 格式 InStr N String1 String2 M 参数 要求参数至少有两个字符串型常量或变量或表达式 若省略N 注 N省略 则不能带参数M 从头开始找 若有参数N 则从String1的左端第N个字符开始找String2 若带参数M 1 则在查找时不区分大小写 若M 0或M省略 则区分大小写 返回值 若在String1中找到String2 则返回String1中第一次和String2匹配的第一个字符的顺序号 若找不到 则函数返回0 例 3 12 X InStr 2 ABEfCDEFG EF 0 Y InStr 2 ABEfCDEFG EF 1 结果 X 7 Y 3 3 5常用内部函数 3 5 3字符串函数 2 InStrRev 功能 与InStr函数功能相似 只是从String1的尾部开始找String2 格式 InStrRev String1 String2 N M 参数 要求参数至少有两个字符串型常量或变量或表达式 若省略N从尾开始找 若有参数N 则从String1的第N个字符开始向左端找String2 若参数M 1 则在查找时不区分大小写 若M 0或M省略 则在查找时区分大小写 返回值 若在String1中找到Strin2 则返回String1中第一次和String2匹配的左端第一个字符的顺序号 若找不到 则函数返回0例 3 13 X InStrRev ABCDEFGEFGH EF 结果 X 8 3 5常用内部函数 3 5 3字符串函数 3 Join 功能 将数组的元素按指定的分隔符连接成字符串 格式 Join Array D 参数 该函数的参数为一数组 分隔符D可省略 返回值 若省略D 则将数组各元素值顺序连接成字符串 若不省略D 则按分隔符D将数组各元素连接成字符串返回 例 3 14 A Array 123 ab c c Join A 结果 c的值为字符串 123 ab c 3 5常用内部函数 3 5 3字符串函数 4 Left 功能 取出字符串左边的N个字符作为一个新的字符串 格式 Left String N 参数 String为字符串常量或变量或表达式 N为整型常量或变量或表达式 返回值 函数的返回值为String左边的N个字符组成的字符串 例 3 15 C Left ABCDEFG 3 结果 C 的值为 ABC 5 Len 功能 求字符串长度 即字符串的字符个数 格式 Len String 参数 String为字符串常量或变量或表达式 返回值 String的长度 例 3 16 x Len AB高等教育 结果 x 的值为6 3 5常用内部函数 3 5 3字符串函数 6 LenB 功能 求字符串存储时所占的字节数 格式 LenB String 参数 String为字符串常量或变量或表达式 返回值 返回String存储时所占的字节数 例 3 17 x LenB AB高等教育 结果 x 的值为12 7 Ltrim 功能 去掉字符串左端的空格 格式 Ltrim String 参数 String为字符串常量或变量或表达式 返回值 为去掉String的左端空格后的字符串 例 3 18 C ABCD D Ltrim C 结果 D 的值为 ABCD 3 5常用内部函数 3 5 3字符串函数 8 Mid 功能 从字符串中间取子串 格式 Mid String N1 N2 参数 String为字符串常量或变量或表达式 N1 N2为整型常量或变量或表达式 返回值 返回String中从第N1个字符开始向右连续取N2字符组成的字符串 例 3 19 C Mid ABCDEFG 2 3 结果 C 的值为 BCD 3 5常用内部函数 3 5 3字符串函数 9 Right 功能 取出字符串右端的N个字符 格式 Right String N 参数 String为字符串常量或变量或表达式 N为整型常量或变量或表达式 返回值 为String右端N个字符组成的字符串 例 3 20 C Right ABCDEFG 3 结果 C 的值为 EFG 10 Rtrim 功能 去掉字符串右端的空格 格式 Rtrim String 参数 String为字符串常量或变量或表达式 返回值 为去掉String右端空格后的字符串 例 3 21 C Rtrim ABCD 结果 C 的值为 ABCD 3 5常用内部函数 3 5 3字符串函数 11 Trim 功能 去掉字符串左右两边的空格 格式 Trim String 参数 String为一字符串常量或变量或表达式 例C trim ABC123 结果 C 的值为 ABC123 12 Space 功能 产生N个空格组成的字符串 格式 Space N 参数 N为一整型常量或变量或表达式 返回值 返回由N个空格组成的字符串 例 3 22 C Space 3 结果 C 的值为 3 5常用内部函数 3 5 3字符串函数 13 String 功能 产生由字符串的N个首字符组成的字符串 格式 String N String 参数 N为一整型常量或变量或表达式 String为字符串常量或变量或表达式 返回值 返回由String中N个首字符组成的字符串 例 3 23 C String 3 ABCDEF 结果 C 的值为 AAA 14 StrReverse 功能 将字符串反序 格式 StrReverse String 参数 String为一字符串常量或变量或表达式 返回值 返回由String的逆序组成的字符串 例 3 24 C StrReverse ABCDEF 结果 C 的值为 FEDCBA 3 5常用内部函数 3 5 4日期与时间函数 1 Date 功能 提取计算机系统的当前日期 格式 Date 参数 无参数 返回值 按 yyyy mm dd 形式返回计算机系统当前日期 返回值为字符串类型 例 3 25 若当前日期是2007年2月1日 则PrintDate 将显示 2007 02 01说明 可用Date 在程序中为计算机系统设置最新日期 格式为 Date DateString其中 DateString为 yy mm dd 或 yyyy mm dd 显示的字符串如 要将计算机系统的日期设置为 2007年10月15日 则 Date 07 10 15 Date 2007 10 15 3 5常用内部函数 3 5 4日期与时间函数 2 Day 功能 计算日期 格式 Day DateString 参数 DateString为一个日期型字符串 返回值 返回日期代号 1 31 PrintDay 2006 10 22 显示结果 22 3 Month 功能 计算月份 格式 Month DateString 参数 DateString为一个日期型字符串 返回值 返回月份代号 1 12 整型 PrintMonth 2006 10 23 结果为 10 3 5常用内部函数 3 5 4日期与时间函数 4 MonthName 功能 提取月份名 格式 MonthName N String 参数 N为1 12之间的整型量或相应字符串String 返回值 返回月份名 字符型 PrintMonthName 8 显示结果 八月 5 Year 功能 提取年号 格式 Year DateString N 参数 DateString为一日期字符串 N表示1899年12月31日前后的天数返回值 返回年份 1753 2078 若参数为N 则N 0时 返回1899年12月31日N天以后的年份 若N 0 则返回1899年12月31日N天前的年份 结果为整型 PrintYear 2006 12 23 结果为 2006 3 5常用内部函数 3 5 4日期与时间函数 6 Now 功能 提取系统日期和时间 格式 Now参数 无参数 返回值 返回系统日期和时间 形式为 yyyy mm ddhh mm ss 7 Time 功能 提取计算机系统中的当前时间 格式 Time 参数 无参数 返回值 返回 hh mm ss 形式组成的时间字符串 例 3 31 若系统当前时间是10点25分36秒 则语句PrintTime 将显示 10 25 36说明 Time 还可以为计算机系统设置最新时间 Time 11 设置时间为11点Time 11 25 设置时间为11点25分Time 11 25 28 设置时间为11点25分28秒 3 5常用内部函数 3 5 4日期与时间函数 8 Hour 功能 计算小时 格式 Hour N 参数 N为一时间字符串 返回值 返回0 23之间的一个整数 表示小时 9 Minute 功能 提取计算机系统中的当前时间 格式 Minute N 参数 N为一时间字符串 返回值 返回0 59之间的一个整数 表示分钟 10 Second 功能 计算秒 格式 Second N 参数 N为一时间字符串 返回值 返回0 59之间的一个整数 表示秒 例如 printHour 22 23 45 结果为22printMinute 22 23 45 结果为23printsecond 22 23 45 结果为45 3 5常用内部函数 3 5 4日期与时间函数 11 Weekday 功能 计算星期值 格式 Weekday DateString N 参数 DateString为一日期字符串 N为一序数 返回值 返回星期代号 1 7 为整数 1代表星期日 2代表星期一 3代表星期二 7代表星期六 printweekday 2008 02 10 返回值 1为星期日 3 5常用内部函数 3 5 5随机函数 1 随机函数格式 Rnd x 功能 产生一个大于或等于0且小于1的单精度随机数 参数 可有参数 也可省去参数 参数x为随机数生成的种子 返回值 当x 0时或省去参数 以上一个随机数作为种子 产生序列中的下一个随机数 当x 0时 产生与上次相同的随机数 例 PrintRnd产生随机数 0 5795186为了生成 A B 之间的随机整数 可使用公式 Int B A 1 Rnd A 如 Int 9 Rnd 1生成 1 9 之间的随机整数 3 5常用内部函数 3 5 6随机函数 2 Randomize语句格式 Randomize x 功能 给随机函数Rnd 重新赋予不同的种子 参数 可选参数x一般为整型常量或变量或表达式 Randomize用x将Rnd函数的随机数生成器初始化 给它一个新的种子值 若省略x 则用系统计时器返回的值作为新的种子值 例 DimRndValueAsIntegerRandomize 对随机数生成器作初始化RVndalue int 100 Rnd 1 生产1 100间的随机数值 3 6VisualBasic语句及书写规则 1 VB源代码不区分字母的大小写在代码窗口中 VB对用户输入的程序代码进行自动转换 以提高程序的可读性 VB关键字的首字母总被转换成大写 其余字母被转换成小写 若关键字由多个英文单词组成 每个单词的首字母都被转换成大写 对用户自定义的变量 过程名 VB以第一次定义的为准 以后输入时VB自动向首次定义的转换 2 语句书写自由 同一行上可以书写多个语句 语句间用冒号 分割 一个语句可以分为若干行书写 但须在行后加续行标志 每行字符长度不超过255个字符 3 适当添加注释有利于程序的维护和调试 以关键字Rem开头或以撇号 开头引导注释内容 且以撇号开头的注释还可直接出现在语句后面 3 6VisualBasic语句及书写规则 4 保留行号与下标必要时可在VB源程序的语句行前设置行号或标号 标号是以字母开始以冒号结束的字符串 一般用在转向语句中 但应尽量限制使用 VB源代码书写示例 Rem求两个数的和Dimxasinteger yasinteger zAsInteger 定义变量x y z为整型变量x 1 y 2 给x y赋值z x y 将x与y和的值赋给变量zForm1 Printx y z 在窗体上显示x y z的值 3 7VisualBasic的基本语句 3 7 1赋值语句用赋值语句可以把指定的值赋给某个变量或某个带有属性的对象 它是为变量和控件属性赋值的主要方法 语句格式 目标操作符 源操作符语句功能 把源操作符的值赋给目标操作符说明 源操作符 包括变量 简单变量及下标变量 表达式 常量及带属性的对象 目标操作符 指的是变量和带有属性的对象 赋值号 3 7VisualBasic的基本语句 3 7 1赋值语句例如 Data 15 将数值常量15赋给变量DataText1 Text Str Data 将数值变量Data的值转变为字符串后赋给控件Text1的Text属性x x 1 将变量x的值加1后再赋给变量xS Welcome 将字符串常量赋给字符串变量Text2 Text S toBeijing 将串表达式的值赋给控件Text2的Text属性 3 7VisualBasic的基本语句 3 7 1赋值语句说明 1 赋值语句兼有计算与赋值的双重功能例如在x x 1中 执行时先计算 右边的表达式的值 即将变量x的当前值 设为9 加1 然后将结果赋给变量x 执行后 x的值变为10 2 赋值号与等号在Basic中 具有二义性 既可赋值号 又可作关系运算符号 3 7VisualBasic的基本语句 3 7 1赋值语句 3 赋值相容赋值语句中的 目标操作符 无论作为变量名或控件名的属性名 都代表一个存储单元 当执行赋值语句时 若这个存储单元的结构和大小能正确地表示赋值号右边的 源操作符 的值 就称该赋值语句是赋值相容的 目标操作符 和 源操作符 的数据类型一致时 赋值相容 利用Basic提供提供的对某些数据类型的自动转换机制 可强制变量转换为适当的数据类型 也可赋值相容 3 7VisualBasic的基本语句 3 7 2注释语句注释语句用来对程序或程序中某些语句作注释 阅读程序时便于理解 语句格式 注释内容或Rem注释内容例如 ThisisVBProgramRem计算图的面积说明 注释语句是非执行语句 对程序的执行结果没有任何影响 仅在列程序清单时 注释被完整地引出 任何字符均可放在注释中作为注释内容 注释语句作为一个独立行 还常放在过程 模块的开头作为标题 也可放在执行语句的后面 在此情况下 注释语句必须为最后一个语句 例 a 3 b 4 c 5 a b c为三角形的边 3 7VisualBasic的基本语句 3 7 3暂停语句语句格式 Stop说明 Stop可以放置在过程中的任何地方 相当于在程序代码中设置一个断点 类似于执行 运行 菜单中的 中断 命令 当执行Stop语句时 系统自动打开 立即窗口 方便程序员调试跟踪程序 3 7VisualBasic的基本语句 3 7 4结束语句语句格式 End说明 程序运行时 遇到结束语句就终止程序的运行 End语句除用来结束程序外 在不同的环境下还有其他一些用途 EndSub 结束一个SubEndFunction 结束一个Function过程EndIf 结束一个If语句块EndType 结束一个记录类型的定义EndSelect 结束一个情况语句当在程序中执行End语句时 将终止当前程序 重置所有变量 并关闭所有数据文件