📄 bluetextboxpostback.vb
字号:
Imports System
Imports System.Web
Imports System.Web.UI
Imports System.Collections.Specialized
Namespace myControls
Public Class BlueTextBoxPostBack
Inherits Control
Implements IPostBackDataHandler
Public Text As String
Public Function LoadPostData( PostDataKey As String, Values As NameValueCollection) As Boolean _
Implements IPostBackDataHandler.LoadPostData
Text = Values( Me.UniqueID )
Return False
End Function
Public Sub RaisePostDataChangedEvent() _
Implements IPostBackDataHandler.RaisePostDataChangedEvent
' Raise Change Event
End Sub
Protected Overrides Sub Render( objTextWriter As HtmlTextWriter )
objTextWriter.AddAttribute( "Name", Me.UniqueID )
objTextWriter.AddStyleAttribute( "background-color", "Blue" )
objTextWriter.AddStyleAttribute( "color", "Yellow" )
objTextWriter.AddAttribute( "value", Text )
objTextWriter.RenderBeginTag( "input" )
objTextWriter.RenderEndTag
End Sub
End Class
End Namespace
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -