Area of a Circle Calculator
This code allows the user to find the area of circle by clicking a command button and then typing in the radius of the circle.
It is very helpful to anyone working on a calculator project. I am also coming out with area of triangle and square.
- Place a command button in your form and name it Command1 and make the caption Area Of A Circle.
- Copy this code into the form...
Private Sub Command1_Click()
Dim Radius
Dim Area
Radius = InputBox("Type In The Radius", "Radius")
Area = 3.14 * (Radius * Radius)
MsgBox Area, vbDefaultButton1, "Answer"
End Sub
Loading Comments ...
Comments
No comments have been added for this post.
You must be logged in to make a comment.