Page 105 - Programming VB.NET
P. 105

Code With VB.Net                              101




                 Public Class Form1

                 Private Sub btnresult_Click(ByVal sender As
                 System.Object, ByVal e As System.EventArgs)
                 Handles btnresult.Click



                 Dim objpoly As New Operation()

                 lblresult1.Text= "Value for i+k: "
                 &objpoly.add(10, 30)

                 lblresult2.Text= "Value for i+j: "
                 &objpoly.add(10.1, 20.5)

                 lblresult3.Text= "Value for i+j+k:
                 "&objpoly.add(10, 20, 30)


                     End Sub

                 End Class
   100   101   102   103   104   105   106   107   108   109   110