计算机科学学院.pptx

上传人：kun****un

文档编号：84404766

上传时间：2026-02-19

格式：PPTX

页数：98

大小：2.19MB

《计算机科学学院.pptx》由会员分享，可在线阅读，更多相关《计算机科学学院.pptx（98页珍藏版）》请在知学网上搜索。

,Click to edit Master title style,Click to edit Master text styles,Second level,Third level,Fourth level,Fifth level,Click to edit Master title style,Click to edit Master text styles,Second level,Third level,Fourth level,Fifth level,2026/2/19,1,第二章,Visual Basic,语言基础知识,2.1,数据类型,2.2,常量和变量,2.3 运算符与表达式,2.4 常用内部函数,2.1 数据类型,2026/2/19,2,数据是程序的必要组成部分，也是程序处理的对象为了对数据进行快速处理和有效地分配存储空间，,VB,把数据分为各种不同的数据类型,基本,数据,类型,变体,字符串,数值,布尔,对象,货币,字节,日期,用户,自定义,数据类型,字符串型,2.1 数据类型,2026/2/19,3,关键字：String，类型说明符：$,存放字符型数据，字符型数据包括所有的英文、汉字和数字等。

,字符串放在双引号(“”)内，其中长度为0(即不包含任何字符)的字符串为空串(空串不等于空格串),变长字符串和定长字符串(最长不超过65535个字符),欢迎使用Visual Basic、abcde123、12345,2.1 数据类型,2026/2/19,4,数值型,整型数,：,存放整数，取值范围：,-32767,32767,浮点数：,存放带小数的数，浮点数可以用科学计数法来表示，所以小数点可以出现在任意位置,整型,Integer,%,占2个字节,长整型,Long,&,占4个字节,单精度型,Single,！,占4个字节,123.45 123.45！0.12345,E,+3,双精度型,Double,#,占8个字节,123.45#0.12345,D,+3,2.1 数据类型,2026/2/19,5,货币型,关键字：,Currency,货币型是为了表示钱款而设置的，以,8,个字节存储，精确到小数点后,4,位，多余位舍去,+922 337 203 685 477.5807,变体型,关键字,：,Variant,一种类型可变的数据类型，可以表示任何类型数据,布尔型,关键字：,Boolean,取值为：,True,或,False,小数点前15位,小数点后4位,2.1 数据类型,2026/2/19,6,关键字：Byte,以1个字节存储无符号整数（注意数据溢出）,关键字：Date,以8个字节浮点数形式存储,日期文字必须以一对符号(#)括起来,如：#9/10/2001 12:30:00#,字节型,日期型,Visual Basic,基本数据类型,-,简表,数据结构,关键字,类型符,前缀,占字节数,举例,字节型,Byte,无,byt,1,0255,整型,Integer,%,int,2,-3276832767,长整型,Long,&,lng,4,-21474836482147483647,单精度型,Single,!,sng,4,-3.4,E19 1.4E-10,双精度型,Double,#,dbl,8,1.75686267,D36,货币型,Currency,cur,8,$12.345,日期型,Date(Time),无,dtm,8,03/25/1999,逻辑型,Boolean,无,bln,2,True False,字符型,String,$,str,字符串,abcdef,对象型,Object,无,obj,4,Command,变体型,Variant,无,vnt,按需分配,任一值,VarType(),检测,例子,2026/2/19,8,真题,Dim TestDate As Date,为变量,TestDate,正确赋值的表达方式是（）,(A)TextDate=#1/1/2002#,(B)TestDate=#“1/1/2002”#,(C)TextDate=date(“1/1/2002”),(D)TestDate=Format(“m/d/yy”,“1/1/2002”),A,2.1 数据类型,2026/2/19,9,2%表示2以整型数据存储。

