當前位置: 首頁>>代碼示例>>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;未經允許,請勿轉載。