VB赋值语句与选择语句.ppt

VB赋值语句与选择语句.ppt

ID:48091994

大小:341.50 KB

页数:30页

时间:2020-01-14

VB赋值语句与选择语句.ppt_第1页
VB赋值语句与选择语句.ppt_第2页
VB赋值语句与选择语句.ppt_第3页
VB赋值语句与选择语句.ppt_第4页
VB赋值语句与选择语句.ppt_第5页
资源描述:

《VB赋值语句与选择语句.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、第4课时VB赋值语句和选择语句复习回顾(1)写出一个表达式,判断某一年的year(设year>=1900)是否是闰年。Year是闰年要满足下列条件:year能被4整除但不能被100整除,或者year能被400整除。year>=1900and(yearmod4=0andyearmod100<>0oryearmod400=0)(2)写出可以判断字符串变量strAbc的第三位至第五位的子串是否大于“abc”的表达式。Mid(“strAbc”,3,3)>abc(3)已知自由落体的位移公式为:,其中v0为初始速度,g为重力加速度,t为经历的时间,s为位移。编程求s的值,请完成以下变量、

2、常量的定义,并写出表达式。①定义常量g:②定义变量v,t,s:③写出位移公式的表达式:Constg=9.8Dimv,t,sassingleS=1/2*g*t^2-v*tVisualBasic基本常用语句赋值语句注释语句输出语句结束语句选择语句一.赋值语句形式:变量名=表达式作用:将表达式的值赋值给变量。一般用于给变量赋值或对控件设定属性值。例:Text1.Text="欢迎使用VisualBasic6.0"当表达式的类型与变量的类型不一致时,强制转换成左边变量的类型dimiAasIntegeriA=10/4iA中的结果为2赋值语句使用的注意事项1.虽然赋值号与关系运算符中的等于

3、号都用“=”表示,但VB系统会根据所处的位置自动判断是何种意义的符号。2.赋值号左边只能是变量。Sin(x)=x+yx+y=33.不能用一条赋值语句给多个变量赋值。x=y=z=3VB中的注释语句是以英文单引号(‘)开头的一串文字或者采用Rem注释内容的形式,可以出现在程序汇总需要进行说明的位置上,通过这一段文字,对附近的程序段进行简要的说明解释。如:S=0'给变量S赋初值为0(Rem给变量S赋初值为0)Fori=1To5s=s+INexti二、注释语句Print方法表达形式:[对象.]Print[{Spc(n)

4、Tab(n)}][表达式列表][;

5、,]作用:在指定的对象上输出

6、信息。对象:窗体、图形框或打印机(Printer)。若省略对象,则在当前窗体上输出。三、输出语句紧凑格式标准格式四、结束语句语法格式:end功能:强制程序结束运行计算机要处理的问题往往是复杂多变的,仅采用顺序结构是不够的。必须利用选择结构等来解决实际应用中的各种问题。VB中提供了多种形式的条件语句来实现选择结构,有If条件语句和Select情况语句等。它们都是对条件进行判断,根据判断结果,选择执行不同的分支。五.选择语句9If条件语句 (可分为单分支结构、双分支结构、多分支结构)1.If…Then语句(单分支结构)If<表达式>Then语句块(可以是一句或多句语句)EndIf

7、或If<表达式>Then<语句>表达式:关系表达式、逻辑表达式,算术表达式。表达式值按非零为True,零为False进行判断。该语句的作用是当表达式的值为True,执行Then后面的语句块,否则不做任何操作。10单分支结构例:已知两个数x和y,比较它们的大小,使得x大于y。Ifx

8、语句块2EndIf或If表达式Then语句1Else语句2当表达式的值为True时,执行Then后面的语句块1,否则执行Else后面的语句块212双分支结构例计算分段函数双分支结构实现:Ifx<>0Theny=sin(x)+sqr(x*x+1)Elsey=cos(x)-x^3+3*xEndIf13例题图1某VB应用程序运行时出错提示信息根据图1所示的程序,说明第二行代码出现了语法错误,则该行代码应修改为IfImage1.Visible=FlaseThen例题例1:由键盘输入一个数,该数大于等于0,则求该数的平方根,否则,输出错误信息。Ifx>0ThenT=sqr(x)Else

9、T=“错误信息”EndIf多分支结构3.If…Then…ElseIf语句If表达式1Then语句块1ElseIf表达式2Then语句块2…[Else语句块n+1]EndIf该语句的作用是根据不同的表达式值确定执行哪个语句块16例4.5已知变量strC中存放了一个字符,判断该字符是字母字符、数字字符还是其他字符。IfUCase(strC)>="A"AndUCase(strC)<="Z"Then'Ucase(string)将小写字母转换为大写字母x="是字母字符“ElseIfstrC>="0"AndstrC

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。