(精品)vb辅导.ppt

上传人:hwp****526 文档编号:85539873 上传时间:2023-04-11 格式:PPT 页数:48 大小:429.01KB
返回 下载 相关 举报
(精品)vb辅导.ppt_第1页
第1页 / 共48页
(精品)vb辅导.ppt_第2页
第2页 / 共48页
点击查看更多>>
资源描述

《(精品)vb辅导.ppt》由会员分享,可在线阅读,更多相关《(精品)vb辅导.ppt(48页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。

1、辅导班课程内容安排bb理论课理论课1 1、考试知识点强化复习、考试知识点强化复习2 2、常用算法、解题技巧、机试方法、常用算法、解题技巧、机试方法3 3、1010春春VBVB题精讲、基础复习要点题精讲、基础复习要点4 4、0909秋秋VBVB题、题、1010春、秋基础题精讲春、秋基础题精讲bb上机安排上机安排 1 1、现场完成两套模拟题,讲解步骤方法、现场完成两套模拟题,讲解步骤方法 2 2、现场完成一套模拟题,讲解步骤方法。、现场完成一套模拟题,讲解步骤方法。介绍考试常见题型。答疑。介绍考试常见题型。答疑。1V B等级考试辅导课程bb重点内容 过程过程 字符串处理函数字符串处理函数 数组数组

2、 循环循环 分支分支 基本算法基本算法 数据输入数据输入/输出输出 控件控件 变量说明、类型、作用域变量说明、类型、作用域 文件文件(顺序文件顺序文件)调试调试/图形图形2一、过程bbSub子程序过程格式格式:Private|Public Sub()End Sub说明:在同一个模块中,过程名必须是唯一的。说明:在同一个模块中,过程名必须是唯一的。无参数时圆括号不能省略。无参数时圆括号不能省略。形参形参是数组是数组(字符串数组字符串数组),则在数组名后面加,则在数组名后面加一对圆括号,但无须指明数组的维数和下标变一对圆括号,但无须指明数组的维数和下标变化范围化范围。Sub s1(a(10)As

3、Integer)错错 3过 程(续)若若形参形参是字符型的,必须是不定长字符串是字符型的,必须是不定长字符串Sub s1(a As String*5)错错,Sub s1(a()As String*5)?在过程体中不能再定义过程在过程体中不能再定义过程,可以调用其它过可以调用其它过程(包括自己)程(包括自己)Exit Sub语句的功能是提前退出过程调用。语句的功能是提前退出过程调用。End Sub返回调用语句的下一条语句。返回调用语句的下一条语句。4过 程(续)bSub过程调用过程调用(1)语句格式:)语句格式:Call 过程名(实参表列)过程名(实参表列)如:如:Call chang(x,y)

4、Call max(m),n)(2)命令格式:命令格式:过程名过程名 实参表列实参表列如:如:chang x,y max (m),n说明:实参的数目及类型要和定义的形参数保持一致。说明:实参的数目及类型要和定义的形参数保持一致。格式一和格式二的区别在于:格式二的参数表无须格式一和格式二的区别在于:格式二的参数表无须 括号,而是和过程名之间用空格隔开。括号,而是和过程名之间用空格隔开。注意:变量加()后,变成表达式,只能按值传递。注意:变量加()后,变成表达式,只能按值传递。5过程(续)Sub1过程体过程体调用语句调用语句(Call语句语句)调用处继续往下调用处继续往下End SubSub2过程体

5、过程体End Sub嵌套调用自己就嵌套调用自己就成为递归成为递归SUB与与 Function都可以构成递归都可以构成递归6过程(续)bbFuntion(函数过程)格式格式:Private Function(形参列表形参列表)As End Function 调用调用FuntionFuntion函数过程函数过程格式格式:()说明:函数名返回一个值。说明:函数名返回一个值。可以没有参数可以没有参数。说明:说明:函数过程返回什么类函数过程返回什么类型的值,就将函数类型定型的值,就将函数类型定义为什么类型义为什么类型。(BooleanBoolean)函数体中一定要有对函数函数体中一定要有对函数名赋值的语

