以下为《VB语句结构ppt模板》的无排版文字预览,完整内容请下载
VB语句赋值语句,注释语句,选择语句, 循环语句过程与自定义函数常用VB语句、过程与自定义函数算法执行流程的三种结构选择模式赋值语句 赋值语句:把赋值号右边表达式的计算结果存储到等号左边指定的变量中,或存放到某个对象的指定的属性中
赋值语句格式 如下:
变量名=表达式
对象名.属性名=表达式
说明:
1.一旦有新的数据存储到某变量中,就会把该变量中原来的数据覆盖掉
2.当赋值号的左右都出错时,先看右边的错误,当右边的错误改正时,左边的错误才会有提示。
3.“=”号两边的数据类型应该一致,否则会出现数据类型不匹配的错误。
4.多行赋值语句并行(即一行)写时,有冒号(:)做为分隔符,但还是代表了多条语句,并不代表一条语句,只不过节省了书写空间。
例3:
与 作用相同
z=x:x=y:y=zz=x
x=y
y=z例1:x=1
例2:x=y
例3:x=y+5
例4:x=str(a)
例5:Label1.caption=””注释语句注释是以单某某(’)或rem开头的一串文字,可以出现在程序中需要说明的位置上,通过这一串文字,对附近的程序段进行简要的说明,增加程序的可读性。注释对程序的执行效果没有任何影响,程序运行时自动跳过注释不会执行注释语句,也就不会占用运行时间。
考试时,有时可通过注释语句分析变量和算法,帮助解题。
如:
Dim n As Integer ’变量n用于存储班级总人数选择语句If 明天天气晴朗, then 我会去公园.
If 明天天气晴朗, then 我会去公园, else 我就呆在家里.行If语句
If 条件表达式 Then 语句1 Else 语句2
该语句的执行过程是:
先计算条件表达式的值,如果条件表达式的计算结果是True,就执行Then后面的语句,否则执行Else后面的语句。If 条件表达式 Then 语句
该语句的执行过程是:
先计算条件表达式的值,如果Else和它的后随语句不出现,则条件表达式值为True时执行Then后面的语句,否则就什么也不执行,程序转向If语句后面的后继语句。例:If x=1 Then y=1 else y=2
注意1:x=1是条件是关系表达式, y=1与y=2是赋值语句注意2:一个If语句必须有一个End If
注意3:行if语句必须在一行里写完,不能分行写条件表达式有三种形式:
(1)关系表达式
(2)逻辑变量或常量
(2)数量变量或常量选择结构
if 条件 then
语句A
end if
if 条件 then
语句A
else
语句B
end if
If和end if 要成对出现If 条件 then
语句A
Else
语句B
End if块If语句If 条件 then
语句A
End if例1:输入一个数到变量a,输出它的绝对值(不用绝对值函数)if ____ then
____
end if abLabel1.caption=str(b)例3:输入两个不相等的数a,b,比较大小,将大数放在a中,小数放在b中,然后输出a,b if ____ then
end if a0 Then
x1=(-b+sqr(d))/(2*a)
x2= (-b-sqr(d))/(2*a)
k=2
ElseIf d=0 Then
x1=(-b)/(2*a):x2=x1:k=1
Else
k=0
EndIf
某超市打折促销,规定如下:
①购物未超过500元按原价支付
②购物超过500元但未超过1000元,超过500元部分按9折优惠计价
③购物超过1000元但未超过1500元,超过1000元部分按8折优惠计价
④购物超过1500元但未超过3000元,超过1500元部分按7折优惠计价
⑤购物超过3000元,超过3000元部分按6折优惠计价解决此问题相应的Visual Basic程序如下:
Private Sub Command1_Click()
Dim x As Single, y As Single
x = Val(orgtext.Text)
If x 30 Then Exit ForNext i 如果事先已知循环次数,则可使用For-Next循环结构语句。它的一般格式如下:执行方式:
当初值、终值与步长为算术表达式时,首先计算初值、终值与步长表达式的值。
判断循环变量的值是否超过终值,
如果超过就停止执行“循环体”,跳出循环,执行Next后面的语句
→否则执行一次“循环体”,就把“循环变量+步长”的值赋给“循环变量”,
→再重复以上过程。 For语句的循环执行方式流程图如下图所示:For循环语句Dim i As Integer, s as integerFor i=1 To 10 Step 1 s=s+i Next i s?s+ii0时,初值 b例3、有如下VB程序:
Private Sub Command1_Click()
Const n = 3
Dim a As Integer, b As Integer, c As Integer, s As String
For a = 1 To n
s = ""
For b = 1 To 2 * a - 1
s = s + Str(a)
Next b
List1.AddItem s
Next a
End Sub程序运行结束后,List1中显示的内容是:例4、有如下程序段,数组元素a(1)到a(5)的数据依次是“5,4,3,4,2”,程序中换线出代码有一处有错误,先改正程序中存在的错误,运行结束后,文本框Text1中显示的内容是
s = ""
For m = 1 To 3
h = m
For n = m + 1 To 5
If a(h) > a(n) Then h = n
Next n
If h m Then
t = a(m): a(m) = a(h): a(h) = t
End If
s = s + Str(h)
Next m
Text1.Text = s初始情况:
a(1)=5 a(2)=4 a(3)=3 a(4)=4 a(5)=2例5、编写程序计算f=xy,部分代码如下,请找出其中的错误。
Private Sub Command1_Click()
Dim f As Long, x As Integer, y As Integer
x = Val(Text1.Text)
y = Val(Text2.Text)
For i = 1 To y
f = x * y
End If
Text3.Text = Str(f)
End SubEnd If => Next f = x * y => f = x * x End If => Next i Do While … Loop语句(条件型循环) Do循环不仅可以不按照限定的次数执行循环内的语句块,而且可以根据循环条件是“True”或“False”决定是否结束循环。
Do语句的格式有多种,常用的Do语句格式如下: Do While 条件表达式
[语句块]
[Exit Do]
Loop 代码(For循环):s=0
For i=3 to 100 step 3
s=s+i
Next i s=0:i=3
Do while i请点击下方选择您需要的文档下载。
以上为《VB语句结构ppt模板》的无排版文字预览,完整内容请下载
VB语句结构ppt模板由用户“peidy01”分享发布,转载请注明出处