Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
End Sub
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Dim tc As New TestClass1()
tc.testString = TextBox1.Text
Label1.Text = tc.testString
Label2.Visible = True
End Sub
End Class