,5&表示5为长整型数据存储,3.6e+5,表示数学中的,3.610,5,，,7.45E-6,表示,7.4510,-6,55.87d+5,表示数学中的,55.8710,5,，,7.45D-6,表示,7.4510,-6,2,表示的类型是？,1,.,2,表示的类型是？,23.5,表示,23.5,以货币型数据存储,变长/定长字符串,2026/2/19,10,Dim a as String,01,Dim a As String*6,02,变体型,2026/2/19,11,dim a As Variant 定义a为变体型数据,01,a=123 a为整形数据,02,a=“visual basic”a为字符型数据,03,说明：,04,不同类型的数据，所占的存储空间不一样,05,数据的类型可在数据之后加上一个类型符来表示，例如，413&，86!，104.67#等,06,第二章 Visual Basic语言基础知识,数据类型,变量和常量,运算符与表达式,常用内部函数,01,02,03,04,常量,什么是常量,当程序运行时，存储单元中内容保持不变的称为常量,1,文字常量,2,符号常量,3,系统常量,vbCrLf,(2),数值常量,系统预定义的常量,(,如：,回车换行符,),，,可在“对象浏览器”中查看,(1),字符串常量,Const PI=3.14,代替数值,或字符串,文字常量,2026/2/19,14,(1,)字符串常量,“China“”95.3%“,”计算机软件”,(2)数值常量,整型/长整型,八进制数,&,123,或,&O,123,十进制数,123,十六进制数,&,H,123,货币型,定点数,浮点型,实数,3.89,E,-3 9.39,D,7,浮点数表示：,E,（或,D,）字母前必须有数值，,E,（或,D,）字母后必须为整数,符号常量,2026/2/19,15,定义符号常量代替数值或字符串。

一般格式：,Const,常量名称,=,表达式,常量名称,=,表达式,注意：,符号常量一般定义为大写字母，声明后可以在常量名称后面带上类型说明符,.,在程序中引用时通常省略类型符,如：,Const PI&=3.14 Const ONE%=250,定义好符号常量后，不能定义和其名称一样的变量,符号常量一经定义，其值就不能在程序中的其他位置进行改变,.,(,程序演示,),说明下列哪些表示的是VB合法的常量值，分别指出它们是什么类型？,思考,2026/2/19,16,100#(11)(12)&O100,100.0 (2)%100 (3)1E1,ASDF (8)”1234”(9)#2000/10/7#,123D3 (5)123,456(6)0100,T (17)&H12ag(18)-1123!,&O78 (14)&H123(15)True,什么是变量,2026/2/19,17,Private sub form_click(),Dim a as integer,a=3,a=a+1,print a,End sub,数据信息可以暂时存放在计算机的存储单元中当程序运行时，存储单元中内容可被改变称为变量,什么是变量,2026/2/19,18,数据信息可以,暂时存放,在计算机的存储单元中。

当程序运行时，,存储单元,中内容可被改变称为变量,变量,声明方法,命名规则,3,变量的命名规则,2026/2/19,19,只能由字母、数字和下划线(或汉字)组成，长度不能多于255个字符,abc_12,必须以字母或汉字开头，最后一个字符可以是类型说明符,abc$程序设计#,变量名不能使用VB中的保留字(关键字),如Sub是不能做为变量名(程序演示),VB中不区分变量名中字母的大小写,变量名最好做到“见名知意”,下列符号中，那些是VB合法的变量名？,思考,2026/2/19,20,2,1,a123 (2)a12_3(3)123_a,变量名 (11)abcdefg (12),a 123 (5)Integer (6)XYZ,False (8)sin(x)(9)sinx,4,3,变量的类型,2026/2/19,21,（2）定义变量时声明其类型,显式声明,Declare,变量名,As,数据类型,Dim(,演示,),Static(,演示,),Public(,全局,),Private(,局部,),Dim a as integer,Dim S1 As String,（变长）,Dim S2 As String*50,（定长）,比较：,Dim a as integer,，,b as long,Dim a%,，,b&,Dim a,，,b,注意：,VB,中不允许在定义变量的同时对其赋值,如：,Dim a%=100,（错误）,隐式声明,变量声明,2026/2/19,22,变量未定义(或声明时不指定类型)直接使用，VB默认该变量为变体类型(Variant)。

