📄 showgreen.vb
字号:
Imports System
Imports System.Web
Imports System.Web.UI
Namespace myControls
Public Class ShowGreen: Inherits Control
Protected Overrides Sub Render( objTextWriter As HtmlTextWriter )
Dim strInnerText As String
If IsLiteralContent
strInnerText = CType( Controls( 0 ), LiteralControl ).Text
objTextWriter.AddAttribute( "color", "green" )
objTextWriter.RenderBeginTag( "font" )
objTextWriter.RenderBeginTag( "b" )
objTextWriter.Write( strInnerText )
objTextWriter.RenderEndTag()
objTextWriter.RenderEndTag()
End If
End Sub
End Class
End Namespace
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -