资源描述
本章内容2.1 2.1 基本数据类型基本数据类型基本数据类型基本数据类型2.2 2.2 常量、变量常量、变量常量、变量常量、变量2.3 2.3 运算符及表达式运算符及表达式运算符及表达式运算符及表达式 2.4 2.4 常用内部函数常用内部函数常用内部函数常用内部函数2.5 2.5 程序书写规则程序书写规则程序书写规则程序书写规则2.1 基本数据类型1 1、数值型（、数值型（NumericNumeric）2 2、字符型（、字符型（StringString）3 3、逻辑型（、逻辑型（BooleanBoolean）4 4、日期型（、日期型（DateDate）5 5、对象型（、对象型（ObjectObject）6 6、变体型（、变体型（VariantVariant）基本数据类型1 1、数值型（、数值型（NumericNumeric）字节型字节型(ByteByte)占占1 1个字节个字节整型整型(IntegerInteger)占占2 2个字节个字节长整型长整型(LongLong)占占4 4个字节个字节货币型货币型(CurrencyCurrency)占占8 8个字节个字节浮点型浮点型单精度型单精度型(SingleSingle)占占4 4个字节个字节双精度型双精度型(DoubleDouble)占占8 8个字节个字节浮点数的表示浮点数：浮点数：规定用规定用32位二进制表示单精度浮点数，其中位二进制表示单精度浮点数，其中尾数尾数M占占24位，阶码位，阶码N占占8位。位。浮点数表示：浮点数表示：E=M2N 尾数，纯小数尾数，纯小数阶码，纯整数阶码，纯整数尾数尾数的位数决定的位数决定数的精度，数的精度，阶码阶码的位数决定的位数决定数的范围。数的范围。31 30 24 23 22 31 30 24 23 22 0 0如：如：0.27E-2 +0.27*100.27E-2 +0.27*10-2-2阶符阶符 阶码阶码 数符数符 尾数尾数 阶码部分阶码部分 尾数部分尾数部分 数据在计算机中的表示方式2 2、字符型（、字符型（StringString）：用引号括起来的一串字符。）：用引号括起来的一串字符。例：例：Dim NameA as String Dim NameA as StringDim Nameb as String*20Dim Nameb as String*20NameA=“abcdef”NameA=“abcdef”3 3、逻辑型（、逻辑型（BooleanBoolean）：用于表示逻辑判断结果，）：用于表示逻辑判断结果，其值为真其值为真(True)(True)或假或假(False)(False)4 4、日期型（、日期型（DateDate）：是由双井号（）：是由双井号（#）括起来用）括起来用于表示时间的数据。于表示时间的数据。例：例：#mm/dd/yyyy#mm/dd/yyyy#5 5、对象型（、对象型（ObjectObject）：可以引用应用程序或其它应）：可以引用应用程序或其它应用程序中的对象，在声明了（用程序中的对象，在声明了（ObjectObject）型变量后）型变量后，要用，要用SETSET语句去引用该对象。语句去引用该对象。例：例：Dim a as objectDim a as object set a=command1 set a=command1 a.caption=“OK”a.caption=“OK”6 6、变体型（、变体型（VariantVariant）：可存放不同类型的数据，）：可存放不同类型的数据，在程序运行时在程序运行时VBVB可完成自动转换。可完成自动转换。例：例：Dim X Dim XX=“17”:X=X-5:X=“A”&XX=“17”:X=X-5:X=“A”&XPrint x Print x 结果为结果为:A12:A12例例例例 2-1 2-1 编写程序，验证逻辑型数据的取值。例例例例 2-2 2-2 Date/Time型数据示例。例例例例 2-3 2-3 编写程序，在窗体上创建命令按钮Command1，单击命令按钮，可将该按钮的显示文字“Command1”改为“欢迎”，且字体为黑体，字号为 14号。例例例例 2-4 2-4 编写程序验证：在程序运行期间可变类型变量的不同值。常量、变量常量、变量2.2 常量定义：在程序运行过程中其值始终保持不变的量称定义：在程序运行过程中其值始终保持不变的量称为常量。为常量。种类：种类：直接常量直接常量 符号常量符号常量用户自定义符号常量用户自定义符号常量系统定义符号常量系统定义符号常量直接常量 类型：字符串常量、数值常量类型：字符串常量、数值常量 布尔常量、日期常量布尔常量、日期常量举例：举例：欢迎使用欢迎使用欢迎使用欢迎使用Visual Basic 6.0 Visual Basic 6.0 字符串常量字符串常量字符串常量字符串常量23456 23456 数值型常量数值型常量数值型常量数值型常量12.06 12.06 单精度常量单精度常量单精度常量单精度常量True True 逻辑型常量逻辑型常量逻辑型常量逻辑型常量#061/11/2019#061/11/2019#日期型常量日期型常量日期型常量日期型常量符号常量 形式：形式：Const Const 常量名常量名常量名常量名 AS AS 类型类型类型类型=表达式表达式表达式表达式说明：说明：省略省略 AS AS 类型类型 ，常量的类型由表达式值的类型决定。，常量的类型由表达式值的类型决定。为了便于与变量名区分，一般常量名使用大写字母。为了便于与变量名区分，一般常量名使用大写字母。举例：举例：Const Pi=3.14159265358979 Const Pi=3.14159265358979 Const Max As Integer=100 Const Max As Integer=100 Const Birth=#1/1/06#Const Birth=#1/1/06#Const MyString=China Const MyString=China 例例例例 2-5 2-5 在窗体的通用段声明符号常量pi，在命令按钮command1和command2的单击事件过程中引用pi。系统定义符号常量 系统常量是系统常量是系统常量是系统常量是VBVB系统预先定义好的，用户可直接系统预先定义好的，用户可直接系统预先定义好的，用户可直接系统预先定义好的，用户可直接引用。引用。引用。引用。系统常量位于对象库中，可通过系统常量位于对象库中，可通过“对象浏览对象浏览器器”查看。查看。工程/库例例例例 2-6 2-6 编程使用系统符号常量。变 量 定义：一个有名字的内存单元就叫变量。在程序定义：一个有名字的内存单元就叫变量。在程序运行期间变量的值是可以改变的。运行期间变量的值是可以改变的。种类：属性变量和内存变量。种类：属性变量和内存变量。说明：变量有名字和数据类型，通过名字引用一说明：变量有名字和数据类型，通过名字引用一个变量，而通过数据类型来确定该变量的存个变量，而通过数据类型来确定该变量的存储方式。储方式。变量的命名规则 以字母或汉字开头，后可跟汉字、字母、数字以字母或汉字开头，后可跟汉字、字母、数字或下划线组成，长度小于等于或下划线组成，长度小于等于255255个字符；个字符；不要使用不要使用VBVB中的关键字；中的关键字；VB VB中不区分变量名的大小写；中不区分变量名的大小写；变量名不能与过程名或符号常量同名；变量名不能与过程名或符号常量同名；变量名在同一个范围内必须是唯一的。变量名在同一个范围内必须是唯一的。变量的声明(1)(1)用声明语句声明变量用声明语句声明变量格式：格式：Dim|Static Dim|Static 变量名变量名变量名变量名 AS AS 类型类型类型类型/类型符类型符类型符类型符 ，变量名，变量名，变量名，变量名 AS AS 类型类型类型类型/类型符类型符类型符类型符 例如：例如：Dim fac As Long Dim fac As Long Dim addr As String Dim addr As String Dim no As String*8 Dim no As String*8 Dim score Dim score Dim average As SingleDim average As Single(2)(2)用类型说明符表示变量用类型说明符表示变量 将类型说明符放在变量名的尾部，可以表示不将类型说明符放在变量名的尾部，可以表示不同的变量。同的变量。例如：例如：strName$strName$表示字符串型变量表示字符串型变量表示字符串型变量表示字符串型变量 dblNum%dblNum%表示整型变量表示整型变量表示整型变量表示整型变量 curWage curWage 表示货币型变量表示货币型变量表示货币型变量表示货币型变量 数据类型数据类型整型整型长整型长整型单精度单精度双精度双精度货币型货币型字符型字符型类型说明符类型说明符%&!#$Dim a As Integer,b as integer Dim a As Integer,b as integer 可写成：可写成：Dim a%,b%Dim a%,b%(3)(3)隐式声明隐式声明 未进行显式声明而通过赋值语句直接使用，或省未进行显式声明而通过赋值语句直接使用，或省略了略了AS AS 类型类型/类型符类型符 短语的变量，其类型为变体短语的变量，其类型为变体（VariantVariant）类型。）类型。(4)(4)强制声明强制声明 在在Visual BASICVisual BASIC程序的开始处，若出现（系统环程序的开始处，若出现（系统环境可设置），或写入下面语句：境可设置），或写入下面语句：Option ExplicitOption Explicit例例例例 2-7 2-7 编写程序，理解变量的强制声明和作用范围。各种类型变量的初始值 1.数值型变量初始值为数值型变量初始值为0 0。2.逻辑型变量初始值为逻辑型变量初始值为FalseFalse（逻辑假）。（逻辑假）。3.可变字符串型变量初始值为零长度的字符串可变字符串型变量初始值为零长度的字符串 （）；固定长度字符串变量初始值为其）；固定长度字符串变量初始值为其长度长度数量的空格数量的空格。4.可变类型（可变类型（VariantVariant）变量初始值为）变量初始值为EmptyEmpty。2.3 运算符及表达式 在高级语言中，用运算符将操作数（操作数可在高级语言中，用运算符将操作数（操作数可以是：常量、变量、函数、对象等）连接起来，可以是：常量、变量、函数、对象等）连接起来，可以组成各种类型的表达式，从而实现程序编制中所以组成各种类型的表达式，从而实现程序编制中所需要的各种操作。需要的各种操作。算术运算符与算术表达式 设：设：ia=3ia=3例：5+10 mod 10 9/3+2 2结果：10字符串运算符与字符串表达式例如：例如：abcdef abcdef&12345 12345 结果为结果为 abcdef12345 abcdef12345 abcdef abcdef +12345 12345 出错出错 123+456 123+456 结果为数值结果为数值 579 579 注意注意：TrueTrue转换为数值转换为数值-1-1，FalseFalse转换为数值转换为数值0 0 123123 +True True 结果为结果为 122 122运算符运算符功功 能能例例 子子表达式表达式值值 连连接两个字符型数据接两个字符型数据 计计算机算机+软软件件 计计算机算机软软件件&连连接两个不同接两个不同类类型数据型数据 计计算机算机&123&123 计计算机算机123123关系运算符及关系表达式运算符运算符运算符运算符功功功功 能能能能例例例例 子子子子表达式表达式表达式表达式值值 小于小于小于小于3*5203*5203*5203*5 大于大于大于大于31313131TrueTrueTrueTrue=等于等于等于等于3*6=203*6=203*6=203*6=20FalseFalseFalseFalse不等于不等于不等于不等于4-54-54-54-5TrueTrueTrueTrue=小于或等于小于或等于小于或等于小于或等于3*2=63*2=63*2=63*2=大于或等于大于或等于大于或等于大于或等于6+8=156+8=156+8=156+8=15FalseFalseFalseFalseLikeLikeLikeLike字符串是否匹配字符串是否匹配字符串是否匹配字符串是否匹配ABC Like ABCABC Like ABCABC Like ABCABC Like ABCTrueTrueTrueTrue关系表达式说明(1)(1)在关系表达式中两个操作数进行大小比较，结在关系表达式中两个操作数进行大小比较，结果为逻辑量。果为逻辑量。(2)(2)如果两个操作数是数值型，则按其大小比较。如果两个操作数是数值型，则按其大小比较。(3)(3)如果两个操作数是字符串，则按字符的如果两个操作数是字符串，则按字符的ASCIIASCII码码值从左到右逐一比较，最先出现的不一样字符值从左到右逐一比较，最先出现的不一样字符之间的关系决定了两个字符串比较的结果。之间的关系决定了两个字符串比较的结果。(4)(4)如果两个操作数是日期型，将日期看成如果两个操作数是日期型，将日期看成“yyyymmdd”“yyyymmdd”的的8 8位整数，按数值大小比较。位整数，按数值大小比较。逻辑运算符及逻辑表达式运算符运算符功功 能能例例 子子表达式表达式值值NOTNOTNOTNOT非非非非NOT 3+56NOT 3+56NOT 3+56NOT 3+56FalseFalseFalseFalseANDANDANDAND与与与与3+56 AND 4*5=203+56 AND 4*5=203+56 AND 4*5=203+56 AND 4*5=20TrueTrueTrueTrueOROROROR或或或或6*8=45 OR 466*8=45 OR 466*8=45 OR 466*8=45 OR 42 Xor 32 Xor 32 Xor 32 Xor 36 Eqv 76 Eqv 76 Eqv 76 Eqv 76 Imp 7876 Imp 7876 Imp 7876 Imp 78FalseFalseFalseFalse日期运算符及日期表达式日期型数据一般进行加日期型数据一般进行加“+”“+”和减和减“-”“-”两种运算。两种运算。也可以对日期型数据进行比较等运算。也可以对日期型数据进行比较等运算。例如：例如：#2019-07-23#+5#2019-07-23#+5 结果为：结果为：2019-7-282019-7-28#2019-08-17#-30#2019-08-17#-30 结果为：结果为：2019-7-182019-7-18“今天是：今天是：”ߣ/06/30#”ߣ/06/30#结果为字符串结果为字符串”今天是：今天是：2019-6-30”2019-6-30”#09/18/2019#09/23/2019#09/18/2019#09/23/2019#结果为：结果为：FalseFalse表达式的组成及种类表达式的组成表达式的组成 ：由变量、常量、运算符、函数和圆括号等按由变量、常量、运算符、函数和圆括号等按由变量、常量、运算符、函数和圆括号等按由变量、常量、运算符、函数和圆括号等按一定的规则所组成的式子。一定的规则所组成的式子。一定的规则所组成的式子。一定的规则所组成的式子。表达式的种类表达式的种类 ：算术运算符与算术表达式算术运算符与算术表达式算术运算符与算术表达式算术运算符与算术表达式 字符串运算符与字符串表达式字符串运算符与字符串表达式字符串运算符与字符串表达式字符串运算符与字符串表达式关系运算符与关系表达式关系运算符与关系表达式关系运算符与关系表达式关系运算符与关系表达式逻辑运算符与逻辑表达式。逻辑运算符与逻辑表达式。逻辑运算符与逻辑表达式。逻辑运算符与逻辑表达式。运算符的优先级 当一个表达式中存在多种运算符时，按如下优当一个表达式中存在多种运算符时，按如下优先级的先后顺序进行运算：先级的先后顺序进行运算：算术运算符算术运算符算术运算符算术运算符=字符运算符字符运算符字符运算符字符运算符 关系运算符关系运算符关系运算符关系运算符 逻辑运算逻辑运算逻辑运算逻辑运算注意：注意：(1)(1)用括号可以改变运算顺序。用括号可以改变运算顺序。(2)(2)乘方和负号相邻时，取负优先。如：乘方和负号相邻时，取负优先。如：2 -2 2 -2 的结的结果是果是0.250.25，相当于，相当于2(-2)2(-2)。表达式的书写规则 每个符号占每个符号占1 1格，所有符号都必须一个一个并排格，所有符号都必须一个一个并排写在同一基准上，不能出现上标和下标。写在同一基准上，不能出现上标和下标。不能按常规习惯省略乘号不能按常规习惯省略乘号*，如：，如：2x2x要写成要写成2*x 2*x，也不能写成，也不能写成2.x2.x。只能使用小括号（），且必须配对，表达式中只能使用小括号（），且必须配对，表达式中不能出现中括号和大括号。不能出现中括号和大括号。如数学式：如数学式：应写成：应写成：(a+b)/(c+(d+c)/(d-c)(a+b)/(c+(d+c)/(d-c)不能出现非法的字符，如不能出现非法的字符，如。不同数据类型的转换 如果表达式中操作数具有不同的数据类型，则如果表达式中操作数具有不同的数据类型，则运算结果的数据类型向精度高的数据类型靠。运算结果的数据类型向精度高的数据类型靠。IntegerLongSingleDoubleCurrency IntegerLongSingleDoubleCurrency注意：注意：LongLong型数据和型数据和SingleSingle型数据进行运算时，运型数据进行运算时，运算结果的类型总是算结果的类型总是DoubleDouble型数据。型数据。表达式书写举例 sin(45*3.14/180)+(exp(10)+log(10)/sqr(x+y+1)sin(45*3.14/180)+(exp(10)+log(10)/sqr(x+y+1)a*b*c*d/e/f/g 或 a*b*c*d/（e*f*g）例：例：例：例：检查变量检查变量检查变量检查变量x x x x是否大于等于是否大于等于是否大于等于是否大于等于3 3 3 3且小于等于且小于等于且小于等于且小于等于7 7 7 7 正确：正确：正确：正确：3=x And x=7 3=x And x=7 错误：错误：错误：错误：3=x=7 3=x=7 或或或或 3=x Or x=7 3=x Or x=7 比a小，比b大 用 Ora小数b大数a小数b大数比a大，比b小 用 And例例例例2-8 2-8 用立即窗口观察类型的转换。说明：说明：1.1.函数函数typenametypename()()的功能是测试参数的数据类型。的功能是测试参数的数据类型。2.2.用用“print”print”命令或命令或“?”?”命令都能看到函数的值或表达命令都能看到函数的值或表达式的值。式的值。例例例例2-9 2-9 在立即窗口中测试表达式的优先级。常用内部函数 VBVB的常用内部函数有：的常用内部函数有：数学函数数学函数字符串函数字符串函数日期函数日期函数转换函数转换函数数学函数函数函数功功 能能例例 子子函数函数值值Abs(N)Abs(N)Abs(N)Abs(N)绝对值绝对值ABSABSABSABS(-3)(-3)(-3)(-3)3 3 3 3CosCosCosCos(N)(N)(N)(N)余弦余弦余弦余弦Cos(45*3.14/180)Cos(45*3.14/180)Cos(45*3.14/180)Cos(45*3.14/180)0.7070.7070.7070.707ExpExpExpExp(N)(N)(N)(N)e e e e指数指数指数指数Exp(2)Exp(2)Exp(2)Exp(2)7.3897.3897.3897.389LogLogLogLog(N)(N)(N)(N)自然自然自然自然对对数数数数Log(2.732)Log(2.732)Log(2.732)Log(2.732)1 1 1 1SgnSgnSgnSgn(N)(N)(N)(N)返回一个正返回一个正返回一个正返回一个正负负号或号或号或号或0 0 0 0Sgn(5)Sgn(5)Sgn(5)Sgn(5)1 1 1 1SinSinSinSin(N)(N)(N)(N)正弦正弦正弦正弦Sin(45*3.14/180)Sin(45*3.14/180)Sin(45*3.14/180)Sin(45*3.14/180)0.70680.70680.70680.7068SqrSqrSqrSqr(N)(N)(N)(N)平方根平方根平方根平方根Sqr(25)Sqr(25)Sqr(25)Sqr(25)5 5 5 5TanTanTanTan(N)(N)(N)(N)正切正切正切正切Tan(45*3.14/180)Tan(45*3.14/180)Tan(45*3.14/180)Tan(45*3.14/180)0.99920.99920.99920.9992字符函数(1)函数函数函数函数功功功功 能能能能举例举例举例举例结果结果结果结果Instr(C1,C2)Instr(C1,C2)在在在在C1C1中查找中查找中查找中查找C2C2的的的的位置位置位置位置Instr(ABCDE,DE)Instr(ABCDE,DE)4 4Len(C)Len(C)测试测试测试测试C C的长度的长度的长度的长度Len(ABCDE)Len(ABCDE)5 5Space$(N)Space$(N)产生产生产生产生N N空格字符空格字符空格字符空格字符Space(5)Space(5)Left$(C,N)Left$(C,N)取取取取C C左边左边左边左边N N个字符个字符个字符个字符Left$(ABCDE,3)Left$(ABCDE,3)ABCABCRight$(C,N)Right$(C,N)取取取取C C右边右边右边右边N N个字符个字符个字符个字符Right$(ABCDE,3)Right$(ABCDE,3)CDECDEMid$(C,N,M)Mid$(C,N,M)从第从第从第从第N N个字符起，个字符起，个字符起，个字符起，取取取取C C中中中中MM个字符个字符个字符个字符Mid$(ABCDE,2,2)Mid$(ABCDE,2,2)BCBC字符函数(2)函函函函 数数数数功功功功 能能能能例例例例 子子子子函数值函数值函数值函数值LTrim$(C)LTrim$(C)删除左边的空格删除左边的空格删除左边的空格删除左边的空格RTrim$(AA +BB )RTrim$(AA +BB )AA BB AA BB RTrim$(C)RTrim$(C)删除删除删除删除C C右边的空格右边的空格右边的空格右边的空格RTrim$(AA +BB)RTrim$(AA +BB)AA BB AA BBTrim$(C)Trim$(C)删除删除删除删除C C首尾两端的首尾两端的首尾两端的首尾两端的空格空格空格空格Trim$(AA +BB )Trim$(AA +BB )AA BBAA BBUcase$(C)Ucase$(C)将将将将C C中的字母转换中的字母转换中的字母转换中的字母转换为大写为大写为大写为大写Ucase$(abcde)Ucase$(abcde)ABCDEABCDELcase$(C)Lcase$(C)将将将将C C中的字母转换中的字母转换中的字母转换中的字母转换为小写为小写为小写为小写Lcase$(ABcdE)Lcase$(ABcdE)abcdeabcdeString(N,CString(N,C)C C中首字符组成中首字符组成中首字符组成中首字符组成N N个字符串个字符串个字符串个字符串String(3,”ABCDEF”)String(3,”ABCDEF”)“AAA”“AAA”转换函数函数函数函数函数功功功功 能能能能举例举例举例举例结果结果结果结果Asc(C)Asc(C)返回返回C C的第一个字符的的第一个字符的ASCIIASCII码码Asc(A)Asc(A)6565Chr(N)Chr(N)返回返回ASCIIASCII码码N N对应的字符对应的字符Chr(97)Chr(97)aaStr(N)Str(N)将将N N转换成转换成C C类型类型Str(100010)Str(100010)100010100010Val(C)Val(C)将将C C转换成转换成N N类型类型Val(123.567)Val(123.567)123.567123.567Int(N)Int(N)取小于或等于取小于或等于N N的最大整数的最大整数Int(-3.5)Int(-3.5)Int(3.5)Int(3.5)-4-43 3Fix(N)Fix(N)取整取整Fix(-3.5)Fix(-3.5)Fix(3.5)Fix(3.5)-3-33 3日期函数(1)函函 数数功功 能能DateDate返回当前系统日期（含年月日）返回当前系统日期（含年月日）Day(Date)Day(Date)返回当前日期返回当前日期Hour(Time)Hour(Time)返回当前小时返回当前小时Minute(Time)Minute(Time)返回当前分钟返回当前分钟Month(Date)Month(Date)返回当前月份返回当前月份日期函数(2)函函 数数功功 能能NowNow返回当前日期和时间（含年月返回当前日期和时间（含年月日、时分秒）日、时分秒）Second(Time)Second(Time)返回当前秒返回当前秒TimeTime返回当前时间（含时分秒）返回当前时间（含时分秒）WeekdayWeekday返回当前星期返回当前星期Year(Date)Year(Date)返回当前年份返回当前年份随机函数格式：格式：Rnd (x)Rnd (x)功能：产生大于或等于功能：产生大于或等于0 0且小于且小于1 1的随机数。的随机数。说明：说明：(1)(1)当当 x0 x0 x0或者缺省时：或者缺省时：以上一个随机数作种子，产以上一个随机数作种子，产生序列中的下一个随机数；生序列中的下一个随机数；(3)(3)当当x=0 x=0时时:产生与最近生成的随机数相同的数产生与最近生成的随机数相同的数 。(4)(4)要生成要生成aa，bb闭区间的随机整数，可以使用以下闭区间的随机整数，可以使用以下公式：公式：Int(b-a+1)*Rnd+a)Int(b-a+1)*Rnd+a)例例例例2-10 2-10 在立即窗口中用print语句(可以用?代替print)观察Rnd函数的结果。例例例例2-11 2-11 在立即窗口中产生0，100、20，50之间的随机数。注意：产生注意：产生30-50的随机数的随机数(包括包括30，不包括，不包括50)Int(Rnd*20+30)Randomize语句 格式：格式：Randomize nRandomize n 其中其中 n n是一个整型数，作为随机数生成器的是一个整型数，作为随机数生成器的“种子种子”功能：产生不相同的随机数序列功能：产生不相同的随机数序列 例例例例 2-12 2-12 以系统时间以系统时间作为随机数生成器的作为随机数生成器的值值,随机产生随机产生 1 1，9999之间的之间的3 3个随机整数个随机整数.格式输出函数 格式：格式：FormatFormat（，）说明：说明：(1)(1)：指需要格式化的数值、日期或字符：指需要格式化的数值、日期或字符型数据。型数据。(2)(2)：指定表达式的值的转换输出格：指定表达式的值的转换输出格式。格式字符有三类：数值格式、日期格式和式。格式字符有三类：数值格式、日期格式和字符串格式。格式字符要加引号。字符串格式。格式字符要加引号。RGB()函数 格式：格式：RGB(Red,Green,Blue)RGB(Red,Green,Blue)说明：说明：(1)Red(1)Red：数值范围从：数值范围从 0 0 到到 255 255，表示颜色的红色成份，表示颜色的红色成份(2)Green(2)Green：数值范围从：数值范围从 0 0 到到 255 255，表示颜色的绿色成份，表示颜色的绿色成份(3)Blue(3)Blue：数值范围从：数值范围从 0 0 到到 255 255，表示颜色的蓝色成份，表示颜色的蓝色成份(4)RGB(4)RGB 函数的参数值，如果超过函数的参数值，如果超过 255 255，系统作为，系统作为 255 255来处理。来处理。例如：将例如：将Form1Form1的背景颜色设置为洋红色。的背景颜色设置为洋红色。Form1.BackColor=RGB(255,0,255)Form1.BackColor=RGB(255,0,255)常见的标准颜色 颜颜色色色色红红色色色色值值绿绿色色色色值值蓝蓝色色色色值值黑色黑色0 00 00 0蓝蓝色色0 00 0255255绿绿色色0 02552550 0青色青色0 0255255255255红红色色2552550 00 0洋洋红红色色2552550 0255255黄色黄色2552552552550 0白色白色255255255255255255QBColor 函数 格式：格式：QBColor(x)QBColor(x)功能：返回一个功能：返回一个 Long Long类型的数据，用来表示所对类型的数据，用来表示所对应颜色值的应颜色值的 RGB RGB 颜色码。颜色码。说明：说明：x x参数的值是一个界于参数的值是一个界于 0 0 到到 15 15 的整型数。的整型数。例如：使用例如：使用 QBColor QBColor 函数将函数将 MyForm MyForm 窗体的窗体的 背景背景(BackColor)(BackColor)属性改成红色，其语句为：属性改成红色，其语句为：MyForm.BackColor=QBColor(4)MyForm.BackColor=QBColor(4)参数及其对应的颜色 参数参数参数参数值值(x)(x)(x)(x)颜颜色色色色参数参数参数参数值值(x)(x)(x)(x)颜颜 色色色色0 0黑色黑色8 8灰色灰色1 1蓝蓝色色9 9亮亮蓝蓝色色2 2绿绿色色1010亮亮绿绿色色3 3青色青色1111亮青色亮青色4 4红红色色1212亮亮红红色色5 5洋洋红红色色1313亮洋亮洋红红色色6 6黄色黄色1414亮黄色亮黄色7 7白色白色1515亮白色亮白色举例:两个变量的值互换Private Sub Form_Click()Private Sub Form_Click()Dim A As Integer,B as integer,Temp as integer Dim A As Integer,B as integer,Temp as integer A=10 A=10 B=20 B=20 Print“a Print“a变量和变量和变量和变量和b b变量内容交换前：变量内容交换前：变量内容交换前：变量内容交换前：”；A A；B B Temp=A Temp=A A=b A=b B=Temp B=Temp Print “a Print “a变量和变量和变量和变量和b b变量内容交换后：变量内容交换后：变量内容交换后：变量内容交换后：”；A A；B BEnd sub End sub 程序书写规则程序书写规则(1)VB(1)VB中的语句没有大小写之分；一般情况下，一中的语句没有大小写之分；一般情况下，一行写一个语句，一行写不完时，可以用行写一个语句，一行写不完时，可以用“_”“_”作为作为续行符续行符(2)(2)一行中有多条语句时，各语句之间用一行中有多条语句时，各语句之间用“：”隔开隔开(3)(3)注释语句用注释语句用“Rem”“Rem”作为引导符。如果是在一个作为引导符。如果是在一个语句后面加注释，用语句后面加注释，用“”“”作分隔符作分隔符(4)VB(4)VB中一般使用十进制数，如果要使用十六进制中一般使用十进制数，如果要使用十六进制或八进制数，则在数值的前面加或八进制数，则在数值的前面加“&H”“&H”、“&O”“&O”xiexie!xiexie!谢谢！谢谢！xiexie!xiexie!谢谢！谢谢！
展开阅读全文