,1,Dim 变量名 As Variant,2,Dim SomeValue,缺省为 Variant,3,SomeValue=“17”,SomeValue包含“17”（有两个字符的字符串）,4,SomeValue=SomeValue-15,现在，SomeValue 包含数值 2,5,SomeValue=U&SomeValue,现在，SomeValue 包含 U2（双字符的串）,6,例子,2026/2/19,23,Dim intCount As Integer,intCount=100,Dim sngCount As Single,sngCount=100.01,Dim strFname As String,strFname=Smith,Dim M_Variant As Variant,M_Variant=123,M_Variant=123,M_Variant=True,变量的类型,2026/2/19,24,（1）用类型说明符来标识,%,整型,&,长整型,!,单精度浮点数,#,双精度浮点数,货币型,$,字符串型,Num%,和,Str1$,均是,合法的变量名,常量和变量,2026/2/19,25,变量,隐性声明,如果没有声明就直接使用，,Visual Basic,会自动根据数据值对其规定数据类型。

,X=35,X,为,Integer,类型,Y=Visual Basic 6.0,编程,Y,为,String,类型,后缀法声明,常量和变量,2026/2/19,26,在Visual Basic中，对有些数据类型的变量，允许直接在变量名后面加上数据类型符（即后缀），指定该变量的数据类型,xa%变量xa是整型数据,xb 变量xb是货币型数据,xc$变量xc是字符型数据,3,2,1,4,B,例题,真题,以下声明语句中错误的是（）,A,）,Const var1,=123,B,）,Dim var2=ABC,C,）,Dim s,D,）,Static var3 As Integer,变量的初值,2026/2/19,28,说明：定义一变量后，系统自动为该变量赋初始值数值型的初值为0；字符型变量的初值为空字符串（其中变长字符串的初值是长度为0的空字符串，定长字符串的初值是长度等于定义值的空字符串）,用DefType语句定义,DefType,2026/2/19,29,用途：在标准模块和窗体模块中定义变量,格式：DefType 字母范围，字母范围,说明：,Def是保留字，Type是类型标志，可以是常用数据类型,成批定义：字母或以该字母开头的变量名都被定义为同一类型,例：DefInt C-F,以C,D,E,F开头的变量都定义为整型,变量类型的转换,2026/2/19,30,例：,CInt(,2345,),转换函数,转换结果类型,转换函数,转换结果类型,CByte(x),Byte,CCur(x),Currency,CBool(x),Bool,CDate(x),Date,CInt(x),Integer,CStr(x),String,CLng(x),Long,CVar(x),Variant,CSng(x),Single,CVErr(x),错误型,CDbl(x),Double,强制变量声明,2026/2/19,31,在通用声明处加“Option Explicit“语句来强,制显式声明变量。

