医学信息技术基础：第2讲 程序语句的基本组成元素

1、信息技术基础信息技术基础 医学信息技术.要点回顾要点回顾 程序和算法程序和算法 面向对象程序设计面向对象程序设计 对象的属性、方法和事件对象的属性、方法和事件 面向对象的面向对象的VBVB程序设计开发步骤程序设计开发步骤2医学信息技术.3第第2讲讲 程序语句的基本组成元素程序语句的基本组成元素医学信息技术.程序语句的基本组成元素程序语句的基本组成元素 数据类型数据类型 常量和变量常量和变量 运算符和表达式运算符和表达式 常用函数常用函数 代码编写规则代码编写规则 4医学信息技术.1 数据类型数据类型5nByte Byte 字节型字节型nInteger Integer 整型整型nSingle S

2、ingle 单精度单精度nDouble Double 双精度双精度nString String 字符型字符型nChar Char 单个单个字符字符nDate Date 日期型日期型nBoolean Boolean 逻辑型逻辑型nObject Object 对象对象医学信息技术.数值型数值型6Byte（字节型）（字节型）1 B0 255Integer（整型）（整型）4 B-2147483648 2147483647Single（单精度）（单精度） 4 B1.40E-45 3.40E+38(最多最多7位位有效数字有效数字)Double（双精度）（双精度）8 B4.94E-324 1.79E+308

3、(最多最多15位有效数字位有效数字)医学信息技术.字符串型字符串型字符串型（字符串型（StringString）数据是使用双引号括）数据是使用双引号括起来的字符序列，其中可以包括字母、数起来的字符序列，其中可以包括字母、数字、汉字、空格、标点符号等。例如：字、汉字、空格、标点符号等。例如： 欢迎进入欢迎进入VB .NETVB .NET世界世界 、123123、 字符串中的字符个数可以是字符串中的字符个数可以是0 02 2亿个，亿个，其中字符个数为其中字符个数为0 0的字符串称为空串。的字符串称为空串。7医学信息技术.字符型、日期型字符型、日期型字符型（字符型（CharChar）是使用双引号括起

4、来的单）是使用双引号括起来的单个字符，占个字符，占2B2B的内存空间。的内存空间。日期型（日期型（DateDate）数据包含日期和时间，占）数据包含日期和时间，占8B8B内存空间，必须以内存空间，必须以 # # 括起来，格式为括起来，格式为mm/mm/dddd/ /yyyyyyyy。例如：。例如：#01/24/2004 1:20 PM#01/24/2004 1:20 PM#8医学信息技术.逻辑型（逻辑型（布尔型）布尔型）布尔型（布尔型（BooleanBoolean）数据只有两个取值，即）数据只有两个取值，即TrueTrue（逻辑真）和（逻辑真）和FalseFalse（逻辑假），每个（逻辑假），

5、每个布尔型数据占布尔型数据占2B2B空间。空间。 数值型转换为布尔型：数值型转换为布尔型：0-False0-False 其他其他-True-True。布尔型转换为数值型：布尔型转换为数值型：False-0False-0 True-1 True-19医学信息技术.2.1常量常量在程序整个生命周期内都不变的量在程序整个生命周期内都不变的量 直接常量与声明常量直接常量与声明常量 常量声明语句的语法：常量声明语句的语法： Const Const As As 类型类型= 例：例： Const Const pipi As singleAs single = =3.141593.14159常量声明后，不能改

6、变其值常量声明后，不能改变其值。 10医学信息技术.合法的字符常量的是合法的字符常量的是( ) ( ) 。.ABC$ B.ABC.ABC$ B.ABC C.ABCD.ABCC.ABCD.ABC11医学信息技术.2.2变量变量程序执行过程中其值会发生变化的量程序执行过程中其值会发生变化的量1 1）变量的命名）变量的命名2 2）变量声明（说明变量的类型）变量声明（说明变量的类型） 12医学信息技术.变量（常量）的命名变量（常量）的命名 必须以字母开头；必须以字母开头； 由字母、数字、下划线组成由字母、数字、下划线组成 英文字母不区分大小写英文字母不区分大小写 不能使用关键字，如不能使用关键字，如D

7、imDim、ForFor等；等； 名称必须唯一。名称必须唯一。 13医学信息技术.合法的变量名的是（合法的变量名的是（ ）。）。A.X_yzA.X_yz B.123abc B.123abc C.IntegerC.Integer D.X-Y D.X-Y14医学信息技术.变量的声明变量的声明 VB 2010VB 2010中要求在变量使用前，中要求在变量使用前，必须必须先定义变量名、指定它的数据类型和先定义变量名、指定它的数据类型和作用域，作用域，让系统为变量分配存储单元。让系统为变量分配存储单元。Dim | Private | Public | Static Dim | Private | Pub

8、lic | Static As As 15医学信息技术.Dim D1 as IntegerDim D2 as Integer = 3.14Dim D3 as Integer = 10086 Dim D4 as Integer = True Dim 5D as BooleanDim _5D as Boolean = FalseDim D5D as Boolean = 3 16医学信息技术.补充知识补充知识 DimDim 仅用于声明变量，而变量默认声明是私有的，与仅用于声明变量，而变量默认声明是私有的，与PrivatePrivate效果相同效果相同 PrivatePrivate与与PublicPu

9、blic 用于说明变量、过程、函数的访问类型，也可用用于说明变量、过程、函数的访问类型，也可用于变量、对象、过程、函数的声明于变量、对象、过程、函数的声明 StaticStatic 事件中才能使用，事件后其值保留，可用于函数事件中才能使用，事件后其值保留，可用于函数、过程、变量、过程、变量17医学信息技术.2.3数组(后面再讲) 数组是一种特殊的变量。用数组名和数组是一种特殊的变量。用数组名和下标（元素在数组中的序号）来引用下标（元素在数组中的序号）来引用数组中的每个元素。数组有上下界，数组中的每个元素。数组有上下界，数组的元素在上下界中是连续的，系数组的元素在上下界中是连续的，系统为每个元素

10、分配存储空间统为每个元素分配存储空间18医学信息技术. Dim A(5 to 8) As String Dim A(5 to 8) As String 声明一个有声明一个有4 4个元素（个元素（8-5+18-5+1）的一维的字符串数组）的一维的字符串数组 Dim B(4) As Integer Dim B(4) As Integer 声明一个有声明一个有5 5个元素（个元素（4-0+14-0+1）的一维的整型数组）的一维的整型数组 Dim C(1 to 3,0 to 4) As Single Dim C(1 to 3,0 to 4) As Single 声明一个有声明一个有3 3* *5 5个

11、元素的二维的单精度数组个元素的二维的单精度数组19医学信息技术.2.2.3 数据类型数据类型 数值类型数值类型 字符类型字符类型 日期类型日期类型 布尔类型布尔类型 对象类型对象类型20医学信息技术.1.数值运算符数值运算符21 - * / + -医学信息技术.16/4-216/4-25 5 * * 8/4 Mod 52 ( ) 8/4 Mod 52 ( ). . . . .22医学信息技术.整型运算缩写整型运算缩写 A+=1 =A=A+1A+=1 =A=A+1 B-=1 =B=B-1B-=1 =B=B-1 C C* *=2 =C=C=2 =C=C* *2 2 举例：投票器举例：投票器23医学

12、信息技术.数学函数数学函数24函数名称函数名称说明说明应用示例应用示例结果结果Abs返回绝对值返回绝对值Math.Abs(-2.5)2.5Int取整取整Math.Int(3.15)3Round返回一个四舍五入函数返回一个四舍五入函数Math.Round(123.45678,2)123.46Sqrt求平方根求平方根Math.Sqrt(4)2Sin返回正弦值返回正弦值Math.Sin(26)0.762889450479603医学信息技术.医学信息技术.返回值返回值 = = 函数名（参数函数名（参数1 1，参数，参数2 2，）Z= f(Z= f(x,yx,y) )26医学信息技术.随机函数随机函数

13、产生（产生（0,10,1）之间的随机数）之间的随机数 RndRnd()()举例：猜色子点数举例：猜色子点数27医学信息技术.2 字符运算符字符运算符 + &+ &（忽略类型）（忽略类型） a=2+3 a=2+3 aa值为值为5 5 a=2+3 a=2+3 a a值为值为 2323 a=a=广东省广东省&广州市广州市 a a值为值为 广东省广州市广东省广州市“ a=2+3 a=2+3 a a值为值为5 5 a=x2+3 a=x2+3 出现错误提示信息出现错误提示信息 a=x2&3 a=x2&3 aa值为值为x23x2328医学信息技术.+ 和和 &

14、 的区别的区别 + + 根据两边的操作数不同分几种情况根据两边的操作数不同分几种情况 1.1. 字符字符 + + 字符字符 = = 字符串连接字符串连接 2.2. 数值数值 + + 数值数值 = = 数学加法数学加法 3.3. 数字字符数字字符 + + 数值数值 = = 数学加法数学加法 4.4. 字符字符 + + 数值数值 = = 报错报错 & & 无论两边是什么，都先其转换为字符，然无论两边是什么，都先其转换为字符，然后进行字符连接。后进行字符连接。29医学信息技术.字符型函数字符型函数/方法方法30函数函数名称名称说明说明应用示例应用示例结果结果Len返回字符串的长度返回

15、字符串的长度Ltrim去掉字符串左边的空格去掉字符串左边的空格Ltrim(“ 广东教育广东教育”)“广东教育广东教育”Mid取字符串中指定数量的字符取字符串中指定数量的字符Mid(“广东教育广东教育”,3,1)“教教”Space产生指定个数空格的字符串产生指定个数空格的字符串Space(3)“”Replace将指定的子字符串替换成将指定的子字符串替换成另另一一子字符串，并且可指定子字符串，并且可指定替替换换次数次数R e p l a c e ( ” 广 东广 东 ” ,”北京北京”)“北京教育北京教育”医学信息技术.布尔类型布尔类型 也叫逻辑型，只能取：也叫逻辑型，只能取：TrueTrue和和

16、FalseFalse31医学信息技术.逻辑运算符逻辑运算符NotNot：非：非AndAnd：与：与OrOr： 或或XorXor：异或：异或32医学信息技术.33FalseFalse TrueFalseFalseFalseFalseTrueTrueFalseTrueTrueTrueFalse FalseFalseTrueTrueTrueTrueFalseTrueTrueFalse医学信息技术.Dim C As Dim C As booleanbooleanC = Not (23)C = Not (23)C = Not (2+3)C = Not (2+3)C = (23)And (78)C = (

17、23)And (78)C = (21) Or (78)C = (21) Or (78)C = (21) C = (21) XorXor (78) (7大于小于=等于 不等于=大于等于=小于等于like字符串匹配医学信息技术.l数值型数值型直接比较直接比较l字符型字符型的比较，取决于其的比较，取决于其ASCIIASCII码码l字符串型字符串型从左到右一一比较从左到右一一比较l日期型日期型越往后越大越往后越大l逻辑型逻辑型TrueFalseTrue=0 AND a=0 AND a+ca+cb+3 OR NOT db+3 OR NOT d的值是的值是( )( )40医学信息技术.4 常用函数1.1.

18、 数值型函数数值型函数2.2. 字符型函数字符型函数3.3. 日期和时间函数日期和时间函数4.4. 类型转换函数类型转换函数5.5. 交互函数交互函数41医学信息技术.4.3 日期和时间函数日期和时间函数42函数名称函数名称说明说明应用示例应用示例结果结果Today返回系统中年月日的日期返回系统中年月日的日期Today2012-10-1Now返回当前系统日期和时间返回当前系统日期和时间Now2012-10-1 15:10:18Format格式化日期和时间格式化日期和时间Format(#9/23/2012#,”MM/dd/yyyy”)09-23-2012医学信息技术.4.4 类型转换函数类型转换

19、函数43函数函数名称名称说明说明应用示例应用示例结果结果Asc将字符转换成将字符转换成ASCII码值码值Asc(“A”)65CBool字符型转换成逻辑型字符型转换成逻辑型Cbool(“000”)FalseCdate字符型转换成日期型字符型转换成日期型Cdate(“august 1,2012”)2012-8-1Chr将将ASCII码值转换成字符码值转换成字符Chr(65)“A”CStr将数值型转换成字符串将数值型转换成字符串Str(3.1415)“3.1415”Val数字字符串转换成数值数字字符串转换成数值Val(“123.456”)123.456医学信息技术.5 语句书写规则语句书写规则 命令动词首字母转换为大写，运算符命令动词首字母转换为大写，运算符前后加空格前后加空格 一条语句分几行时一条语句分几行时 ：上行尾：上行尾“ “ _ _” 一行写多个语句时：一行写多个语句时： “ “：”44医学信息技术.课后