📄 defaultvb.aspx.vb
字号:
Imports System
Imports System.Collections
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Web
Imports System.Web.SessionState
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web.UI.HtmlControls
Imports Telerik.WebControls
Namespace Telerik.PanelbarExamplesVBNET.Panelbar.Examples.Programming.ServerSideEvents
'/ <summary>
'/ Summary description for DefaultCS.
'/ </summary>
Public Class DefaultVB
Inherits Telerik.QuickStart.XhtmlPage
Protected RadPanelbar1 As Telerik.WebControls.RadPanelbar
Protected Label1 As System.Web.UI.WebControls.Label
Private Sub Page_Load(sender As Object, e As System.EventArgs) Handles MyBase.Load
End Sub 'Page_Load
' Put user code to initialize the page here
Protected Sub PanelItem_Click(sender As Object, e As RadPanelbarClickEventArgs)
Label1.Text = "Clicked panel item - " + e.ClickedPanelItem.Text
End Sub 'PanelItem_Click
Protected Sub PanelItem_Expand(sender As Object, e As RadPanelbarClickEventArgs)
Label1.Text = "Expanded panel item - " + e.ClickedPanelItem.Text
End Sub 'PanelItem_Expand
Protected Sub PanelItem_Collapse(sender As Object, e As RadPanelbarClickEventArgs)
Label1.Text = "Collapsed panel item - " + e.ClickedPanelItem.Text
End Sub 'PanelItem_Collapse
Protected Overrides Sub OnInit(e As EventArgs)
'
' CODEGEN: This call is required by the ASP.NET Web Form Designer.
'
InitializeComponent()
MyBase.OnInit(e)
End Sub 'OnInit
'/ <summary>
'/ Required method for Designer support - do not modify
'/ the contents of this method with the code editor.
'/ </summary>
Private Sub InitializeComponent()
End Sub 'InitializeComponent
End Class 'DefaultVB
End Namespace 'Telerik.PanelbarExamplesVBNET.Panelbar.Examples.Programming.ServerSideEvents
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -