Berikut adalah proses program dengan menggunakan Diagram Flowchart pada program Visual Basic
2. Kodingan Rumus Menggunakan Visual Basic
Private Sub cmdclear_Click()
txtr1.Text = ""
txtr2.Text = ""
txtc1.Text = ""
txtr1.Text = ""
txtfrek.Text = ""
End Sub
Private Sub cmdexit_Click()
End
End Sub
Private Sub cmdhitung_Click()
txtfrek.Text = 1.44 * 1000000 / (Val(txtr1.Text) + (2 * (Val(txtr2.Text))) * (Val(txtc1.Text)))
End Sub