1、程序设计语言的基础是：字符、词汇、表达式、语句、过程、函数等语法单位。由语言编译程序规定，利用这些语法单位构成程序的规则，称之为“语法规则”。本章将介绍在编写代码时用到的一些最基础的知识。,第3章 VB编程的基础知识,3.1 VB的基本字符集和词汇集 3.2 VB的基本数据类型 3.3 常量与变量 3.4 运算符与表达式 3.5 常用内部函数,第3章 VB编程的基础知识,字符是构成程序的最小语法单位，每种程序设计语言都有自己的字符集。VB的基本字符集包括：数字：0一9；英文字母：大写英文字母AZ；小写英文字母az。特殊字符：空格 ！ “ # $ % ? _ | 等。【注】：Visual Bas
2、ic 语言程序在适当场合下允许使用汉字字符。,3.1 VB的基本字符集和词汇集,3.1.1 字符集 ：,词汇集是在代码中具有一定意义的字符组合，主要包括：（一）关键字：1）定义：关键字又称为保留字，是在语法上具有固定意义的字母组合，通常用来表示系统提供的标准过程、函数、运算符和常量等。2）标准形式：首字母为大写，其余字母为大、小写字母混合。【注】：在代码编辑窗口输入代码时无需考虑大小写问题，系统会自动将其转换为标准形式。例如：Print、If 、 Then 、 Private 、 Sin 、 Sqr,3.1.2 词汇集 ：,3.1 VB的基本字符集和词汇集,（二）标示符：1）定义：标示符用来标
3、记用户在程序中自定义的常量、变量、控件或过程、函数的名字。2）命名规则：（P42）不能与关键字同名变量、过程、函数名应在255个字符以内；控件、窗体、模块名应在40个字符以内。必须以字母、汉字开头，后跟字母、汉字、数字、下划线的组合例如：a 、X3、n_1、数学001、英语_OK不允许出现间隔符号（ 空格，；运算符等） 如：a，b、X+Y、李 明标示符应该尽量做到简单明了，见名知意,3.1.2 词汇集 ：,练习：,请判断下列哪些为合法的标示符？1）a；b 2）x5 3）3G 4）_score01 5）X1+X2 6） 李 四 7）计算机_01正确答案为：2） 、7）,数据是信息的物理表示形式，
4、是程序处理的对象。在VB中，对不同类型的数据有不同的操作方式和取值范围。【注】：在程序设计中，要随时注意所用数据的类型。,3.2 VB的基本数据类型,VB的标准数据类型（P42）：,3.2.1 字符串型（String ，类型符$）字符串包括：除双引号和回车以外可打印的所有字符。【注】：以双引号作为字符串的定界符号。字符串中要区分字母的大小写。如：“ABC”与“abc”不同双引号内字符的个数叫做字符串的长度（含：空格），长度为0的字符串叫空字符串。字符串中的ASCII字符和汉字都采用双字节存储。例如：“1234”和“张 三”都是字符串型。“计算机”和“abc”长度均为：3，占用6个字节的内存空间
5、。,3.2.2 数值型VB中的数值型数据分为整型和实型两大类。（一）整型整型数是不带小数点和指数符号的数。 分为: 1.整型2.长整型3.字节型整数,1.整型（Integer，类型符%）在内存中，整型数用2个字节存储取值范围是：-32768+32767。例如：15%，-345%，654%都是整数型45678%则会发生溢出错误2.长整型（Long，类型符&）长整型用4个字节存储取值范围是：-2147483648 +2147483647。例如：123456&，45678&都是长整数型。3.字节型（Byte）用1个字节存储，可以表示无符号的整数。取值范围是：0 255。,（二）实型分为：1. 单精度
6、2. 双精度3. 货币型1.单精度浮点数（Single，类型符!）单精度数用4个字节存储，有7位有效数字，小数点可位于数字的任何位置；取值范围： 1.401298E-45|x|3.402823E+38。小数表示形式：例如：7.8！，-0.526!,2.双精度数据(Double，类型符#)双精度用8个字节(64位)存储。有15位有效数字，小数点可位于数字的任何位置；取值范围： 4.94065645841247E- 324|x|1.79769313486232E+308小数表示形式：例如：7.8#，-0.526 #,3. 货币型（Currency，类型符）货币型数据主要用来表示货币值，用8个字节存
7、储.货币型是定点数，整数部分最多15位，小数点后面精确到第4位，第五位四舍五入。例如：3.56 、 65.123456 都是货币型。,3.2.3 逻辑型（Boolean）逻辑型数据只有两个：逻辑真True和逻辑假False用2个字节存储。【注】：当把逻辑值转化为数值型时，,True -1 False 0,3.2.4 日期型（Date）日期型数据用8个字节来存储日期范围: 公元100年1月1日 9999年12月31日 【注】：用# 括起来放置日期和时间允许用多种格式表示日期和时间 日期：分隔符：“/”、“,”、“-” ，顺序：“年、月、日”或者“月、日、年”时间：分隔符必须用“:” 顺序：时、分
8、、秒。例如：#01/23/08# 、 #98,7,18#、 #03-25-75 20:30:00# 、#1999-08-11 10:25:00 pm# 等都是有效的日期型数据VB系统会自动将其转换成#mm/dd/yy#（月/日/年）的形式。,3.2.5 变体型（Variant）变体型也称为可变类型，它是一种特殊的数据类型。能够保存所有类型的数据，且可以随时转换为其他类型。因此，可以把任意类型的数据赋予变体型变量时，VB会自动完成必要的转换。,以上介绍的VB基本数据类型由系统设定，且关键字（如Integer、String等）、声明符（%、$等）、所占内存空间等不允许用户更改。,小结：,不同点 ：
9、在程序执行过程中，变量中存储的值可以改变；常量的值则始终保持不变。,3.3 常量与变量,在VB中有两种类型的常量：直接常量和符号常量。（一）直接常量:从常量的表示形式能直接看出其类型和值。 根据数据类型的不同，直接常量分为：字符串型常量、数值型常量、布尔型常量、日期型常量等。例如：1000 整型（Integer） “12345” 字符串型 #2/8/2006 10:05:00 AM# 日期型 可以在名称后面加类型符以示说明，例如：1.56! 单精度浮点型常量1.56# 双精度浮点型常量,3.3.1 常量,1、用户定义的符号常量使用Const语句进行进行声明的语法为：Const 符号常量名 As
10、 数据类型 = 表达式 其中： 符号常量名：命名规则同VB标识符。 As 数据类型：为可选项，用来说明常量的数据类型。 表达式：可以是各种类型的直接常量，或者是表达式。 例如： Const pi as double=3.1415926,（二）符号常量：在程序代码中，用标示符来表示一个常量。,2.系统内部定义的常量又称系统常量，是VB系统提供的。这些常量可与应用程序的对象、属性和方法一起使用，在代码中可以直接使用它们。可在“视图|对象浏览器”中查看。例如：Form1.WindowState = vbMinimized =1Form1.WindowState = vbMaximized =2,变量
11、：程序运行过程中其值可以改变的量称为变量。变量代表内存中的存储单元。每个变量均有属于自己的名字和数据类型。程序通过变量名来引用变量的值。变量的数据类型决定该变量可以存储哪种类型的数据。,3.3.2 变量,变量的两个重要特点:,（1）“值可变”一个变量某时刻只能存放一个值，当将某个数据存放到一个变量时，会把变量中原有的值“值”冲掉，换成新的值。例如，以下两个赋值语句：a = 3 a = 8 即：同一个变量在不同时刻可以取不同的值。,（2）“取之不尽”变量的值参与运算的过程中，如果没有改变变量的值，多次使用变量时，其值始终不变。例如， x = 5a = 3 + x b = x * x 4 * x,
12、1、变量的显示声明变量在使用前，需要先声明。,用Dim语句显式声明变量：Dim 变量名AS 类型 其中： Dim语句定义的变量作用范围仅限于本窗体或本过程。 As 数据类型：缺省时，变量为可变型（Variant）。 变量名：命名规则同VB标识符。 例如：Dim number1 As Integer 把number1定义为整型变量Dim mystring As String 把mystring定义为字符串型变量,【注】：1) 使用Dim语句变量声明后，VB自动将变量初始化：数值型变量赋初值为：0字符串型变量赋初值为：空串逻辑型变量赋初值为：False日期型变量赋初值为：#00:00:00#。2)
13、 定义变量时，也可以在变量名后加上类型标识符说明其类型。例如：Dim number1% 把number1定义为整型变量Dim mystring$ 把mystring定义为字符串型变量,【注】：3) 一个Dim语句可以定义多个变量，逗号进行分隔。例如：Dim number1% , mystring$4) 在同一个范围（如一个过程、一个窗体等）内，变量名必须是唯一的。,5) 区分 “常量定义格式” 与 “变量定义格式” Const pi as double = 3.1415926 （）Dim a as Integer = 10 （）Dim a as Interger a=10 （）,2、 隐式声明
14、Visual Basic允许用户在编写应用程序时，不声明变量而直接使用，系统临时为新变量分配存储空间并使用，这就是隐式声明。所有隐式声明的变量都是Variant数据类型。Visual Basic根据程序中赋予变量的值来自动调整变量的类型。例如： number1 = 5 mystring=“VB 编程”,3.4.1 运算符,运算符是代表VB某种运算功能的符号。VB中的运算符有以下4类：算术运算符字符串运算符关系运算符逻辑运算符,3.4 运算符和表达式,1. 算术运算符（见下表） P48,Dim a as Integer a=3,或者：Dim a %a=3,例如：5*a2+8=,53,说明：,1、
15、/和的区别：/：同“数学运算”中的除法运算； ：整除运算 ：整数相除后的整数部分。 参加运算的数有小数，先将其四舍五入变为整数后，再做除运算。例如： 1.8/2.0=0.9 1.82.0=1 1/2=0.5 12=025.566.91 = 32、mod 模运算：整数相除后的余数部分 例如：9 mod 7 = 2 1 mod 2 = 1 25.56 mod 6.91 = 5,【注】：Mod符号两端都应加上空格,应用举例： 变量year能被4整除的条件：year mod 4 = 0 取得一个两位数x的十位数、个位数的表达式：x10x-(x10)*10,1、 “+”和“&”的区别：当两个被连接的数据
16、都是字符型时，它们的作用相同。当数字型和字符型连接时，“&”把数据都转化成字符型然后连接；“+”把数据都转化成数字型然后连接。例如：2、 两者作用相同，但为了避免和加法运算混淆，最好用“&”。,“ABC“+“DEF“ 其值为“ABCDEF“。 “姓名：“ & “张三“ 其值为：“姓名：张三“。 23 & “7“ 其值为：“237“。 23+“7“ 其值为：30。 23+“7abc“ 出现类型不匹配的错误。,2. 字符串运算符字符串用于实现字符串的连接，运算结果为字符串型。,【注】：&符号两端都应加上空格。,3.关系运算符关系运算符都是双目运算，是用来比较两个运算量之间的关系，关系表达式的运算结
17、果为逻辑量。若关系成立， 结果为True，若关系不成立，结果为False。关系运算符见下表：,3.关系运算符（见下表） P49,运算级别相同,比较两个运算量之间的关系，若关系成立，结果为True，若关系不成立，结果为False。,关系运算的规则如下： 当两个操作式均为数值型，按数值大小比较。 字符串比较,则按字符的ASCII码值从左到右依次比较。ASCII码值“由小到大”为:09 A Z a z例： “ ABCDE “ “ ABRA “ 结果为 False 数值型与可转换为数值型的数据比较，例：29“189“ ，按数值比较，结果为False。 数值型与不能转换成数值型的字符型比较，例：77“
18、sdcd“ ，不能比较，系统出错。 “Like”运算符常与通配符（*、?）结合使用，用于字符串的模糊查找。其中，* 代表1-n个字符 如：“X*“ “*B*“？代表单个字符 如：“X?“ “?B?“例: “XYZ“ like “X*“ 结果为:True “ABC“ like “?B?“ 结果为:True,7位ASCII码列表,4. 逻辑运算符（见下表） P50,逻辑运算结果：,T Xor T = F T Xor F = T F Xor F = T F Xor T = T,相异则真,相同则真,真假则假,全真则真,有真则真,T And T = T T And F = F F And F = F F
19、 And T = F,“与”,T Or T = T T Or F = T F Or F = F F Or T = T,“或”,“异或”,T Eqv T = T T Eqv F = F F Eqv F = T F Xor T = F,“等价”,T Imp T = T T Imp F = F F Imp F = T F Xor T = T,“蕴含”,（1）逻辑运算符（按优先级）：not and or xor eqv imp（2）参与逻辑运算的量一般都应是逻辑型数据，如果参与逻辑运算的两操作数是数值量，则以数值的二进制值逐位进行逻辑运算（0当False,1当True）。,说明：,3.4.2 表达式,
20、1表达式的组成表达式由变量、常量、运算符、函数和圆括号按一定的规则组成，表达式的运算结果的类型由参与运算的数据类型和运算符共同决定。2表达式的种类根据表达式中运算符的类别可以将表达式分为算术表达式、字符串表达式、关系表达式、逻辑表达式和日期表达式等。,3表达式的书写规则：（1）不能出现上标和下标，如： X5 、102 。 （2）在数学表达式中省略的内容必须重新写上。如：乘号*，即：2x要写成2*x。 （3）只能使用小括号（），可以多重使用，但必须成对出现。 （4）数学表达式中的符号必须改成VB能够识别的符号（运算符、函数名等）。 （5）尽可能的使用系统函数。（3.5小节）,VB中的算式表达式例
21、如： xx(x+1)+1 【注】：不同类型的数据构成的算数表达式，在计算的过程中，将低精度类型转换为高精度类型，结果为高精度类型。即按Integer、Long、Single、Double、Currency的顺序转换，如：10% + 10.5! = 20.5!10% + 20& = 30&10.6! + 20.6# = 31.2#20& + 10.5! = 30.5#Long型数据和Single型数据进行运算时，结果总是Double型数据。,x*(x*(x+1)+1),VB中的关系表达式 通常表示一个简单条件，返回值为True或False例如： age20、score80、X+YZVB中的逻辑表
22、达式 通常表示复杂条件，返回值为True或False常用的逻辑运算符是 Not、And 和 Or ，主要用于对多个关系表达式进行逻辑判断。例如：数学上表示某个数在某个区域时用表达式： 10X20 0X5 VB中的字符串表达式 完成字符串的连接操作例如： “Visual “ & “Basic“ “Visual Basic“Visual “ + “Basic“ “Visual Basic“,X=10 And X20,0X And X5,VB中的日期表达式两个日期型数据可以相减，结果是两日期相差的天数。例： #11/5/2008# - #11/1/2008# = 4日期型数据可与表示天数的数值相加减
23、。例： #10/1/2008# + 10 = #10/11/2008# #10/1/2008# - 10 = #9/21/2008#,4运算符的优先级当表达式中存在多种运算符共存时，按如下优先级的先后进行运算：圆括号算术运算符字符串运算符关系运算符逻辑运算符相同级别的运算，按照从左至右的顺序进行。例如：计算下列表达式的值False or（63 and (7+2)=9） 表达式值为： 8+（3*（10/2-3）2 表达式值为：,True,44,本节重点：1、熟记标示符的命名规则2、熟悉VB的基本数据类型3、掌握符号常量的定义方法4、掌握变量的声明方法5、熟悉VB中常见的运算符6、掌握VB表达式的
24、书写规则；熟记运算符的优先级；会根据优先级，对VB表达式进行分析、计算。,作业：一、完成P59 填空题（1-4）二、自学 P51 例题3.1-3.2三、复习3.1 -3.4内容，预习3.5、第四章,3.5 常用函数,VB提供了大量的内部函数供用户调用。函数的一般调用格式：函数名（参数表） 说明： 参数表是一个参数，或逗号隔开的多个参数，参数可以是表达式 使用库函数要注意参数的个数及参数的数据类型 要注意函数的定义域（自变量或参数的取值范围）例如： sqr(x) 要求： x=0 要注意函数的值域如：exp(23773) 的值就超出实数在计算机中的表示范围。 函数一般作为表达式的组成部分被调用 举
25、例:,例如： 数学表达式 写成VB表达式为：？? ? 数学表达式 8sinx3 + sin2x 写成VB表达式为：？? ?,数学函数包括了：绝对值函数，取整函数，指数函数，对数函数，求平方根函数，三角函数，符号函数等。一、绝对值函数（Abs）Abs(x) 返回x的绝对值，返回值类型与参数相同。例如： Abs（6.5） 的值为6.5Abs（-6.5）的值为6.5,3.5.1 数学函数,二、指数函数Exp和对数函数LogExp(x) 返回以e为底，以x为指数的值，即求ex的值 e2.71828182845905 例如：Exp（0）的值为: 1Exp（1）的值为: 2.71828182845905E
26、xp（2）的值为: 7.38905609893065Exp（-3）的值为: 4.97870683678639E-02,2. Log(x) 返回x(x0)的自然数对数值，即求ln(x)的值以任意底数n计算x的对数转换公式：logn(x)=Ln(x)/Ln(n)例如：Log（1）的值为0Log（2.71828182845905）的值为1 数学表达式log28写成VB表达式为：?log(8)/log(2),三、求平方根函数（Sqr）Sqr(x) 返回x(x=0)的平方根例如：Sqr（16）的值为4Sqr（36）的值为6,四、三角函数（Sin, Cos, Tan, Atn）1. Sin(x) 、 Co
27、s(x) 、Tan(x) 返回x的三角函数值其中，三角函数的自变量x以弧度表示。度值转换为弧度值的公式： 1=/180所以，数学表达式 Sin（300）要写成VB表达式为： ? Sin(30*3.14159/180)。2. Atn(x) 返回x的反正切函数值，返回值为弧度。例如：以下VB表达式Sin（30*3.141592654/180）的值为：0.5Cos（60*3.141592654/180）的值为：0.5 Tan （30*3.141592654/180）的值为： 0.577350269280783Atn（0.577350269280783）的值为： 0.523598775666667 （
28、30*/180）,例如： 数学表达式 写成VB表达式为：(-b+sqr(b2-4*a*c)/(2*a) 数学表达式 8sinx3 + sin2x 写成VB表达式为：8*sin（x3）- sin(x)2,五、符号函数（Sgn）Sgn(x) 返回x的符号值。返回值取决于x 的符号：,-1 x0例如：Sgn（65.1）的值为1Sgn（-65.1）的值为-1Sgn（0）的值为0,六、取整函数（Fix , Int , Cint）（1）Int(x) 取得小于或等于x的最大整数 例如：Int(3.5) = 3Int(-3.5)= -4（2） Fix(x) 取得整数部分，截去小数部分 例如：Fix(3.5)
29、= 3Fix(-3.5)= -3【注】：当x0 时，二者功能相同当x=x; Int(x)=x （3） Cint(x) 把x的小数部分四舍五入取整例如： Cint(3.5) = 4Cint(-3.5)= -4,Fix（5.7）的值为：Fix（5.3）的值为：Fix（-3.9）的值为：,Int（4.7）的值为：Int（6.2）的值为：Int（-2.7）的值为：,Cint（3.6）的值为：Cint（5.3）的值为：Cint（-4.8）的值为：,4,6,5,5,-3,4,5,-5,-3,练习：,七、内部随机函数Rnd(x)可以写成Rnd，Rnd产生出一个大于0但小于1（0Rnd1）的双精度随机数。,若
30、生成 a , b （ba0 区间内的随机整数，则可以使用以下公式：Int(b-a+1)*Rnd+a)Fix(b-a+1)*Rnd+a)Cint(b-a)*Rnd+a)如何产生 50，60 区间内的随机整数？ Int (60-50+1)*Rnd+50) = Int(11*Rnd+50)Fix (60-50+1)*Rnd+50) = Fix(11*Rnd+50) Cint (60-50)*Rnd+50) = Cint(10*Rnd+50)每次运行时，要产生不同序列的随机数，先执行Randomize语句。程序验证（生成50-60随机数）,常用数学函数表（一） P 52,常用数学函数表（二） P 52
31、,3.5.2 数据类型转换函数,一、ASCII码函数Asc(C) 返回字符串C中首字符的ASCII码值例如：Asc（“ABC“）的值为65Asc（“BC“）的值为66Asc（“abc“）的值为97,二、字符转换函数Chr(x) 返回ASCII码x所代表的字符。参数x必须在0-127之间取值。例如：Chr（65）的值为“A“Chr（66）的值为“B“Chr（97）的值为“a“,三、数值转换函数Val(C) 依次返回字符串表达式C中所含的数值(包括.- e）,若遇到非数值符号则停止转换（空格符号除外） 例如：Val(“-123.4“)的值为-123.4Val(“1234abc“)的值为1234Va
32、l(“a1234“)的值为0Val(“1234“)+Val（“5678“）的值为6912,程序验证,Private Sub Command1_Click()Dim x As Singlex = Val(“-1.234 12239e10abc“)Print xEnd Sub,四、字符串转换函数Str(x) 返回数值x的字符串形式例如： Str（1234）+ Str（5678） 的值为“12345678“Str（1234）+ Str（-5678）的值为“1234-5678“【注】：字符串的首字符用于表示原数值的符号：空格表示正数，负号表示负数。,程序验证,Private Sub Command1_
33、Click()Dim x As Stringx = Str（1234）+ Str（5678） Print xEnd Sub,常用转换函数表 P53,3.5.3 字符串函数,一、删除空格字符串函数LTrim(C) 删除字符串C左边的空格字符 RTrim(C) 删除字符串C右边的空格字符 Trim(C) 删除字符串C左右两边的空格字符例如： LTrim（“ 郑州市”）的值为“郑州市 ” RTrim（“中原区 “）的值为“中原区” Trim（“ 计算机专业 “）的值为“计算机专业”,二、求子串函数Left(C,n) 截取字符串c左端的n个字符 Right(C,n) 截取字符串c右端的n个字符 Mid
34、(C,m,n) 截取字符串c中从第m个字符开始的n个字符。例如： Left（“Abcdefg“,3）的值为“Abc“ Left（“信息商务学院”,2）的值为“信息“ Right（“Abcdefg“,3）的值为“efg“ Right（“重庆通信学院”,4）的值为“商务学院“ Mid（“Abcdefg“,3,3）的值为“cde“ Mid（“郑州市中原区政府”,4,3）的值为“中原区“,请自行学习：P53 例3.3P55 例3.4,三、字符串长度测试函数Len(C) 返回字符串C中包含的字符个数例如：Len（“Chong Qing Shi“）的值为14 Len（ “ 中国!“ ）的值是4Len（ “
35、chongqing“ ）的值是9,四、字母大小写转换函数（Ucase,Lcase）UCase(C) 把字符串C中的小写字母转换成大写字母；LCase(C) 把字符串C中的大写字母转换成小写字母；例如：Lcase（“ABCDefgh“）的值为“abcdefgh“Ucase（“ABCDefgh“）的值为“ABCDEFGH“,五、重复字符串生成函数Space(n) 生成由n个空格组成的字符串String(n,ch) 生成由n个相同的ch字符组成的字符串。 例如：Space（5）的值为“String（6，“D“）的值为“DDDDDD“String（4，“ABCD“）的值为“AAAA“,常用字符串函数表
36、 P53,3.5.4 日期与时间函数 P26,Private Sub Command1_Click()Dim x As Datex = Now() Print xEnd Sub,本节重点：1、熟悉VB中的算数运算符、关系运算符、逻辑运算符。2、掌握VB表达式的书写规则，熟记运算符的优先级。会根据优先级，对VB表达式进行分析、计算。3、会将数学表达式转化为VB识别的表达式。4、掌握VB常用的内部函数。,一、P59 填空题二、写出下列表达式的值：(1)（2+8*3）/2 (2) “ Visual“ & “ Basic “ (3) 2*3=8 (4) “12345“12345“ &“ ABC” (5
37、) 4=4 And 52+2 (6) 233 And 510,作业：,三、把下列数学表达式写成VB能够识别的表达式,a*b*c*d/e/f/g 或 a*b*c*d/(e*f*g),sin(45*3.14/180)+(exp(10)+log(10)/sqr(x+y+1),四、若产生10,99区间范围内的随机数，则表达式为：五、若截掉x小数点后面第三位及以后的小数，则表达式为：,Int(90*Rnd+10),Fix（(x*100)/100）,0x10,x=0 And x10,六、根据所给条件，写出逻辑表达式：1、选拔优秀生的条件为：年龄(Age)小于19岁，三门课（Mark1、Mark2、Mark3）总分(Total)高于285分，其中有一门为100分。其逻辑表达式为：Age285 And ( Mark1=100 Or Mark2=100 Or Mark3=100 ),七、闰年的条件是：年号（year）能被4整除但不能被100整除；或者能被400整除。其逻辑表达式为：【技巧】：被某数整除，可以用算数运算符mod或数学函数Int（）来实现：如：判断year能被4整除 实现一：year mod 4 = 0实现二：year/4=Int(year/4),（year mod 4=0 And year mod 1000）Or (year mod 400=0),The End！,
