2任务二应用选择结构完善系统.ppt

2任务二应用选择结构完善系统.ppt

《2任务二应用选择结构完善系统.ppt》由会员分享，可在线阅读，更多相关《2任务二应用选择结构完善系统.ppt（33页珍藏版）》请在冰豆网上搜索。

VB.NET程序设计,任务二应用选择结构完善系统,学习目标,1、了解VB.NET常用的数据类型2、了解运算符和表达式3、掌握变量声明、变量作用域4、掌握选择结构的使用5、掌握MessageBox类的常用方法6、了解常见错误类型，掌握错误处理的方法,VB.NET常用数据类型,变量与常量变量,变量的声明语法格式：

Dim变量名As类型=初始值例如，DimaAsInteger,bAsLong,cAsSingle,dAsDouble注意：

定义好的变量要在程序中使用，否则会有警告（未使用的变量）。

思考：

怎样同时声明多个同一类型变量？

变量与常量变量,变量的命名由字母、汉字、数字或下划线组成，第一个字符必须是字母或汉字或下划线。

如果名称以下划线开头，必须包含至少一个字母或数字或汉字。

长度不超过1023个字符。

不要与VB.NET中的关键字同名。

VB.NET对变量中字母的大小写不加以区分。

最好利用“匈牙利命名”规则给变量起名，即变量名由“前缀+后缀”组成。

例如:

IntCountor,DblSum,有关变量命名的题目,1、下面哪个符号不能作为VB.NET的变量名？

A、ABCDB、G888C、123dogD、xpq,2、下列符号哪一个是VB.NET中的合法变量名？

A、B3B、3BC、IfD、AB9,变量与常量变量,静态变量的声明自动变量：

用Dim声明，变量值只在过程执行期间才存在静态变量：

用Static声明，变量值在程序运行期间一直存在例统计单击窗体的次数,变量与常量变量,变量的作用域（有效作用范围）块级变量：

用Dim声明，在特定的代码块中声明。

如条件语句块。

局部变量：

在一个过程内部声明的变量，它只在本过程内有效。

用Dim或Static来声明。

窗体和模块级变量:

在窗体和模块的声明部分定义的变量，它对一个窗体或模块的不同过程都有效。

用Dim或Private来声明。

全局变量:

在模块文件中用Public关键字声明的变量。

它可以被应用程序中的所有模块引用。

变量与常量常量,常量：

就是其值固定不变的量常量的命名和声明命名：

遵循变量名命名的规则声明格式：

Const常量名As类型=表达式例：

ConstconMaxAsInteger=9声明Integer型常量ConstconDate=#10/5/2002#声明Date型常量ConstCodeName=“ASCII”声明String型常量ConstpiAsDouble=3.14159265358979声明Double型常量,运算符,1.算术运算符,运算符,2.字符串运算符运算符：

&和+例：

VB=“Visual”+“Basic”连接为字符串“VisualBasic”第&Str（N）&条记录Str为数值型转字符型函数。

若N为1，标签上显示“第1条记录”说明：

使用+号，要求连接的两个表达式均为字符串型使用&号，连接的两个表达式可以为任何类型，但结果为字符串型，如“当前日期” /8/2002#,运算符,3.关系运算符,Is：

判定两个Object类型的变量是否引用同一个对象Like：

判定左边的字符串是否与右边的字符串匹配,运算符,4.逻辑运算符常用：

Not、And、OrNot：

表达式数为True时，结果为False；反之亦然。

例如，Not（45），结果为TrueAnd：

两个表达式均为True时，结果为True例如，（45）And（87），结果为FalseOr：

两个表达式均为False时，结果为False例如，（45）Or（87），结果为True,运算符,4.逻辑运算符,表达式,表达式：

用运算符和圆括号将常量、变量、函数和常数连接起来组成的有意义的式子。

如，数值表达式Cos（180*Pi/180）*100逻辑表达式（N=0）And（NMod20）运算优先顺序（从高到低）：

函数算术运算（乘方取负乘/除整除求余加/减）字符串运算符关系运算符逻辑运算符（NotAndOr）用括号可以改变运算顺序乘方和负号相邻时，取负优先。

例如：

2-2的结果是0.25，相当于2（-2）,MessageBox类,MessageBox类的常用方法：

Show方法：

利用该方法给用户一些提示信息。

例:

MessageBox.Show（“请确认密码是否正确”）,选择结构,选择结构：

当设定条件成立时执行某些语句，条件不成立时则跳过这些语句或执行其它的语句。

选择结构中要使用选择语句，有两路分支和多路分支两种情况，对应的选择语句有If语句（两路出口）和SelectCase语句（多路出口）。

选择结构If条件语句,1、If语句结构IfThenEndIfIfThenElseEndIf,选择结构If条件语句,2、If语句嵌套If语句嵌套使用可形成多分支的条件语句结构IfThenElseIfThenElseEndIf,选择结构If条件语句举例,例1：

