当前位置: 首页>>代码示例>>VB.NET>>正文


VB.NET CheckBoxDesigner类代码示例

本文整理汇总了VB.NET中System.Web.UI.Design.WebControls.CheckBoxDesigner的典型用法代码示例。如果您正苦于以下问题:VB.NET CheckBoxDesigner类的具体用法?VB.NET CheckBoxDesigner怎么用?VB.NET CheckBoxDesigner使用的例子?那么, 这里精选的类代码示例或许可以为您提供帮助。


在下文中一共展示了CheckBoxDesigner类的2个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。

示例1: GetDesignTimeHtml

'Imports System.Design
Imports System.Drawing
Imports System.ComponentModel
Imports System.Web.UI.WebControls
Imports System.Web.UI.Design
Imports System.Web.UI.Design.WebControls
'Imports Examples.AspNet

Namespace Examples.AspNet '.Design

    ' Create a class, named SampleCheckBoxDesigner, that overrides the
    ' GetDesignTimeHtml method to display the control on the design
    ' surface.

    Public Class SampleCheckBoxDesigner
        Inherits System.Web.UI.Design.WebControls.CheckBoxDesigner

        ' Override the GetDesignTimeHtml method to display a border on the 
        ' control if the BorderStyle property has not been set by the user.
        Public Overrides Function GetDesignTimeHtml() As String

            Dim sampleCheckBox As SampleCheckBox = CType(Component, _
                SampleCheckBox)
            Dim designTimeHtml As String = Nothing

            ' Check the control's BorderStyle property.
            If (sampleCheckBox.BorderStyle = BorderStyle.NotSet) Then

                ' Save the current value of the BorderStyle property.
                Dim oldBorderStyle As BorderStyle = _
                    sampleCheckBox.BorderStyle

                ' Change the value of the BorderStyle property and 
                ' generate the design-time HTML.
                Try
                    sampleCheckBox.BorderStyle = BorderStyle.Groove
                    designTimeHtml = MyBase.GetDesignTimeHtml()

                    ' If an exception occurs, call the GetErrorDesignTimeHtml
                    ' method.
                Catch ex As Exception
                    designTimeHtml = GetErrorDesignTimeHtml(ex)

                    ' Restore the BorderStyle property to its original value.
                Finally
                    sampleCheckBox.BorderStyle = oldBorderStyle
                End Try

            Else
                designTimeHtml = MyBase.GetDesignTimeHtml()
            End If

            Return designTimeHtml
        End Function
    End Class
End Namespace
开发者ID:VB.NET开发者,项目名称:System.Web.UI.Design.WebControls,代码行数:56,代码来源:CheckBoxDesigner

示例2:

Namespace Examples.AspNet

    ' The SampleCheckBox class that uses the SampleCheckBoxDesigner class.
    <Designer(GetType( _
        Examples.AspNet.SampleCheckBoxDesigner))> _
    Public Class SampleCheckBox
        Inherits CheckBox
        ' To customize the CheckBox class, insert code here.
    End Class

End Namespace
开发者ID:VB.NET开发者,项目名称:System.Web.UI.Design.WebControls,代码行数:11,代码来源:CheckBoxDesigner


注:本文中的System.Web.UI.Design.WebControls.CheckBoxDesigner类示例由纯净天空整理自Github/MSDocs等开源代码及文档管理平台,相关代码片段筛选自各路编程大神贡献的开源项目,源码版权归原作者所有,传播和使用请参考对应项目的License;未经允许,请勿转载。