Wednesday, September 28, 2016

Area of the Rectangle Solver in Visual Basic

Here is a very simple program that I wrote using Visual Basic 5 to compute the area of the rectangle. The code is very short and easy to understand. What does the program will do is to ask the user to give  length and breath of the rectangle and the our program will solve for it's area.

Add me at Facebook my address is jakerpomperada@gmail.com and jakerpomperada@yahoo.com. 

My email address are the following 
jakerpomperada@gmail.com and jakerpomperada@yahoo.com. 

My mobile number here in the Philippines is 09173084360.





Sample Program Output


Program Listing


Private Sub Command1_Click()

   Sum = Val(Form1.Text1.Text) * Val(Form1.Text2.Text)

   Label4.Caption = "The are of the rectagle is " & Sum & "."

End Sub

Private Sub Command2_Click()

   Form1.Text1.Text = ""
   Form1.Text2.Text = ""
   Form1.Label4.Caption = ""
   Form1.Text1.SetFocus

End Sub





No comments:

Post a Comment