Search Tools Links Login

Area of the Rectangle in VB6


Here is a very simple program that I wrote using VB 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.

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

About this post

Posted: 2019-11-14
By: JakeRPomperada
Viewed: 256 times

Categories

Visual Basic 6

Attachments

No attachments for this post


Loading Comments ...

Comments

No comments have been added for this post.

You must be logged in to make a comment.