6、句(名赋值的语句(否则返回否则返回初值初值)。)。Exit Function语句无条件退出函语句无条件退出函数过程。数过程。End Function语句返回调用处。语句返回调用处。7当当实参是变量实参是变量时与形参类型要匹配。时与形参类型要匹配。当当实参是常数实参是常数时可以自动与数值型形参匹配。时可以自动与数值型形参匹配。Private Function Fun(X As Integer,Y As Single)主程序中主程序中i,j,m为整形为整形 m=Fun(234,345)Call Fun(i,365)Fun 2.5,j Fun(i),(j)按地址结合按地址结合无法相配无法相配8bb参

7、数传递(参数传递(参数传递(参数传递(ByVal/ByRefByVal/ByRef)传值:传值:传值:传值:单向单向单向单向 实参实参实参实参 形参形参形参形参传地址:双向传地址:双向 实参实参 形参形参bb参数传递类型参数传递类型参数传递类型参数传递类型 简单变量:有按简单变量:有按简单变量:有按简单变量:有按“地址地址地址地址”和和和和“值值值值”两种传送方式;两种传送方式;两种传送方式;两种传送方式;表达式:只有表达式:只有表达式:只有表达式:只有按按按按“值值值值”传送一种传送一种传送一种传送一种方式;方式;方式;方式;数数数数组组组组(对对对对象象象象类类类类型型型型):只只只只有有

8、有有按按按按“地地地地址址址址”传传传传送送送送一一一一种种种种方方方方式式式式,。形形形形参参参参为为为为定定定定长长长长字字字字符符符符串串串串数数数数组组组组时时时时实实实实参参参参必必必必须须须须也也也也是是是是定定定定长长长长字字字字符符符符串串串串数组数组数组数组。给实参变量给实参变量给实参变量给实参变量加上括号加上括号加上括号加上括号,就变成为表达式了。,就变成为表达式了。,就变成为表达式了。,就变成为表达式了。比比比比如如如如 Call Call max(m),n)max(m),n),(mm)是是是是表表表表达达达达式式式式而而而而不不不不是是是是简简简简单单单单变变变变量量量

9、量,因因因因此此此此mm只只只只能能能能按按按按“值值值值”传传传传送送送送,不不不不受受受受形形形形参参参参说说说说明明明明限限限限制制制制(即使形参有(即使形参有(即使形参有(即使形参有ByRefByRef也不能按地址传递)。也不能按地址传递)。也不能按地址传递)。也不能按地址传递)。过程(续)9 参数参数 地址地址 值传值传 普通变量普通变量 常数常数/表达式表达式 数组数组 对象对象(窗体窗体,控件控件)过程(续)说明:说明:1、过程中不能定义其他过程,可以调用其他过程。、过程中不能定义其他过程,可以调用其他过程。2、Function过程也可以用过程也可以用 Call 语句调用。语句调

10、用。3、函数嵌套调用时,先计算里层,结果作为外层的参数。、函数嵌套调用时,先计算里层,结果作为外层的参数。10过程(续)bbSub(子程序,事件过程子程序,事件过程)与Function之间的区别名称名称SubEnd SubFunctionEnd Function返回值返回值无(无或多个无(无或多个通过参数)通过参数)有有(无或多个(无或多个通过参数)通过参数)调用方式调用方式Call/Call/命令命令函数(出现在多函数(出现在多种语句中)种语句中)/Call/Call定义说明定义说明形参说明形参说明形参、返回值形参、返回值类型类型结束返回位置结束返回位置下一条语句下一条语句调用语句调用语句中

11、间退出中间退出Exit SubExit Function11Option ExplicitPrivate Sub Form_Click()Dim a As Integer a=2 Call Sub1(a)End SubPrivate Sub Sub1(x As Integer)x=x*2+1 If x 10 Then Call Sub1(x)End If x=x*2+1 Print xEnd Sub写出运行结果:写出运行结果:23 47练习:练习:12练习练习Sub Sub Var_ProcVar_Proc()()DimDim counter As Integer counter As Int

12、egerStatic Static count As Integercount As IntegerPrint counter;counterPrint counter;counterPrint count;countPrint count;countcounter=counter+1counter=counter+1count=count+1count=count+1Print counterPrint counterPrint countPrint countEnd SubEnd Sub第一次输出为第一次输出为第一次输出为第一次输出为:counter 0counter 0count 0co

13、unt 01 11 1第二次输出为第二次输出为第二次输出为第二次输出为:counter 0counter 0count 1count 11 12 2无参子过程无参子过程该句移到通用部分结果?该句移到通用部分结果?13二、字符串处理函数bb运算符:+、&+两边为字符型时连接;两边为数值型时相加;两边类型两边为字符型时连接;两边为数值型时相加;两边类型不同时可能出错。不同时可能出错。&均转换成字符型连接。均转换成字符型连接。例:例:“计算机计算机”&“应用软件应用软件”与与“计算机计算机”+“应用软件应用软件”结果相同:结果相同:“计算机应用软件计算机应用软件”例:例:“A(”&i&”,276&y

14、&”)”与与“A(”+i+”,”+y+”)”结果不同:结果不同:A(1,2)出错出错判断:判断:a=-32768 -10是否有错是否有错?Print 2E3+5;8+2=11;32768+18;32767+10是否有错是否有错?建议:需要转换成字符串时用建议:需要转换成字符串时用“&”为好。为好。a a整形整形错错Print Print 对对溢出溢出14字符串处理函数(续)bb常用字符串函数常用字符串函数ELen(x):字符串长度。字符串长度。其他类型是占内存的字节数。其他类型是占内存的字节数。ELeft(x,n):从从字符串字符串x最左边开始取最左边开始取n个字符。个字符。ERight(x,

15、n):从从字符串字符串x最右边开始取最右边开始取n个字符。个字符。EMid(x,n1,n2):从从字符串字符串x的第的第n1个字符开始取个字符开始取n2个字符。个字符。En1和和n2自动四舍五入自动四舍五入En1Len(x)-n1+1,自动自动取取n2=Len(x)-n1+1 Dim x As Long X=234 Print Len(x)15字符串处理函数(续)Ucase(x):将将x转换成转换成大写字母。大写字母。Lcase(x):将将x转换成转换成小写字母。小写字母。Ltrim(x):去掉去掉x左边的所有空格。左边的所有空格。Rtrim(x):去掉去掉x右边的所有空格。右边的所有空格。T

16、rim(x):去掉去掉x两边的所有空格。两边的所有空格。Instr(n,x,y):返回返回y在在x中第(中第(n个位置开始)个位置开始)一次出现的位置,一次出现的位置,若不存在则返回若不存在则返回0 InStr(4,“student”,“t”)与与 InStr(“student”,“t”)结果?结果?String(n,”0”):返回返回n个个0.一般拼凑数字或控制格式。一般拼凑数字或控制格式。16字符串处理函数(续)bb转换函数转换函数EStr(x)/Cstr(x):将数值型数据转换成字符串将数值型数据转换成字符串。Str转换前面有一空格转换前面有一空格。EVal(x):将字符串最左端开始的数

17、字字符串转换将字符串最左端开始的数字字符串转换成数值。可识别八进制和十六进制,可将数字成数值。可识别八进制和十六进制,可将数字之间的空格自动去除。若字符串最左端即为字之间的空格自动去除。若字符串最左端即为字母,则返回母,则返回0。Print Val(2y3);Val(2e2)结结果?果?EChr(x):返回以返回以x为为ASCII码值的字符。码值的字符。Chr(10)为换行符,为换行符,Chr(13)为回车符。为回车符。EAsc(x):返回字符返回字符x的的ASCII码值。若码值。若x为字符串,为字符串,则返回首字符的则返回首字符的ASCII码值。码值。Asc(A),Asc(A)是否等效?是否

18、等效?17bb取整函数取整函数Cint(x):将将x小数部分四舍五入取整。整型。小数部分四舍五入取整。整型。Fix(x):去尾函数。去尾函数。Int(x):返回小于等于返回小于等于x的最大整数。的最大整数。bb格式函数格式函数Format(输出项,输出项,“格式串格式串”)取整时四舍五取整时四舍五入入Print CInt(-3.5);Fix(-3.5);Int(-3.5)Print CInt(3.5);Fix(3.5);Int(3.5)Print CInt(2.5);Fix(2.5);Int(2.5)Print CInt(2.51);Fix(2.51);Int(2.51)18三、数组b普通数组

19、与动态数组比较普通数组与动态数组比较说明:数组下标从说明:数组下标从0开始开始,可以用可以用Option Base 1 使数组下标从使数组下标从1 开始,开始,下标可以是负数或小数。下标可以是负数或小数。b测试数组上下界函数:测试数组上下界函数:UBound(a)、LBound(a,1)b数组一般与循环结合使用,要注意循环控制变量和数组下标的关数组一般与循环结合使用,要注意循环控制变量和数组下标的关系。系。b数组作为形式参数时,传递的是数组的数组作为形式参数时,传递的是数组的首地址首地址。普通数组普通数组Dim A(3,4)As Integer 常数定界常数定界,不能用变量不能用变量.Dim

20、A(n)错错动态数组动态数组Dim A()As Integer重定义重定义 Redim Preserve A(n+1,5)Preserve 可保留原数组的值,不能改变维数,可保留原数组的值,不能改变维数,数组只能改变数组只能改变最后一维最后一维的值(大小),的值(大小),不能不能改变类型。改变类型。19Private Sub Form_Click()无无 Preserve,很自由,很自由 Dim a()As Integer,m As Integer m=6 ReDim a(m)ReDim a(m+1):a(7)=7:Print a(7)ReDim a(m-1):a(5)=7:Print a(5

21、)ReDim a(m,m):a(6,6)=66:Print a(6,6)ReDim a(m,m+1):a(6,7)=67:Print a(6,7)ReDim a(m,m-1):a(6,5)=65:Print a(6,5)ReDim a(m+1,m+1):a(7,7)=77:Print a(7,7)End Sub是是否否有有错错20Private Sub Command1_Click()Dim a()As Integer,m As Integer,b()As Integer m=6 ReDim a(m):a(6)=6:Print a(6)ReDim Preserve a(m+1):a(7)=7:

22、Print a(7)ReDim Preserve a(m-1):a(5)=7:Print a(5)ReDim Preserve a(m,m):a(6,6)=66:Print a(6,6)ReDim Preserve b(m,m):b(6,6)=66:Print b(6,6)ReDim Preserve b(m,m+1):b(6,7)=67:Print b(6,7)ReDim Preserve b(m,m-1):b(6,5)=65:Print b(6,5)ReDim Preserve b(m+1,m+1):b(7,7)=77:Print b(7,7)End Sub是是否否有有错错21bbEras

23、eErasebb重新初始化重新初始化重新初始化重新初始化固定固定固定固定值的数组值的数组值的数组值的数组bb释放释放释放释放动态动态动态动态数组(初始化)数组(初始化)数组(初始化)数组(初始化)Private Sub Private Sub Form_ClickForm_Click()()RemRem EraseErase的用法的用法的用法的用法 Dim a(10)As Integer,b()As IntegerDim a(10)As Integer,b()As Integer a(1)=1:a(3)=3:a(10)=10 a(1)=1:a(3)=3:a(10)=10 ReDimReDim

24、b(10)b(10)b(1)=1:b(3)=3:b(10)=10 b(1)=1:b(3)=3:b(10)=10 Print a(1);a(3);a(10)Print a(1);a(3);a(10)Print b(1);b(3);b(10)Print b(1);b(3);b(10)Erase a,bErase a,b Print a(1);a(3);a(10)Print a(1);a(3);a(10)Print b(1);b(3);b(10)Print b(1);b(3);b(10)下标越界下标越界下标越界下标越界End SubEnd Sub数组(续)回到定义状态回到定义状态RemRem下标越界

25、(替换?)下标越界(替换?)下标越界(替换?)下标越界(替换?)22数组(续)b控件数组控件数组创建控件数组(改变创建控件数组(改变IndexIndex 值,代码产生)值,代码产生)C 在窗体中放置一个控件,设置好相应的属性在窗体中放置一个控件,设置好相应的属性C 单击单击“复制复制”按钮按钮C 单击单击“粘贴粘贴”按钮按钮C 系统提示系统提示“已有一个控件为已有一个控件为*,创建一个控件数组吗?,创建一个控件数组吗?”C 单击单击“是是”按钮按钮b特点特点控件数组由同类型控件组成控件数组由同类型控件组成控件名称相同,利用下标来区别分各个控件控件名称相同,利用下标来区别分各个控件复制时并不是所

26、有的属性均被复制(如:复制时并不是所有的属性均被复制(如:IndexIndex)控件可以响应同一事件控件可以响应同一事件可以用代码生成控件。可以用代码生成控件。23四、循环bDo循环循环循环条件循环条件:条件、逻辑表达式:条件、逻辑表达式,函数调用函数调用(Function返回值为逻辑值)返回值为逻辑值)While 与与Until 中的条件相反中的条件相反bFor循环循环初值、终值、步长初值、终值、步长在循环中改变不影响循环在循环中改变不影响循环次数,只有次数,只有循环计数变量循环计数变量改变才会影响循环改变才会影响循环次数。次数。For i=10 to 0 Next ib语句语句位置问题位置

27、问题一些给一些给变量赋初值变量赋初值和简单计算的语句在循环和简单计算的语句在循环体内或循环体外,将直接影响结果的正确性。体内或循环体外,将直接影响结果的正确性。循环如何执行?循环如何执行?24五、分支bb分清单行和多行分清单行和多行If If语句的书写规则。语句的书写规则。if if abab Then x=1 else y=1 Then x=1 else y=1 if ab Then if ab Then x=1 x=1ElseElse y=1 y=1End IfEnd IfbSelect Case 的书写规则的书写规则Select Case后的测试表达式为常数(字符)、变量、算术或后的测试

28、表达式为常数(字符)、变量、算术或字符表达式,不可为条件表达式。字符表达式,不可为条件表达式。测试条件有四种形式:测试条件有四种形式:常量,如常量,如2,3,“A”等等 闭区间,如闭区间,如3 To 78,“B”To“H”等等开区间,如开区间,如Is20,Is“P”等等 注意:注意:函数和逻辑运算符都不能用函数和逻辑运算符都不能用.以上三种形式的组合,以以上三种形式的组合,以逗号间隔,是或的关系逗号间隔,是或的关系条件可以是逻辑表达式,函数调用25七、常用控件b常用控件常用控件Label,CommandButton,TextBox,ListBox,ComboBox,PictureBox,Che

29、ckBox,OptionButton,Frame,Form,Timerb熟悉控件熟悉控件SHcrollBar,VScrollBar,Shape (Max,Min属性值属性值,Scroll,Change事件事件 )b掌握常用控件的属性、方法和事件的设置和应用及其关联掌握常用控件的属性、方法和事件的设置和应用及其关联性。性。TextBox,ListBox,PictureBoxs数据连续输出数据连续输出TextBox,ListBox,PictureBoxs,Form清空语句清空语句例如:例如:对列表框进行数据添加和删除语句(对列表框进行数据添加和删除语句(AddItem RemoveItem)及正确

30、格式(上机)。)及正确格式(上机)。删除某项:删除某项:List1.Clear List1.RemoveItem List1.ListIndex 重视基本概念!重视基本概念!26明确概念1、那些控件可以响应双击事件?、那些控件可以响应双击事件?Form Command ListBox TextBox2、以下那些是方法,那些是事件?以下那些是方法,那些是事件?Load Unload GotFocus Resize LostFocusSetFocus Show Hide Cls Move3、一个控件有几种获得焦点的方法?一个控件有几种获得焦点的方法?4、标签框多行显示要将、标签框多行显示要将Wod

31、warp设设为为True,还要设哪个属还要设哪个属性?性?Alignement AutoSize Appearance BackStyle5、与与List1.Text等效的是等效的是?List1.List(List1.listIndex),List1.listIndex,List1.list,List1.Selected(List1.listIndex)演示演示list工程总是从窗体开始?工程总是从窗体开始?End与与Unload Me一样?一样?27明确概念6、判断下列描述是否正确?、判断下列描述是否正确?菜单编辑器只能在设计状态打开,快捷键不可任意设置。菜单编辑器只能在设计状态打开,快捷键

32、不可任意设置。List列表框可以用列表框可以用Sorted属性进行顺序和逆序排序。属性进行顺序和逆序排序。常用控件中只有常用控件中只有Form和和PictureBox是容器。是容器。Timer控件不能响应控件不能响应Click事件(菜单?)。事件(菜单?)。CheckBox和和OptionButton的的Value属性都可以设为属性都可以设为True或或 False7、在窗体上依次创建在窗体上依次创建Label、CommandButton、TextBox、等控件,运行程序显示窗体时谁会首先获得焦点。等控件,运行程序显示窗体时谁会首先获得焦点。A A窗体窗体 B BCommandButton C

33、 CTextBox D DLabel(响应双击事件的控件响应双击事件的控件?有有Text/Caption属性的控件属性的控件?容器?容器?)TFFTF28八、基本算法bb递归递归递归递归 边界条件,公式,利用边界条件,公式,利用边界条件,公式,利用边界条件,公式,利用Function Function 实现实现实现实现(SubSub过程也可以递归调用)阶乘过程也可以递归调用)阶乘过程也可以递归调用)阶乘过程也可以递归调用)阶乘/最大公最大公最大公最大公约数约数约数约数/数列等数列等数列等数列等 最大公约数最大公约数最大公约数最大公约数 利用展转相除法实现利用展转相除法实现利用展转相除法实现利用