,工具-选项-编辑器-要求变量声明,Option Explicit,强制变量声明,第二章 Visual Basic语言基础知识,01,04,02,03,常量和变量,运算符与表达式,数据类型,常用内部函数,运算符类型,2026/2/19,33,算术,运算符,字符串,连接,关系,运算符,逻辑,运算符,1.算术运算符,2026/2/19,34,运算符,含义,优先级,实例,结果,幂运算,1,2 2,4,*,乘,3,5*4,20,/,除,3,9/3,3,整除,4,10 3,3,Mod,取余数,5,10 mod 3,1,+（-）,加（减）,6,20+1+4,25,例：,5*,4+10 mod 10 9/3+2 2,1.算术运算符,2026/2/19,35,把数学表达式转换为VB的表达式,算术运算符及其表达式,2026/2/19,36,算术运算符的操作数,可以,是数值型,、数字字符型或逻辑型计算时数字字符型和逻辑型数据自动转换为数值型后再参与运算,逻辑型,数字字符型,数值型,运算,操作数应是数值型,若是数字字符或逻辑型，则自动转换,例：,False+12+“24”,结果为,36,算术表达式可以使用多层括号，且乘号不能省略,例：,2*（,x3+5*(y1+y2),整除运算与取模运算,2026/2/19,37,例 37.77 5.88 和,37.77 Mod 5.88,37.77,5.88,38,6,=,6,商,+,2,余数,分析以下代码的结果,代码分析,2026/2/19,38,Private Sub Form_Click(),a=2,b=3,Print a+b,a-b,Print a*b,a Mod b,Print a/b,a b,Print a b,End Sub,代码分析,2026/2/19,39,任务,2,给定一个两位正整数,(,如,36),，交换个位数和十位数的位置，并将处理后的结果显示在窗体上,编写的窗体单击事件过程代码如下：,Private Sub Form_Click(),Dim x As Integer,a As Integer,Dim b As Integer,c As Integer,x=36,a=x 10 ,求十位数,b=x Mod 10 ,求个位数,c=b*10+a ,生成新的数,Print,处理后的数,:;c,End Sub,2、字符串运算符 +,&,“”运算符,当两边操作数为字符串时，进行字符串的连接,当两边操作数为数值数据或为可转换为数值数据的逻辑值True(-1)、False(0)或字符串时，则做数值相加运算,其他情况：出错,False+12+24,逻辑型和数据型的转换,2026/2/19,41,数值型数据,01.,逻辑型数据,01.,数据转换,01.,数值型数据,01.,逻辑型数据,01.,0,01.,False,01.,非0,01.,True,01.,0,01.,False,01.,1,01.,True,01.,2、字符串运算符 +,&,123&xyz 结果为新字符串123xyz,01,123&456 结果为新字符串123456,02,123&xyz 结果为新字符串123xyz,03,2、字符串运算符 +,&,123+45 结果为数据168,123+45 结果为数据168,Visual Basic 编程+45 程序会提示出错,123&456 建议使用,2、字符串运算符 +,&,“123“+“456“,“123“&“456“,“123”+456,“123”&456,“a23”+456,“a23”&456,“123456”,“123456”,出错,“a23456”,579,“123456”,区别：+两边必须是字符串才连接，&不一定,书写时，操作数与&之间要加空格,字符串运算符及其表达式,2026/2/19,45,例如：,100 +123 ,结果为,223,100 +123 ,结果为,100123,Abc +123 ,出错,100“&123 ,结果为,100123,100&123 ,结果为,100123,Abc&123 ,结果为,Abc123,Abc&123 ,结果为,Abc123,答案,字符串运算符及其表达式,2026/2/19,46,任务3 编写一个简单的加法程序，用两个文本框存放被加数和加数，另外一个文本框存放结果，单击“计算”按钮将计算结果显示在结果框中，单击“算式”按钮将整个算式完整显示在算式的标签中。

,字符串运算符及其表达式,2026/2/19,47,Private Sub Command1_Click(),Dim s1 As Integer,s2 As Integer,s3 As Integer,s1=Val(Text1.Text),s2=Val(Text2.Text),s3=s1+s2,Text3.Text=s3,End Sub,Private Sub Command2_Click(),Label3.Caption=Label3.Caption&Text1.Text&+&_,Text2.Text&=&Text3.Text,End Sub,练习,2026/2/19,48,Private sub form_click(),a=“,西南”,:b=“,石油大学”,print a&b,print a+b,c=123,print c&4,c&“4”,print c+4,c+”4”,d=“123”,print d&4,d&“4”,print d+4,d+”4”,End sub,想一想,关系、逻辑运算符,2026/2/19,49,关系运算符,逻辑运算符,运算符的优先级,=、=、,Not、And、Or,算术运算符字符运算符关系运算符逻辑运算符,关系运算符及其表达式,2026/2/19,50,关系运算符也称为比较运算符，用来比较两个操作数之间的大小关系，操作数可以是数值型数据、字符（串）型数据、日期型数据等，但不能是逻辑型数据，若为逻辑型数据则需要根据逻辑型数据向数值型数据转换的规则转换后再进行运算。

关系运算的结果是逻辑值，即运算的结果只有,True,和,False,两种,数值型数据,字符型数据,日期型数据,逻辑型数据,数值型数据,运算,关系运算符及其表达式,2026/2/19,51,数值型数据在进行比较的时候，直接比较其值大小,例如：53的结果为True,日期型数据比较大小时，VB会把日期型数据看成一个yyyymmdd的8位整数，按照数值比较其大小,例如：#1999-5-6#2003-6-13#的结果为False,关系运算符及其表达式,2026/2/19,52,关系运算的规则如下：,（1）当两个操作数均为数值型，按数值大小比较,（2）字符串比较,则按字符的ASCII码值从左到右一一比较,直到出现不同的字符为止.,例：ABCDE ABRA,结果为 False,关系运算符及其表达式,2026/2/19,53,字符型数据比较大小时，若为单个字符，比较其,ASCII,码值；若为字符串时，依次从左边第一个字符开始比较，直到发现一个不相同的为止，由第一个不相同的字符的大小的关系代表字符串的大小，若字符串长度不相等，短字符串尾部可以补空格比较常见的字符值由对应的,ASCII,码表中的顺序决定,常见字符,ASCII,码大小关系如下：,空格,019,ABYZ,abyzaab,的结果为,True,；,abc=ABC,的结果为,False,。

,关系运算符及其表达式,2026/2/19,54,算术运算符,含义,示例,结果,优先级,=,等于,abc=abd,False,算术运算符具有相同的优先级,大于,(3+5)2,True,=,大于等于,abc=abd,False,小于,abcabc,False,=,小于等于,23=4,True,不等于,aA,True,关系运算符及其表达式,2026/2/19,55,05,04,02,03,01,逻辑值不能参加运算，如果比较中出现逻辑值，先将逻辑值转换为对应的数值型数据再进行比较,=3“189”，按数值比较，结果为False；,数值型与不能转换成数值型的字符型比较，,如：77sdcd，不能比较，系统将提示出错,关系运算没有优先级，也可以认为具有相同的优先级，所以计算的时候按照从左到右的顺序进行计算,关系、逻辑运算符,2026/2/19,57,【,例,】,使用逻辑运算符,Private Sub Command1_Click(),Dim A As Integer,B As Integer,C As Integer,A=10,B=8,C=6,Print A B And B C,Print B A Or B C,Print Not A B,End Sub,关系、逻辑运算符,2026/2/19,58,如果逻辑运算的操作数（运算量）中有一个是数值型值。

