Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Label1.Text = Convert.ToString(0) End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Dim ws As ServiceReference1.CalculatorClient = New ServiceReference1.CalculatorClient() Dim result As Integer = ws.Add(Integer.Parse(TextBox1.Text), Integer.Parse(TextBox2.Text)) Label1.Text = result.ToString() ws.Close() End Sub End Class