活动2 程序的基本结构
顺序结构
顺序结构
顺序结构
顺序结构
顺序结构
顺序结构
顺序结构
计算圆的面积
Private Sub Command1_Click()
Dim r As Single, s As Single ’定义变量r和s
Const PI = 3.14 ’定义常量
r = Val(Text1.Text) ’把“半径”存放在r中
s = PI * r ^ 2 ’计算面积
Text2.Text = s ’把“面积”显示出来
End Sub
顺序结构
顺 序 结 构
1.观察窗体界面,说说都有哪些控件组成?
这些对象都设置了哪些属性?
标签(Label)
Caption:
Font:
BorderStyle:
圆的半径
厘米
圆的面积
平方厘米
楷体
三号
0—None
文本框(Textbox)
Text:
Font:
楷体
三号
按钮(CommandButton)
Caption:
Font
计算
楷体
三号
2.变量
声明变量的语法格式为:
Dim 〈变量名〉[As〈类型〉]
例 :Dim r As Single, s As Single
3. 常量
声明常量的语法格式为:
Const〈常量名〉[As〈数据类型〉] =〈表达式〉
例 :Const PI=3.14
格式:
变量名=表达式
对象名.属性=值
Text2.Text=s
r=Val(Text1.Text)
s=PI*r^2
4.赋值语句
(给变量赋值时用)
(显示结果时用)
5.实例分析
顺序结构:各语句按照出现的先后次序依次执行
6.总结顺序结构的流程:
1.定义变量
2.定义常量
3.给变量进行赋值
4.输出结果