controltrace.vb

asp.net技术内幕的书配源码

Imports System
Imports System.Web
Imports System.Web.UI

Namespace myControls

Public Class ControlTrace
Inherits Control

Overrides Protected Sub OnLoad( e As EventArgs )
  Context.Trace.Warn( "Executing OnLoad Method!" )
End Sub

Overrides Protected Sub OnPreRender( e As EventArgs )
  Context.Trace.Warn( "Executing OnPreRender Method!" )
End Sub

Overrides Protected Sub Render( objTextWriter As HtmlTextWriter )
  Context.Trace.Warn( "Executing Render Method!" )
  objTextWriter.WriteLine( "Hello World!" )
End Sub

End Class

End Namespace