vb多重选择语句,请列举VB的所有语句?...
vb多重选择语句
Private Sub Command1_Click()
Dim a, b, c As Integer
a = InputBox("请输入水井的深度")
b = InputBox("请输入青蛙白天上爬的距离")
c = InputBox("请输入青蛙晚上下滑的距离")
Select Case b
Case Is >= a
Print "这只青蛙只需要不到一天就可以爬出" & a & "米深的井!"
Case Is < a
If b <= c Then
Print "这只青蛙永远爬不出这口井!"
Else
Print "这只青蛙需要" & a / (b - c) & "天才可以爬出" & a & "米深的井!"
End If
End Select
End Sub
请列举VB的所有语句?
VB5常用语句一览
1.概述
高级编程语言源代码大多由语句组成,vIsualBasic源程序也是由BASIC语句组成的。VB5中的语句分为可执行语句和非可执行语句。非可执行语句一般为说明性语句,而可执行语句均执行某种操作。
由下列关键字定义的语句为非可执行语句:
Rem Dim Const
Option ExPlicit Deftype Global
Static Type...End Type
可执行语句在执行某种操作的同时,往往还以不同的方式控制着程序的流程。顺序语句、条件语句和循环语句是Basic语言中最基本、最常用的语句。
2.赋值语句
赋值语句是一种顺序语句,语句的先后顺序即程序的执行顺序。
赋值语句为变量或对象的同性赋值。其语法为:
[Let]变量=表达式
[Let]对象.属性=表达式
其中表达式中可以包含变量、常量、属性。此时等号称为赋值等号。注意赋值等号两边的数据类型一般应保持一致。例如:
i%=5
s$=“ ’”为空字符串
但是,当用字符串表示数值时,允许把效值字符串赋予数值变量;也可以把数值赋予字符串变量。例如:
Dim i As Integer
Dim s As String
3.条件语句
(1)If…Then语句
格式1:16条件Then语句
格式2:If条件Then
语句块其含义为:如果“条件”成立,就执行Then后面的语句或语句块。语句块指一行或多行语句。此处,“条件”可以是由单个比较表达式形成的简单条件,也可以是由逻辑运算符连接几个比较表达式而形成的复杂条件。例如:
H x>=O And y>=O Then。
s=Sqr(x)十Sqr(y)
(2)If…Then…Else语句
格式1:If条件Then语句1 Else语句2
格式2:If条件Then
语句块1
语句块2
格式3 If条件1 Then
语句块1
Else If条件2 Then
语句块2
语句块3
语句块4
其含义为:如果“条件”满足。就执行Then后面的语句或语句块、否则就执行Else后面的语句或语句块。格式3又称为嵌套的If语句。
4.选择语句
格式I:Select Case表达式
Case值1
语句块1
Case值2
语句块2
[Case Else
语句块n]
End Select
格式2:SelectCase表达式
Case值1,值2[,.]
语句块1
Case值3 TO值4[,.]
语句块2
Case Is比较运算符值5
语句块3
[Case Else
语句块n]
End Select
其含义为:当表达式取某值或在某数值范围内时,就执行与某值相对应的“Case…”后面的语句块。To关键字用两个数值指定一个范围,其中较小的数值要在To的前面。Is关键字配合比较运算符来指定一个数值范围,如“Is<=8”等。当表达式取值1,值2,……;以及指定数值范围以外的值时,执行“Case Else”后面的语句块。
5.循环语句
(1)For…Next语句
格式:For循环变量=初值To终值[Step步长]
语句块
Next循环变量
功能:循环变量开始取初值,当循环变量的值未超过终值时,执行语句块,同时循环变量增加一个步长。如果循环变量的值还未超过终值,再执行语句块,循环变量再增加一个步长,……,直到循环变量超过终值。当步长为正时,“超过终值”指大于终值;当步长为负时,“超过终值”指小于终值。当省略“Step步长”时,默认的步长为1。语句块内可以包含语句Exit For其含义为退出循环。语句块内也可包含另一个Foro..Next循环,此时构成多重循环。
(2)Do…Loop语句
格式1:DoWhile条件
语句块
loop
功能:当条件满足时,就进行循环。
先测试条件,当条件满足时,就执行语句块。Loop使得程序又返回DoWhile语句,再对条件进行测试,满足时再执行语句块。重复上述动作,直到条件不满足为止。
格式2:Do
语句块
Loop While条件
功能:先执行语句块,再测试条件,当条件满足时,就进行循环。先执行语句块,再测试条件是否满足。若条件满足,又返回Do语句,再执行语句块。重复上述动作,直到条件不满足为止。
格式3:Do Until条件
语句块
Loop
功能:一直循环到条件满足时为为止(条件满足时就不再循环)。
先测试条件,若条件不满足,就执行语句块。Loop使得程序又返回Do Until语句,再对条件进行测试,不满足时再执行语句块。重复上述动作,直到条件满足为止。
格式4:Do
语句块
Loop Until条件
功能:先执行语句块,然后一直循环到条件满足时为为止(条件满足时就不再循环)。
先执行语句块,再测试条件是否满足。若不满足,又返回Do语句,再执行语句块。重复上述动作,直到条件满足为止。
上述四种格式的语句块中,均可使用
Exit Do
以提前退出Do…Loop循环。
(3)While…Wend语句
格式:While条件
语句块
Wend
功能:当条件满足时,就进行循环。与Do…Ioop语句的第一种格式功能相同。
6.跳转语句
跳转语句也称无条件转向语句。
格式:GoTo行标号
功能:让程序转到行标号指定的那一行上去执行。
行标号由字母或整数数字组成。行标号要加在语句行的最前面,且行标号后面要带一冒号。
注意:GoTo语句与其对应的行标号只能在同一个过程内使用,不能用GoTo语句从一个过程跳转到另一个过程。
不可滥用GoTo语句。然而在某些多重循环或嵌套结构中,恰当地使用GoTo语句可以使流程更为清晰。
7.转子语句和返回语句
转子语句使流程转向一个子程序,其语法为:GoSub行标号,其中行标号指明子程序的开始位置。
返回语句使流程从子程序返回到调用于程序的GoSub语句的下一个语句,其语法为:
Return
例:
Private Stlb Commandl一Click() .
GoSub S
Print 5
Exit Sub
S:
Print 8
Return
End Sub
注意:转子语句和返回语句必须在同一个过程内使用。
8.开关语句
格式1:On变量GoTo行标号1,行标号2,.,行标号n
格式2:On变量GoSub行标号1,行标号2,.,行标号n
功能:根据变量的不同取值,使流程转向不同的语句行(格式1)或不同的子程序(格式2)。
当变量的值等于1时,转向行标号1;当变量的值等于2时,转向行标号2;当变量的值等于n时,转向行标号n。开关语句及其所使用的行标号,必须处在同一个过程内。
格式2又称为开关转子语句。
9.设置变量数据类型语句
Deftype语句为窗体变量或模块变量设置默认的数据类型,其语法为:
DefBool字母范围[,字母范围]…
DefByte字母范围[,字母范围]…
DefInt 字母范围[,字母范围]…
DefLng 字母范围[,字母范围]…
DefSng 字母范围[,字母范围]…
DefDbl 字母范围[,字母范围]…
DefStr 字母范围[,字母范围]…
其功能是:规定名称以某些字母打头的变量,使用某种默认的数据类型。其中“字母范围”可以是一个字母,也可以是诸如“A—D”,“I—K”这样的字母范围。例如
DefLng L-N
规定名字以L,M,N或l,m,n打头的变量,其默认的数据类型为长整型。DeftyPe语句仅对窗体变量或模块变量起作用,它必须放在相应的代码窗口中的(通用)(声明)段内。
Deftype语句对自定义函数返回值的数据类型也产生影响。参见第五章。
10.注释语句和续行标志
注释语句用于对程序的注解和说明。
格式1:Rem内容
格式2:’内容
格式1形成一个语句行。格式2使用一个撇号,可以用在语句行的末尾,也可以单独占据一行。注释语句不被编译成二进制代码,它只出现在源程序中。适量的注释可以增加程序的可读性。在编写源代码时,可以在一行内书写几条语句,它们之间要用冒号(:)隔开。如不使用续行,一行最多可有1023个(英文)字符。VB5使用下划线(_)作为语句行的续行标志,且下划线前必须有一空格。然而字符串内的下划线不被当作续行标志。续行标志符后面不能再添加注释。
下一篇:没有了