则,VB,会将所有的运算量转换为整数进行“按位逻辑运算”,运算规则是将整数以二进制形式按位进行逻辑运算，结果转换为十进行制整数,如：,（,1,）,10 Or 8,的值为,10,,10=00001010,8 =,00001000 Or,10=00001010,（,2,）,Not 10,的值为,-11,,10=00001010,Not,-11=11110101(,补码取反加,1,）,练习,2026/2/19,59,设三个边长分别为A、B、C，则用来判断这三个边能组成三角形的表达式是什么？,A+BC and B+CA and A+CB,01,02,练习,2026/2/19,60,Private sub form_click(),print 32 and 32 and 33 or 23,Print 10=3=b*3,Print Visual Basic 21,表达式求值,2026/2/19,64,11,21,false,True 1,第二章 Visual Basic语言基础知识,数据类型,常量和变量,运算符与表达式,常用内部函数,2.4 常用内部函数,2026/2/19,66,数学函数,01,转换函数,03,字符串函数,02,日期/时间函数,04,数学函数,2026/2/19,67,函数,含义,示例,结果,Atn,返回弧度的正切值,Atn(1),.785398163,Cos,返回弧度的余弦值,Cos(1),.540302305,Sin,返回弧度的正弦值,Sin(1),.841470984,Tan,返回弧度的正切值,Tan(1),1.55740724,在三角函数中的自变量是以弧度为单位。

,如：,sin30,0,将,30,度转换为弧度,sin(3.14159/180*30),数学函数,2026/2/19,68,Abs,（,1,）,正数,1,Abs,（,-5,）,负数,5,函数,含义,示例,结果,Abs,返回数的绝对值,Abs,(-,3.2,),3.2,函数,含义,示例,结果,Exp,返回,e,的指定次幂,Exp(,1),2.718281828,Exp,（,1,）,e,1,(e=2.718281828),Exp,（,-5,）,e,-5,(6.73794699908547E-03),数学函数,2026/2/19,69,符号函数,Sgn,返回值有三种：,Sgn(-3)=-1(,参数为负数,),Sgn(0)=0,Sgn(3)=1(,参数为正数,),函数,含义,示例,结果,Sgn,返回数的符号值,Sgn,(,-2,),-1,函数,含义,示例,结果,Sqr,返回数的平方根值,Sqr(9),3,只有非负数才有平方根（可以是实数）,Sqr(9),Sqr(9.56),表达式转换,2026/2/19,70,将数学公式转换为VB表达式,程序中写为：,Sqr(a+b)*sin(30*3.14/180)/(x12+1)*(y3-2),1,2,数学函数,2026/2/19,71,Fix,（,10.4,）,10,Fix,（,-5.6,）,-5,函数,含义,示例,结果,Fix,返回数的整数部分,(,直接取整,),Fix,(,-50.6,),-50,函数,含义,示例,结果,Int,返回不大于给定数的最大整数,Int,(,-50.6,),-51,Int(50.6)50 Int(-50.6)-51,0,50.6,50,51,-50.6,-51,-50,当,x0,时就直接舍去小数,若,x,0,则舍去小数位后再减,1,随机数函数,2026/2/19,72,直接使用,Rnd,函数每次得到的序列都是一样的，在使用中有时希望每次都得到不同的序列，那么就可以使用,Randomize,随机数种子生成器语句，使用在,Rnd,函数之前，这样可以使得,Rnd,函数产生的随机数为不同的序列,函数,含义,示例,结果,Rnd(x),返回小于,1,且大于或等于,0,的随机数,Rnd,0,1,间的随机数,例题,2026/2/19,73,设a=5，b=10，则 c=Int(b-a)*Rnd+a)+1后，c值的范围为(),510,69,610,59,C,随机数函数,2026/2/19,74,在实际使用中可能需要的随机数要扩大范围或者限制在特定范围内，若要得到050间（不包括50）的随机数，直接可以用得到的随机数乘以50，扩大随机数范围，即，Rnd*50,若要产生1-100的随机整数：Int(Rnd*100)+1,Int(4*Rnd+1)可以产生14之间(含1和4)的随机整数,Rnd函数返回0 1（包括0和不包括1）之间的数。

,Rnd通常与Int函数配合使用,若要生成a,b区间范围内的随机整数，可以用公式,Int(b-a+1)*Rnd+a),产生随机数,2026/2/19,75,01,Int(Rnd*201+300),Fix(Rnd*201+300),产生300500的随机整数,02,Int(Rnd*201-500),Fix(Rnd*200-500),产生-500-300的随机整数,随机数函数,2026/2/19,76,任务通过随机函数产生2个两位正整数，求这2个数之和并显示出来,编写的窗体单击事件过程代码如下：,随机数函数,2026/2/19,77,编写的窗体单击事件过程代码如下：,Private Sub Form_Click(),Dim a As Integer,b As Integer,c As Integer,Randomize ,初始化随机数生成器,a=Int(90*Rnd+10),产生,10,99,区间内的随机整数,b=Int(90*Rnd+10),c=a+b ,求两数之和,Print,产生的两个随机数,:;a,b,Print,和数,:;c,End Sub,说明：如果返回是字符型，则函数后有“$”字符。

