欢迎来到天天文库
浏览记录
ID:52473201
大小:288.82 KB
页数:19页
时间:2020-04-08
《vb基本语句与数据类型.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、基本语句与数据类型选择结构程序设计——If语句单行结构条件语句格式:If<条件表达式>Then<语句组1>[Else<语句组2>]例如:Ifa>60ThenPrint及格表示当变量的值大于60时,打印“及格”。Ifa>60ThenPrint及格ElsePrint不及格表示当变量的值大于60时,打印“及格”,否则打印“不及格”。选择结构程序设计——If语句2.块结构条件语句格式:If<条件表达式>Then<程序段1>[Else<程序段2>]EndIf选择结构程序设计——If语句3.多分支If语句格式:If<条件表达式>Then<程序段1>[ElseIf<条件表达式2>Then<语句段2>
2、][ElseIf<条件表达式3>Then<语句段3>]……[Else<语句段n>]EndIf例题:任意输入一个百分制成绩,输出该分数对应级别:60分以下输出“不及格”;大于等于60小于70输出“中”;大于等于70小于80输出“良”;大于等于80输出“优”;分数小于0或大于100输出“输入有误”。PrivateSubCommand1_Click()IfText1.Text>=0AndText1.Text<60ThenLabel1.Caption="不及格"ElseIfText1.Text>=60AndText1.Text<70ThenLabel1.Caption="及格"ElseIfTe
3、xt1.Text>=70AndText1.Text<80ThenLabel1.Caption="良"ElseIfText1.Text>=80AndText1.Text<=100ThenLabel1.Caption="优"ElseLabel1.Caption="输入有误"EndIfEndSub选择结构程序设计——If语句4.If语句嵌套例如:Ifa>bThenIfa>cThenMax=aElseMax=cEndIfElseIfb>cThenMax=bElseMax=cEndIfEndIf选择结构程序设计——SelectCase语句格式如下:SelectCase<数值
4、字符串表达式>Cas
5、e<值的列表1>[<程序段1>]Case<值的列表2>[<程序段2>]……[Case<值的列表n>[<程序段n>][CaseElse<程序段n+1>]EndSelect例题:任意输入一个月份,输出该月份对应的天数。在一年的12个月中,1、3、5、7、8、10、12月有31天,4、6、9、11月有30天,2月有28天。PrivateSubCommand1_Click()SelectCaseText1.TextCase1,3,5,7,8,10,12Label1.Caption=31Case4,6,9,11Label1.Caption=30Case2Label1.Caption=28EndS
6、electEndSub循环结构程序设计——For型循环语句格式如下:For<循环变量>=<初值>To<终值>[Step<步长>]<循环体>Next[<循环变量>]例如:DimiAsInteger,aAsIntegera=0Fori=1To10Step2a=a+1Nexti例题:计算出n的阶乘,n是一个大于1的正整数,其值由用户输入。n的阶乘的计算公式是:n!=1×2×···×(n-1)×nPrivateSubCommand1_Click()DimiAsInteger,aAsInteger,sumAsIntegera=text1.Textsum=1Fori=1Toasum=sum*iNe
7、xtiPrintsumEndSub例题:计算:sum=1!+2!+3!+···+n!,n是一个大于1的正整数,其值由用户输入。PrivateSubCommand1_Click()DimiAsInteger,aAsInteger,bAsInteger,sumAsIntegera=text1.Textsum=0b=1Fori=1Toab=b*isum=sum+bNextiPrintsumEndSub循环结构程序设计——Do型循环语句格式如下:Do8、Until><循环条件表达式><循环体>Loop例如:DimiAsInteger,aAsIntegerDoWhilei<=10a=a9、+1i=i+1Loop变量的声明格式如下:Dim<变量名>As<变量类型>10、Dim<变量名><类型符号>例如:DimaAsInteger11、Dima%变量类型名有Integer(整型)、Long(长整型)、Single(单精度型)、String(字符串型)、Date(日期型)、Boolean(布尔型)、Object(对象型)、Variant(变体型)、Currency(货币型)、Byte(字节型)。变量名变量名的取名规则:以字母开头,由字母、数字
8、Until><循环条件表达式><循环体>Loop例如:DimiAsInteger,aAsIntegerDoWhilei<=10a=a
9、+1i=i+1Loop变量的声明格式如下:Dim<变量名>As<变量类型>
10、Dim<变量名><类型符号>例如:DimaAsInteger
11、Dima%变量类型名有Integer(整型)、Long(长整型)、Single(单精度型)、String(字符串型)、Date(日期型)、Boolean(布尔型)、Object(对象型)、Variant(变体型)、Currency(货币型)、Byte(字节型)。变量名变量名的取名规则:以字母开头,由字母、数字
此文档下载收益归作者所有