例:自定义了一个Combobox最后一如下输入:
Protected Overloads Overrides Sub Render(ByVal writer As HtmlTextWriter)
If Me.ClientReadOnly Then
Dim textlength As Integer = Me.SelectedItem.Text.Length
writer.AddAttribute("value", Me.SelectedItem.Text)
writer.AddAttribute("type", "text")
writer.AddAttribute("id", Me.ID)
writer.AddAttribute("class", "txtTolabel")
writer.AddAttribute("readonly", "true")
writer.AddAttribute("style", "width:" & Convert.ToString(textlength * 13) & "px;" & "text-align:left;color:" & Me.ForeColor.Name)
writer.RenderBeginTag("input")
writer.RenderEndTag()
Else
MyBase.Render(writer)
End If
End Sub
最后页面产生一个input效果,这样很灵活啊,不过我想是否有什么缺陷!!?