,字符串函数,2026/2/19,78,函数,含义,Ltrim$,去掉字符串,Str,左边的空白字符，并返回,Rtrim$,去掉字符串,Str,右边的空白字符，并返回,Trim$,去掉字符串,Str,左边和右边的空白字符，并返回,Ltrim(abcd )=abcd ,Rtrim(abcd )=abcd,Trim(abcd )=abcd,字符串函数,2026/2/19,79,Left$(“World”,2),结果,:,Right$(“World,”,2),结果,:,Mid$(“World”,2,3),结果,:,函数,含义,Left$(C.N),从,C,中左边起取,N,个字符,Right$(C,N),从,C,中右边起取,N,个字符,Mid$(C,N1,N2),从,C,中第,N1,位取,N2,个字符,Wo,Wo,ld,“,”,ld,“,”,orl,orl,“,”,字符串函数,2026/2/19,80,函数,含义,Len(C),返回,C,的长度,Len(“name”),结果,:4,函数,含义,String$(n,Str),返回,由,Str,第一个字符重复,n,次所组成的字符串,Space$(n),返回包含,n,个空格的字符串,String(3,s),的结果为：,sss,String(3,sab),的结果同样为,sss,Space(6),的结果为：,字符串函数,2026/2/19,81,Instr,（,4,，”,xxpxxpXp”,，”,p”,）,函数,含义,Instr(N1,C1,C2,M),返回,C2,在,C1,中首次出现的位置,(,从,N1,开始,),函数,含义,Lcase(c),将,C,中大写字母变为小写字母,Ucase(c),将,C,中小写字母改为大写字母,UCase(How Are You),=,HOW ARE YOU,LCase(How Are You),=,how are you,从第,4,位开始,x,p,第,6,位,结果为,6,练习,2026/2/19,82,s1=ABCDEFGH,s2=Left(s1,2),s3=Right(s1,3),s4=Mid(s1,3,2),Print s2,s3,s4,s1=Visual Basic,i=Len(s1),Print InStr(ABCDEF,BC),Print InStr(2,ABCDEF,BC),Print InStr(4,ABCDEF,BC),Str1=Hello,s1=UCase(Str1),s2=LCase(Str1),Str1=Space(2),Print s1,s2,Str1,10,想一想,练习,2026/2/19,83,100 mod 3,1003+20,“ABC”abc”,Date,Int(-45.235),Fix(45.235),Len(“how are you!”),Left(“visual basic”,6),1,53,False,当前系统日期,-46,45,12,visual,转换函数ASCII码转换函数,2026/2/19,84,Asc,(“,China,”),结果：,67(,大写字母,C,的,ASCII,码值为,67),Chr(100),结果：“,d”(,小写字母,d,的,ASCII,码值为,100),函数名,一般格式,功能,字符转换为,ASC,I,I,码值,Asc(Str),返回字符串,Str,中首字符的,ASC,I,I,码,ASC,I,I,码转换为字符,Chr(n),返回,ASC,I,I,码为整数,n,的字符,转换函数直接转换函数,2026/2/19,85,Str(323.1),结果：“,323.1”,正数无符号，转换成空格,Str(-323.1),结果：“,-323.1”,负数的符号直接转换，无空格,N1=Val(“1.234”)N1,的值是,1.234,数值转换,N2=Val(“1.34ASD45”)N2,的值是,1.34,字母后忽略,N3=Val(-12ASD)N3,的值是,-12,字母后忽略,N4=Val(“ASD123”)N4,的值是,0,字母开头为,0,N5=Val(,“&HFFFF”,),N4,的值是,-1,可以识别八、十六进制,N6=Val(“1.2e2”)N6,的值为,120,单精度型数据,函数名,一般格式,功能,数值转换为字符串,Str(n),返回由数值,n,组成的字符串,字符串转换为数值,Val(Str),返回包含于字符串,Str,内的数字,日期和时间函数,2026/2/19,86,函数,一般格式,说明,Now,Now,返回当前系统日期和时间,Date,Date,返回当前系统日期,Time,Time,返回当前系统时间,Year,Year(T),返回表达式,T,的年份（,yyyy,）,Month,Month(T),返回表达式,T,的月份（,1-12,）,Day,Day(T),返回表达式,T,的日期（,1-31,）,WeekDay,WeekDa(T),返回表达式,T,的星期（,1-7,）,Hour,Hour(T),返回表达式,T,的小时（,0-23,）,Minute,Minute(T),返回表达式,T,的分钟（,0-59,）,Second,Second(T),返回表达式,T,的秒（,0-59,）,Timer,Timer,返回系统当前时间从午夜算起经过的秒数,说明：,日期和时间函数,2026/2/19,87,日期和时间函数使用相对简单，若无参数，则返回系统的时间或日期，若有参数，确定其参数均为日期型的数据，即可操作。

