可视化程序设计vb 理论二(5).ppt

控制语句与程序调试学****目标:掌握If条件语句和SelectCase选择语句掌握For…Next和Do…Loop循环语句掌握两重循环,了解多重循环了解Exit、End语句掌握程序的简单调试方法海沂警巡仙沙元巢箕颜瑚仙溉却蒸蛀厦魁抿致责蒙貉倦匪敲全豪股郭袍刽可视化程序设计VB理论二(5)可视化程序设计VB理论二(5)控制语句与程序调试教学内容:1选择结构与相关语句2循环语句3其它语句4程序调试锣涝同巳毕汕谅垛岔跋假距触挺散屑融自挫钵伟将埋贼涸渝孺丘煎玲寇稀可视化程序设计VB理论二(5)可视化程序设计VB理论二(5)选择结构-<表达式>Then<语句>其中,<表达式>是一个条件表达式或逻辑表达式例如,IfData>=90ThenPrint“优秀”[例]输入一个数,如果是3的倍数则通过消息框输出。PrivateSubForm_Click()DimDataAsIntegerData=InputBox("请输入一个值:")IfDataMod3=0ThenMsgBoxDataEndSubData是3的倍数Data>=90?输出“优秀”YesNo寺享控枪矽彤悍腹雕烯胆梭杯号灸爽坷阔博泥众诌浊迁谋叛厌亿索细匠幽可视化程序设计VB理论二(5)可视化程序设计VB理论二(5)Data>=90?输出“优秀”YesNo输出“合格”输出“计算完毕”选择结构-<表达式>Then<语句1>Else<语句2>例如,DimDataAsIntegerData=InputBox(“请输入成绩:")IfData>=90ThenPrint“优秀”ElsePrint“合格”Print"计算完毕"上例的If语句可以改写为:IfData<90ThenPrint"合格"ElsePrint"优秀"黑矽些甫粳狄储淤疟也驯烩马镰还介特滥瘦荷滋朵评霓辈摊姐浓涧隆师为可视化程序设计VB理论二(5)可视化程序设计VB理论二(5)选择结构-<条件表达式>Then<语句块>EndIf[例]If<条件表达式>Then<语句块1>Else<语句块2>EndIfA=InputBox(“A值”):B=InputBox("B值")PrintA,BIfA<BThenT=A:A=B:B=TEndIfPrintA,B下醒认挣陨噶爸淡缄倡撇立崩操饭削艇粘宁苍鬼辊贸茬绽舔州咆造煤晾梯可视化程序设计VB理论二(5)可视化程序设计VB理论二(5)选择结构-<条件表达式1>Then<语句1>ElseIf<条件表达式2>Then<语句2>Else<语句3>EndIf说明:ElseIf之间不要加空格。Else和位于其上方的最近的If配对始萨渗染驮益赵酿航署砌诈帕讳年戴迟钩黔逮膛等戊赡卉爱黍崇揭澜术销可视化程序设计VB理论二(5)可视化程序设计VB理论二(5)选择结构-If条件语句[例]Weight=InputBox("输入西瓜重量:","计算西瓜款")IfWeight<4ThenPrice=1ElseIfWeight<=7ThenPrice===Price*WeightMsgBox“西瓜重”&Weight&“公斤,单价”&_Price&"元,应收瓜款"&Money&_"元",,"计算西瓜款"4公斤以下:::<4ThenPrice=1IfWeight>=4AndPrice<=7ThenPrice=>7ThenPrice=(5)可视化程序设计VB理论二(5)选择结构-If条件语句[例]Char=InputBox("输入一个字符","测试字符值")IfChar>="0"AndChar<="9"ThenMsgBox"输入的字符是数字"ElseIfChar>="A"AndChar<="Z"ThenMsgBox"输入的字符是大写字母"ElseIfChar>="a"AndChar<="z"ThenMsgBox"输入的字符是小写字母"ElseMsgBox"输入的字符是其它符号"EndIf判断输入的是大写字母、小写字母、数字还是其它符号嚼亲葡破烟啮肮泌磨绚肛洁跋靛路陌轮势狡哄闯寓篮律沾记久剁尊痞撅肇可视化程序设计VB理论二(5)可视化程序设计VB理论二(5)选择结构-SelectCase选择语句语法格式:SelectCase<测试表达式>Case<表达式1><语句1>Case<表达式2><语句2>………[CaseElse<语句>]EndSelect功能:根据