Komputer dapat melakukan perhitungan matematika jauh lebih cepat dari manusia. Namun, komputer itu sendiri tidak akan dapat melakukan perhitungan matematis tanpa menerima instruksi dari pengguna. Di VB2010, kita dapat menulis kode untuk menginstruksikan komputer untuk melakukan perhitungan matematis seperti penambahan, pengurangan, perkalian, pembagian dan jenis lain dari operasi aritmatika. Agar VB2010 untuk melakukan perhitungan aritmatika, kita perlu menulis kode yang melibatkan penggunaan operator aritmatika berbagai. Operator aritmatika VB2010 sangat mirip dengan operator aritmatika normal, hanya dengan sedikit variasi. Para operator plus dan minus yang sama sedangkan operator perkalian menggunakan simbol * dan operator pembagian menggunakan simbol /. Daftar VB2010 operator aritmatika yang ditunjukkan dalam tabel 7.1 di bawah ini:
stabil 7.1: 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 7.1
Dalam program ini, Anda harus memasukkan dua kotak teks, empat label dan satu tombol. Klik tombol dan kunci dalam kode seperti yang ditunjukkan di bawah ini. Perhatikan bagaimana operator aritmatika berbagai sedang digunakan. Ketika Anda menjalankan program, itu akan melakukan operasi aritmatika dasar empat dan menampilkan hasilnya pada empat label.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim num1, num2, difference, product, quotient As Single
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
End Sub
Contoh 7.2
Program ini dapat menggunakan Teorema Pythagoras untuk menghitung panjang sisi miring c mengingat panjang sisi yang berdekatan dan b sisi yang berlawanan. Dalam kasus Anda lupa rumus untuk Teorema Pythagoras, tertulis sebagai
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
Contoh 7.3: BMI Kalkulator
Banyak orang mengalami obesitas sekarang dan itu bisa mempengaruhi kesehatan mereka secara serius. Obesitas telah terbukti oleh para ahli medis untuk menjadi salah satu faktor utama yang membawa banyak masalah medis yang merugikan, termasuk penyakit jantung. Jika BMI Anda lebih dari 30, Anda dianggap mengalami obesitas. Anda dapat merujuk ke berbagai berikut nilai BMI status berat badan Anda.
- Kurus = <18,5
- Berat badan normal = 18,5-24,9
- Kegemukan = 25-29,9
- Obesitas = BMI 30 atau lebih besar
Untuk menghitung BMI Anda, Anda tidak perlu berkonsultasi dengan dokter Anda, Anda hanya bisa menggunakan kalkulator atau program komputer rumah dibuat, ini adalah persis apa yang saya menunjukkan kepada Anda di sini. Kalkulator BMI adalah program Visual Basic yang dapat menghitung indeks massa tubuh, atau BMI dari seseorang yang didasarkan pada berat tubuh dalam kilogram dan tinggi badan dalam meter. BMI dapat dihitung menggunakan berat rumus / (tinggi) 2, di mana berat badan diukur dalam kg dan tinggi dalam meter. Jika Anda hanya tahu berat badan dan tinggi di lb dan kaki, maka Anda perlu mengkonversikannya ke sistem metrik (Anda memang bisa menulis sebuah program VB untuk konversi).
Dim height, weight, bmi As Single
height = TextBox1.Text
weight = TextBox2.Text
bmi = (weight) / (height ^ 2)
Label4.Text = bmi
End Sub
Output ditunjukkan pada diagram di bawah ini. Dalam contoh ini, tinggi badan Anda adalah 1.80m (sekitar 5 kaki 11), berat badan Anda adalah 75 kg (sekitar 168Ib), dan BMI Anda adalah tentang 23,14815. Membaca ini menunjukkan bahwa Anda sehat. (Catatan; 1 kaki = 0,3048, £ 1 = 0,45359237 kg)
Dari contoh di atas, Anda dapat melihat bahwa melakukan operasi aritmatika relatif mudah. Berikut adalah proyek aritmatika lebih lanjut Anda dapat mencoba program:
- Luas segitiga
- Luas persegi panjang
- Luas lingkaran
- Volume silinder
- Volume kerucut
- Volume bola
- Bunga berganda
- Masa Depan nilai
- Berarti
- Perbedaan
- Jumlah sudut dalam poligon
- Konversi lb untuk kg
- Konversi Fahrenheit ke Celcius
Sandi Permana
18113221
2KA39
Tulisan 8
Teori Organisasi Umum 1#
Budi Utami, S.E
0 comments :
Posting Komentar