,函数的参数可为任何日期型数据，包括函数的结果例如：,Year(Now)返回当前日期的年份,Day(#7/25/2006#)结果为25,WeekDay函数的结果是将周日认为是一个星期的开始，即，周日对应的返回值为1，依次类推,日期/时间函数示例,2026/2/19,88,Private Sub Form_Click(),x=#1/1/2008#,a=x-Date,b=Weekday(x),c=Year(Date),d=Month(Date),e=Hour(Time),f=Minute(Time),Print,现在距离,2008,年元旦还有：,;a;,天,Print“2008,年元旦是：该星期的第,;,天,Print,本月份是：,;c;,年,;d;,月,Print,现在是：,;e;,时,;f;,分,End Sub,该星期的第,3,天,格式输出函数,2026/2/19,89,说明：,expression为有效表达式，即要转换的数据，format参数一般不省略，当省略时，可以简单认为此时Format函数的作用和CStr函数一致,例如：Format(-455)的结果为-455,函数,一般格式,说明,Format,Format(expression,format,firstdayofweek,firstweekofyear),将数据转换为指定格式字符串,数学函数,2026/2/19,90,1.5+2.5+3.5+4.5=12=round(1.5)+round(2.5)+round(3.5)+round(4.5),四舍六入五凑偶,三角函数,Sin(x)、Cos(x)、Tan(x),取整函数,Fix(x)、Int(x)、CInt(x)、Round(x),随机函数,Rnd,产生0,1)之间的随机数,Randomize,语句,其它数学函数,Abs(x)、Sgn(x)、Exp(x)、Log(x)、Sqr(x),表达式转换,2026/2/19,91,将数学公式转换为VB表达式,01,程序中写为：,Sqr(a+b)*sin(30*3.14/180)/(x12+1)*(y3-2),02,产生随机数,2026/2/19,92,Int(Rnd*201+300),Fix(Rnd*201+300),产生300500的随机整数,Int(Rnd*201-500),Fix(Rnd*200-500),产生-500-300的随机整数,例题,2026/2/19,93,设a=5，b=10，则 c=Int(b-a)*Rnd+a)+1后，c值的范围为(),510,69,610,59,C,字符串函数,2026/2/19,94,Str(num)、Val(str)、Lcase(str)、Ucase(str),取子串函数,字符串转换函数,找子串函数,InStr(str1,str2),求字符串大小函数,Len(str)、LenB(str),Left(str,n)、Right(str,n)、Mid(str,p,n),Ltrim(str)、Rtrim(str)、Trim(str),其它函数,2026/2/19,95,日期/时间函数,Time,Date,Now,转换八进制和十六进制数函数,Oct$(n)、Hex$(n),字符和ASCII码的转换函数,Asc(str)、Chr$(n),课堂练习,2026/2/19,96,4,157 ,12334,123445,表达式,16/4-2 5*8/4 MOD 5 2,的值为,_,赋值语句,:a=123+Mid(123456,3,2),执行后,a,变量为,_,赋值语句,:a=123&Mid(123456,3,2),执行后,a,变量为,_,已知,A=“12345678”,则表达式,Val(Left(A,4)+Mid(A,4,2),的值为,_,本章小结,2026/2/19,97,1.,数据类型：,基本数据类型。

,用户定义的数据类型,2.,常量和变量：,局部变量和全局变量,变体类型变量,缺省声明,3.,常用内部函数,4.,运算符和表达式：,算术运算符,关系运算符和逻辑运算符,表达式的执行顺序,2026/2/19,98,Thank You!,计算机科学学院,。