Partial Class HTMLGenericDemo1_aspx

Inherits System.Web.UI.Page

Protected Sub changeButton_click(ByVal source As Object, ByVal e As EventArgs) Handles submit.ServerClick

        BodyID.Attributes("bgcolor") = PageColor.Value

End Sub

End Class