34、展转相除法实现bb判断素数判断素数判断素数判断素数 利用利用利用利用Function Function 函数,函数,函数,函数,返回逻辑返回逻辑返回逻辑返回逻辑值实现判断值实现判断值实现判断值实现判断bb排序排序排序排序 选择排序、冒泡排序(插入、快速)选择排序、冒泡排序(插入、快速)选择排序、冒泡排序(插入、快速)选择排序、冒泡排序(插入、快速)bb判断完数、回文数、超级素数、互质数等判断完数、回文数、超级素数、互质数等判断完数、回文数、超级素数、互质数等判断完数、回文数、超级素数、互质数等bb求阶乘、奇数、偶数、矩阵等求阶乘、奇数、偶数、矩阵等求阶乘、奇数、偶数、矩阵等求阶乘、奇数、偶数、

35、矩阵等29bb每个变量都要说明每个变量都要说明每个变量都要说明每个变量都要说明 Dim a As Integer,b As stringDim a As Integer,b As string 不说明的变量为变体型(不说明的变量为变体型(不说明的变量为变体型(不说明的变量为变体型(Variant )bb变量类型与实际值相符变量类型与实际值相符变量类型与实际值相符变量类型与实际值相符bb常用类型的字节数、初值常用类型的字节数、初值常用类型的字节数、初值常用类型的字节数、初值 逻辑型初值逻辑型初值逻辑型初值逻辑型初值为(为(为(为(false 0false 0)bb日期型数据的书写日期型数据的书写

36、日期型数据的书写日期型数据的书写#2003-03-08#2003-03-08#bbConstConst 说明的变量不可再赋值说明的变量不可再赋值说明的变量不可再赋值说明的变量不可再赋值bb超过超过超过超过3276732767(-32768-32768)的整数要说明成的整数要说明成的整数要说明成的整数要说明成 Long,Long,遇到溢出错误遇到溢出错误遇到溢出错误遇到溢出错误时要检查变量的值。时要检查变量的值。时要检查变量的值。时要检查变量的值。bb同一过程中同一过程中同一过程中同一过程中变量不能重复说明变量不能重复说明变量不能重复说明变量不能重复说明bb常用数学函数(常用数学函数(常用数学函

37、数(常用数学函数(ABSABS、LOGLOG、SQRSQR、SGNSGN、EXPEXP、SINSIN)注意:分子和分母加括号,乘号注意:分子和分母加括号,乘号注意:分子和分母加括号,乘号注意:分子和分母加括号,乘号*不能省略,不能省略,不能省略,不能省略,写成写成写成写成3.143.14,成方用成方用成方用成方用 号表示。号表示。号表示。号表示。三角函数用弧度表示三角函数用弧度表示三角函数用弧度表示三角函数用弧度表示。九、常数、变量类型、作用域30bb算术运算(算术运算(,-,*/,-,*/,ModMod,+-,&+-,&优先级优先级)Mod Mod Mod Mod 取余数取余数取余数取余数

38、取整数取整数取整数取整数 注意书写规范(分子注意书写规范(分子注意书写规范(分子注意书写规范(分子/分母都要加括号)分母都要加括号)分母都要加括号)分母都要加括号)bb关系、逻辑运算关系、逻辑运算(算术算术-关系关系-逻辑)逻辑)各种关系及混合运算的结果是逻辑值,系统以各种关系及混合运算的结果是逻辑值,系统以各种关系及混合运算的结果是逻辑值,系统以各种关系及混合运算的结果是逻辑值,系统以-1 1 1 1表示表示表示表示TrueTrueTrueTrue。And Or Not And Or Not And Or Not And Or Not XorXorXorXorbb数据表示数据表示 常数:常数

39、:常数:常数:123123123123,2 2 2 2E3E3E3E3,4D3 4D3 4D3 4D3,“123123123123”,“abcabcabcabc”,&o57&o57&o57&o57,&H2E&H2E&H2E&H2E,#04-02-8#04-02-8#04-02-8#04-02-8#,TrueTrueTrueTrue,FalusFalusFalusFalus 符号常量不能再被赋值!符号常量不能再被赋值!符号常量不能再被赋值!符号常量不能再被赋值!Const PI as Const PI as Const PI as Const PI as Single=3.14159Single

40、=3.14159Single=3.14159Single=3.14159常数、变量类型、作用域(续)x*a Mod b 与与 x*(a Mod b)不同不同31常数、变量类型、作用域(续)bb整型数对实数取整规则:整型数对实数取整规则:偶数偶数5 5舍舍6 6入,奇数入,奇数4 4舍五入舍五入Dim a As Integer,b As IntegerDim a As Integer,b As Integer a=3/2:b=5/2 a=3/2:b=5/2 Print a,b Print a,b a,b,c均为均为Integer a=4:b=4.5:c=True Print c=a=b,a=b=

41、ca=5:b=5.532bb说明说明说明说明 各类变量使用各类变量使用各类变量使用各类变量使用 前要加以说明前要加以说明前要加以说明前要加以说明 如果变量不说明就为变体型如果变量不说明就为变体型如果变量不说明就为变体型如果变量不说明就为变体型(Variant)Variant)各类变量表示数的范围各类变量表示数的范围各类变量表示数的范围各类变量表示数的范围(p.43p.43表表表表3-13-1)各类变量的初值:各类变量的初值:各类变量的初值:各类变量的初值:S当一个变量说明之后,系统自动为其赋一个初当一个变量说明之后,系统自动为其赋一个初始值。始值。S数值数值型数据(型数据(%、&、!、#)的初

42、值为)的初值为0;S字符型数据字符型数据($)的初值为空串;的初值为空串;S逻辑型数据的初值为逻辑型数据的初值为False;常数、变量类型、作用域(续)33Visual BasicVisual Basic中的变量按作用域可分为:中的变量按作用域可分为:中的变量按作用域可分为:中的变量按作用域可分为:1 1)全全全全局局局局(工工工工程程程程级级级级)变变变变量量量量,在在在在窗窗窗窗体体体体或或或或模模模模块块块块的的的的通通通通用用用用部部部部分分分分用用用用PublicPublic对对对对变变变变量量量量申申申申明明明明;(常常常常数数数数、定定定定长长长长字字字字符符符符串串串串、数组不

43、能在模块中用数组不能在模块中用数组不能在模块中用数组不能在模块中用PublicPublic说明说明说明说明)2 2)共共共共用用用用(窗窗窗窗体体体体级级级级)变变变变量量量量,在在在在窗窗窗窗体体体体或或或或模模模模块块块块的的的的通通通通用用用用部部部部分用分用分用分用DimDim或或或或PrivatePrivate对变量申明;对变量申明;对变量申明;对变量申明;3 3)局局局局部部部部(过过过过程程程程级级级级)变变变变量量量量,在在在在过过过过程程程程中中中中只只只只能能能能用用用用DimDim,StaticStatic对变量申明。对变量申明。对变量申明。对变量申明。常数、变量类型、作

44、用域(续)34常数、变量类型、作用域(续)注意:注意:注意:注意:(1 1)在过程中不能用)在过程中不能用)在过程中不能用)在过程中不能用PublicPublic、PrivatePrivate声明变量。声明变量。声明变量。声明变量。(2 2)当当当当全全全全局局局局变变变变量量量量(共共共共用用用用变变变变量量量量)与与与与局局局局部部部部变变变变量量量量同同同同名名名名时时时时,在在在在局局局局部部部部变变变变量量量量生生生生存存存存期期期期内内内内,局局局局部部部部变变变变量量量量有有有有效效效效,全全全全局局局局变变变变量量量量(共共共共用用用用变变变变量量量量)被被被被隐藏。隐藏。隐藏

45、。隐藏。作用与域小的有效。作用与域小的有效。作用与域小的有效。作用与域小的有效。(3 3)在在在在过过过过程程程程中中中中用用用用Static Static 说说说说明明明明的的的的静静静静态态态态变变变变量量量量,在在在在过过过过程程程程结结结结束束束束后后后后其其其其值值值值保保保保留留留留,但但但但其其其其它它它它过过过过程程程程不不不不能能能能使使使使用用用用(具具具具有有有有局局局局部部部部变变变变量量量量的的的的特特特特性性性性)。静静静静态变量无数值传递功能。态变量无数值传递功能。态变量无数值传递功能。态变量无数值传递功能。(4 4)在在在在窗窗窗窗体体体体模模模模块块块块的的的

46、的通通通通用用用用处处处处不不不不可可可可以以以以用用用用PublicPublic说说说说明明明明一一一一个个个个全全全全局局局局数数数数组组组组,定长字符串等定长字符串等定长字符串等定长字符串等 35变量说明、类型、作用域(续)36变量说明、类型、作用域(续)Dim a As IntegerPrivate Sub Command1_Click()Dim b As Integer a=1 b=2 Print Fun(a,b+1);a;bEnd SubPrivate Function Fun(x As Integer,y As Integer)x=y+a y=x-y Fun=a+x+yEnd F

47、unction37优先级:算术优先级:算术优先级:算术优先级:算术关系关系关系关系逻辑逻辑逻辑逻辑结果类型:以存储长度较长的为准结果类型:以存储长度较长的为准结果类型:以存储长度较长的为准结果类型:以存储长度较长的为准除法例外:结果只是双精度除法例外:结果只是双精度除法例外:结果只是双精度除法例外:结果只是双精度自动转换:自动转换:自动转换:自动转换:字符型字符型字符型字符型=数值型数值型数值型数值型 结果:字符型结果:字符型结果:字符型结果:字符型逻辑型逻辑型逻辑型逻辑型=数值型数值型数值型数值型 结果:结果:结果:结果:True/FalseTrue/False整型整型整型整型=逻辑型逻辑型

48、逻辑型逻辑型 结果:结果:结果:结果:-1/0-1/0字符型字符型字符型字符型=逻辑型逻辑型逻辑型逻辑型 结果:结果:结果:结果:“True”/”False”True”/”False”一般要求类型匹配,一般要求类型匹配,一般要求类型匹配,一般要求类型匹配,否则有可能出现否则有可能出现否则有可能出现否则有可能出现“类型不匹配类型不匹配类型不匹配类型不匹配”错误错误错误错误运算规则要会用关系、要会用关系、要会用关系、要会用关系、逻辑配合取逻辑配合取逻辑配合取逻辑配合取整函数写出整函数写出整函数写出整函数写出逻辑表达式。逻辑表达式。逻辑表达式。逻辑表达式。如如如如:A A A A、之一为零但之一为零

49、但之一为零但之一为零但不得同时为不得同时为不得同时为不得同时为零零零零A*B=0 And ABA Xor B38练习bb练习1练习2a=0:b=4:c=6Print a Mod 3+b 3/c 3 Dim a As Integer,b As Dim a As Integer,b As Dim a As Integer,b As Dim a As Integer,b As Integer,c As IntegerInteger,c As IntegerInteger,c As IntegerInteger,c As Integer c=6.5:b=6 c=6.5:b=6 c=6.5:b=6 c=

50、6.5:b=6 a=b=c a=b=c a=b=c a=b=c Print a Print a Print a Print a39判断对错判断对错,正确的给出答案正确的给出答案:下面语句中下面语句中 a As Integer,s As Stringa As Integer,s As String a=1 :s=2*2+1 :Print s a=1 :s=2*2+1 :Print s s=237&.11”:a=s :Print a s=237&.11”:a=s :Print a a=0 1 :Print a a=0 1 :Print a a=2 :s=2*a 3 :Print s a=2 :s=

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 生活休闲 > 生活常识

本站为文档C TO C交易模式,本站只提供存储空间、用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。本站仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知淘文阁网,我们立即给予删除!客服QQ:136780468 微信:18945177775 电话:18904686070

工信部备案号:黑ICP备15003705号© 2020-2023 www.taowenge.com 淘文阁