1 / 6
文档名称:

VB设计三角形面积计算程序.doc

格式:doc   大小:158KB   页数:6页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

VB设计三角形面积计算程序.doc

上传人:kunpengchaoyue 2021/9/15 文件大小:158 KB

下载得到文件列表

VB设计三角形面积计算程序.doc

文档介绍

文档介绍:实用标准文案
: .
VB设计三角形面积计算程序
已知三角形的三边边长,计算三角形的面积(用 VB设计程序)
程序分析:
分析:具体步骤如下。
(1)先分析三条边长是不是能构成三角形;
(2 )若三边边长违反三角形成立规则,则不是三角形;
(3)若三边边长符合三角形成立规则,则利用海伦公式求算三角形面积 据此,给出计算机求算三角形面积的算法步骤如下:
(1) 开始。
(2) 获得三角形的三条边长 a、b和c。
(3) 判断此三边边长能否构成三角形。若不能,转到( 5)
(4) 若能计算三角形面积。
(5) 结束。
界面设计:
利用VB提供的很多控件设计画出右图,其过程如下:
(1) 先创建一个窗体(Form),标题为
“三角形面积计算”。
(2) 在窗体上指定位置放若干标签
(Label),标题分别为“三角形面
积计算”、“边长:”、“a “、” b “、”
c “、”面积“,用作说明和提示。
(3) 在标题“ a “、” b “、” c “、“面积”的标签后面各放一个文本框( TextBox )用作 输入边长和输出结果(面积)。
(4) 在窗体上指定的位置放 3个命令按钮(CommandButton ),标题分别为"清空”
“计算面积”、“退出”。当在运行过程中鼠标单击相应的命令按钮时程序会执行相应
的功能。
代码设计:
界面设计好了之后,按照下面图所示为各个控件命名,分析控件的作用:
(1) 标签是用来表示说明或提示作用,代
码设计中不会用到它们,所以没有重
新命名。
(2) 文本框t1、t2和t3是用来输入三边
边长的,文本框tarea是用来输出三 角形面积计算的结果。
(3) 命令按钮clear、root和exit在程序中运行时被鼠标点击,程序将执行一段代码、
完成一个独立功能,所以这些控件需要每个设计一段代码。
基于以上分析,必须给每个命令按钮设计完成相应功能的一段程序代码。具体设计如下:
(1) 按钮exit的程序代码:
Private Sub exit_Click()
End
End Sub
(2) 按钮clear的程序代码:
Private Sub clear_Click()
=""
=""
=""
=""

End Sub
(3) 按钮root的程序代码:
Private Sub root_Click()
Dim a!, b!, c!, m!, s!
a = Val()
b = Val()
c = Val()
If (a > 0 And b > 0 And c > 0 And a + b > c And a + c > b And b + c > a) The n
m = (a + b + c) / 2#
s = Sqr(m * (m - a) * (m - b) * (m - c))
= s
Else
MsgBox