用户登录界面的代码用于返回登陆结果PublicbResultAsBoolean=False登陆用户的IDPublicUserIdAsString=登陆的用户名PublicUserNameAsString=登陆的用户密码PrivateUserPwdAsString=PrivateSubbtnSubmit_Click（ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs）HandlesbtnSubmit.Click判断用户输入密码的合法性IfUserPwd=“123”AndUserName=“123Then合法用户bResult=TrueMe.Close（）Else密码错误bResult=FalseMessageBox.Show（请确认你的用户名或密码是否正确）EndIfEndSubPrivateSubbtnClear_Click（ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs）HandlesbtnClear.Click关闭登陆对话框Me.Close（）关闭整个程序Application.Exit（）EndSub,选择结构If条件语句举例,例2：

将分数按等级划分（在“控制台应用程序”中录入如下代码）DimsYourScoreAsStringDimiScoreAsIntegerSystem.Console.WriteLine（请输入你的考试分数（0-100之间）：

）sYourScore=System.Console.ReadLine（）iScore=Integer.Parse（sYourScore）If（iScore100）ThenSystem.Console.WriteLine（不可能的分数！

）ElseIf（iScore=100）ThenSystem.Console.WriteLine（你真不可思议，太棒了！

）ElseIf（iScore85）ThenSystem.Console.WriteLine（你真优秀！

）ElseIf（iScore60）ThenSystem.Console.WriteLine（不错不错！

）ElseSystem.Console.WriteLine（下次加油哦！

）EndIfSystem.Console.ReadLine（）,选择结构SelectCase选择语句,语法格式：

SelectCaseCaseCaseCaseElseEndSelect功能：

根据测试表达式的值，决定程序的流向。

值的类型是数值型、字符串型、日期型等，一旦与某个Case后的值相等，则执行这个Case中的，完成后执行EndSelect后的语句。

如果所有的Case后的都不与项匹配，则执行CaseElse后的。

选择结构SelectCase选择语句,例3：

将例2改写为SelectCase结构。

DimsYourScoreAsStringDimiScoreAsIntegerSystem.Console.WriteLine（请输入你的考试分数（0-100之间）：

）sYourScore=System.Console.ReadLine（）iScore=Integer.Parse（sYourScore）SelectCaseiScoreCase100System.Console.WriteLine（你真不可思议，太棒了！

）Case85To99System.Console.WriteLine（你真优秀！

）Case60To84System.Console.WriteLine（不错不错！

）Case0To59System.Console.WriteLine（下次加油哦！

）CaseElseSystem.Console.WriteLine（不可能的分数！

）EndSelectSystem.Console.ReadLine（）,常见错误类型,语法错误运行错误逻辑错误,错误处理,使用TryEndTry结构来处理“运行错误”Try可能产生运行错误的语句Catch一旦发生运行错误就执行的语句Finally不管错误是否发生都会被执行的语句EndTry,错误处理,处理磁盘驱动器错误TryPictureBox1.Image=Image.Fromfile（“a:

fileopen.bmp”）CatchMessageBox.Show（“PleaseinsertdiskinthedriveA!

”）EndTry,错误处理,使用Finally子句完成清除任务TryPictureBox1.Image=Image.Fromfile（“a:

fileopen.bmp”）CatchMessageBox.Show（“PleaseinsertdiskinthedriveA!

”）FinallyMessageBox.Show（“Errorhandlecomplete”）EndTry注意：

无论Try语句是否产生运行错误，都可能需要在错误处理程序结束时实现某项任务，如更新变量、使用消息框显示结果或禁用窗体上不需要的对象，此时就需要使用Finally子句。

错误处理,使用Err对象获取较详细的错误信息Err对象：

每次产生运行错误时，该对象都会被赋予详细的错误处理信息。

常用属性：

Err.Number：

提供运行错误的编号Err.Description：

描述运行错误的简短信息,错误处理,检测多个运行错误TryPictureBox1.Image=Image.Fromfile（“a:

fileopen.bmp”）CatchWhenErr.Number=53文件不存在错误MessageBox.Show（“Checkpathnameanddiskdrive!

”）CatchWhenErr.Number=7内存不足错误MessageBox.Show（“Isthisreallyabitmap?

”）CatchWhenErr.Number=7内存不足错误MessageBox.Show（Err.Description）EndTry,错误处理,指定重试次数指多次尝试一种操作,如果问题仍得不到解决则禁用该操作。

例：

先声明Retries变量为窗体级变量,然后在Button1的单击事件过程中写如下代码:

TryPictureBox1.Image=Image.Fromfile（“a:

fileopen.bmp”）CatchRetries+=1IfRetries=2ThenMessageBox.Show（“pleaseinsertthediskindriveA!

”）ElseMessageBox.Show（“文件载入3次失败,请退出!

”）Button1.Enabled=Fals