defaultvb.aspx.vb

来自「Telerik是很大的第三方软件制造商」· VB 代码 · 共 43 行

Imports Telerik.QuickStart

Namespace Telerik.CallbackExamplesVB.Controls.Panel.OutOfPanel

	Public Class DefaultVB
		Inherits XhtmlPage

#Region " Web Form Designer Generated Code "

		'This call is required by the Web Form Designer.
		<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

		End Sub
		Protected WithEvents CallbackPanel1 As Telerik.WebControls.CallbackPanel

		'NOTE: The following placeholder declaration is required by the Web Form Designer.
		'Do not delete or move it.
		Private designerPlaceholderDeclaration As System.Object

		Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
			'CODEGEN: This method call is required by the Web Form Designer
			'Do not modify it using the code editor.
			InitializeComponent()
		End Sub

#End Region

		Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
			'Put user code to initialize the page here
		End Sub

		Private Sub CallbackPanel1_Request(ByVal source As Object, ByVal e As Telerik.WebControls.CallbackPanel.CallbackPanelRequestEventArgs) Handles CallbackPanel1.Request
			If e.RequestArgument = "ChangeSkin" Then
				If CallbackPanel1.BackImageUrl = "Img/Image1.gif" Then
					CallbackPanel1.BackImageUrl = "Img/Image2.gif"
				Else
					CallbackPanel1.BackImageUrl = "Img/Image1.gif"
				End If
			End If
		End Sub
	End Class

End Namespace