Protected Overrides Sub Render(ByVal writer As System.Web.UI.HtmlTextWriter)
Dim sb As StringBuilder = New StringBuilder()
Dim sw As StringWriter = New StringWriter(sb)
Dim myWriter As HtmlTextWriter = New HtmlTextWriter(sw)
Dim HTMLStr As String
MyBase.Render(myWriter)
writer.Write(sw.GetStringBuilder())
HTMLStr = sb.ToString
End Sub