Komputer dapat melakukan
perhitungan matematika lebih cepat dibandingkan dengan manusia. Meskipun begitu,
computer tidak dapat melakukan tugasnya tersebut
tanpa instruksi dari manusia. Pada VB2010 kita bias menuliskan code instruksi perhitungan
matematika seperti: penjumlahan, pengurangan, perkalian, pembagia, dan lain
sebagianya. Adapaun beberapa contoh perhitungan matematika yang dapat dilakukan
pada VB2010 antara lain:
Tabel Operator Aritmatika:
Operator
|
Mathematical
function
|
Example
|
+
|
Addition
|
1+2=3
|
--
|
Subtraction
|
4-1=3
|
^
|
Exponential
|
2^4=16
|
*
|
Multiplication
|
4*3=12,
(5*6))2=60
|
/
|
Division
|
12/4=3
|
Mod
|
Modulus
(return the remainder from an integer division)
|
15
Mod 4=3
255
mod 10=5
|
\
|
Integer
Division (discards the decimal places)
|
19\4=4
|
Contoh 1:
Pada program ini, kamu harus
memasukkan 2 textbox, 4 label dan 1 button. Klik button 2 kali dan masukkan kode
berikut:
PrivateSub
Button1_Click(ByVal sender AsSystem.Object, ByVal e AsSystem.EventArgs) Handles
Button1.Click
Dim
num1, num2, difference, sum, product, quotient AsSingle
num1 = TextBox1.Text
num2 = TextBox2.Text
sum = num1 + num2
difference = num1 -
num2
product = num1 * num2
quotient = num1 /
num2
Label1.Text = sum
Label2.Text = difference
Label3.Text = product
Label4.Text = quotient
EndSub
Contoh 2:
Program
dapat menggunakan teorema Pythagoras untuk menghitung nilai C dari 2 bilangan A
dan B. Pada program ini,
kamu harus memasukkan 2 textbox, 1 label dan 1 button. Klik button 2 kali dan masukkan
kode berikut:
PrivateSub
Button1_Click(ByVal sender AsSystem.Object, ByVal e AsSystem.EventArgs) Handles
Button1.Click
Dim a,
b, c AsSingle
a = TextBox1.Text
b = TextBox2.Text
c = (a ^ 2 + b ^ 2) ^ (1 / 2)
Label1.Text = c
EndSub
Contoh3: (Kalkulator BMI)
Kalkulator
BMI merupakan salah satu cara perhitungan keseimbangan berat badan. Untuk menentukan
berat badan kita ideal atau tidak, dapat dilihat dari aturan berikut:
·
Underweight = <18.5
·
Normal weight = 18.5-24.9
·
Overweight = 25-29.9
·
Obesity = BMI of 30 or
greater
Rumus untuk menghitung nilai BMI yaitu: BMI = weight
/ height2
Pada program ini, kamu harus memasukkan 2 textbox, 1 label dan 1 button.
Klik button 2 kali dan masukkan kode berikut:
PrivateSub
Button1_Click(ByVal sender AsSystem.Object, ByVal e AsSystem.EventArgs) Handles
Button1.Click
Dim
height, weight, bmiAsSingle
height =
TextBox1.Text
weight =
TextBox2.Text
bmi = (weight) /
((height) ^ 2)
Label1.Text = bmi
EndSub
Untuk mendapatkan file pdf nya klik download
Tidak ada komentar:
Posting Komentar