Visual Basic 2012: 数学运算

电脑进行数学计算的速度远远超过人类。然而,如果电脑本身没有接收来自用户的指令,它将不能够执行任何数学计算。 在Visual Basic 2012 里,我们可以编写代码来指示电脑进行数学运算,如加法,减法,乘法,除法和其他种类的算术运算。为了使 Visual Basic 2012 进行算术计算,我们需要编写涉及使用各种算术运算符的代码。在Visual Basic 2012 里,数学运算符和普通数学运算符是非常相似的,其中加减运算符是相同的,而乘法运算符使用*符号而除法运算符则使用 / 符号。表7.1展示的Visual Basic 2012的算术运算符:

 

运算符 数学运算 范例
+ 加法 1+2=3
减法 6-4=2
* 乘法 7×7=49
/ 除法 12/3=4
^ 指数 2^3=8
Mod 模量(整数被除后返回的余数) 15 Mod 4=3
\ 整数除法(丢弃小数) 19\4=4

范例7.1

在这个程序中,你需要插入两个文本框,四个标签和一个按钮。按一下按钮,并输入该代码如下所示。当您运行该程序时,它会执行四种基本的算术运算,并在四个标签上显示答案。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim 数目1, 数目2, 和数,差数, 积数,商数 As Single
数目1= TextBox1.Text
数目2 = TextBox2.Text

和数=num1+num2
差数=num1-num2
积数 = num1 * num2
商数=num1/num2
Label1.Text=和数
Label2.Text=差数
Label3.Text = 积数
Label4.Text = 商数

End Sub

范例7.2

以下的程序可以利用勾股定理(毕达哥拉斯定理)来计算斜边c,相邻侧 a 和相反侧b的长度。利用勾股定理的公式以VB写出来是:

c^2=a^2+b^2

下面是勾股定理的代码:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim a, b, c As Single

a = TextBox1.Text
b = TextBox2.Text
c=(a^2+b^2)^(1/2)
Label3.Text=c

End Sub

范例7.3:BMI(体重指数)计算器

现代很多都肥胖。医学专家证明身体过胖会回带来许多不良的医疗问题如心血管疾病,会严重影响健康。如果你的体重指数超过30,你就被认为是肥胖的。你可以参考以下的BMI值来品估你的体重状况。

BMI=<18.5

正常体重

BMI= 25 到29.9

超重

BMI=30或更高

肥胖

要计算你的BMI,你不一定要咨询你的医生,你可使用计算器或自制的计算机程序。BMI计算器是一个Visual Basic程序,可以计算体重指数BMI。BMI可以用公式 体重/(身高)^ 2 来计算(重量是以公斤而高度是以米作为单位)。如果你只知道英制的重量和高度,那么你需要将它们转换为公制。以下是它的程序代码:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArsgs) Handles Button1.Click

Dim 身高, 体重, bmi As Single
身高 = TextBox1.Text
体重 = TextBox2.Text
bmi = (weight) / (height ^ 2)
Label4.Text = bmi

End Sub

下图中所示的输出。在这个例子中,你的身高是1.80米(约5英尺11),你的体重是80公斤(约180英磅),你的体重指数(BMI)是24.69136。指数表明你是健康的。 (注:1英尺= 0.3048,1磅=0.45359237公斤)

vb2012_fig7.1

图7.1

Share on FacebookShare on Google+Tweet about this on TwitterShare on LinkedIn