Friendship is the cooperative and supportive relationship between two or more people. In this sense, the term connotes a relationship which involves mutual knowledge, esteem, affection, and respect along with a degree of rendering service to friends in times of need or crisis. Friends will welcome each other’s company and exhibit loyalty towards each other, often to the point of altruism. Their tastes will usually be similar and may converge, and they will share enjoyable activities. They will also engage in mutually helping behavior, such as the exchange of advice and the sharing of hardship. A friend is someone who may often demonstrate reciprocating and reflective behaviors. Yet for some, the practical execution of friendship is little more than the trust that someone will not harm them.

This Visual Basic Code

Private Sub Command1_Click ()

Dim x As Double

Dim y As Double

Dim z As Double
x = Val(Text1.Text)

y = Val(Text2.Text)

z = x + y

Text3.Text = Val(z)
End Sub

Private Sub Command2_Click ()

Text1.Text = “”

Text2.Text = “”

Text3.Text = “”

End Sub

Private Sub Command3_Click ()

Dim x As Double

Dim y As Double

Dim z As Double

x = Val(Text1.Text)

y = Val(Text2.Text)

z = x – y

Text3.Text = Val(z)

End Sub

Private Sub Command4_Click ()

Dim x As Double

Dim y As Double

Dim z As Double

x = Val(Text1.Text)

y = Val(Text2.Text)

z = x / y

Text3.Text = Val(z)

End Sub

Private Sub Command5_Click ()

Dim x As Double

Dim y As Double

Dim z As Double

x = Val(Text1.Text)

y = Val(Text2.Text)

z = x * y

Text3.Text = Val(z)

End Sub

Private Sub Command6_Click ()

End

End Sub