Agar lebih mudah maka langsung saya berikan tutorialnya, silahkan akses link berikut:
[youtube https://www.youtube.com/watch?v=nfi8WjYG-hQ&w=560&h=315]
Lihat gambar berikut:
Komponen visualnya sebagai berikut:
No. | Kontrol | Name | Caption |
1 | TextBox1 | V | |
2 | TextBox2 | C | |
3 | TextBox3 | T | |
4 | TextBox4 | P | |
5 | TextBox5 | m | |
6 | CommandButton1 | CommandButton1 | HITUNG |
7 | CommandButton2 | CommandButton2 | ULANGI |
Skrip VBA untuk hitungan di atas dapat dilihat pada teks di bawah ini
Private Sub CommandButton1_Click()
T = Val(C) + 273
m = (Val(p) * Val(V) * 32) / (0.082 * Val(T))
End Sub
Private Sub CommandButton2_Click()
V = ""
C = ""
T = ""
p = ""
m = ""
End Sub