如何访问同一页上另一个Ascx控件中的一个Asxx控件中的值

Question

我有一个aspx页面，它有两个用户控件，一个带有网格视图，另一个带有标签，用于在用户登录时显示用户数据。现在我希望使用网格视图中一列的数据显示在第二个用户控件的标签中。我怎样才能做到这一点。网格视图中的数据会根据每个用户的安全角色进行更改。欢迎输入。感谢

Answer 1

Gridview用户控件在获得所需信息时引发自定义事件。该事件在主页中处理，并通过可访问嵌入控件中的标签文本的公共属性分配给具有标签的UserControl。

默认.aspx

具有两个用户控件的页面

<%@ Page Title="Home Page" Language="VB" MasterPageFile="~/Site.Master" AutoEventWireup="true" CodeBehind="Default.aspx.vb" Inherits="StackOverFlowJunkVB._Default" %>
<%@ Register Src="~/WebUserControlGridView1.ascx" TagPrefix="uc1" TagName="WebUserControlGridView1" %>
<%@ Register Src="~/WebUserControlLabel1.ascx" TagPrefix="uc1" TagName="WebUserControlLabel1" %>
<asp:Content ID="BodyContent" ContentPlaceHolderID="MainContent" runat="server">
    <uc1:WebUserControlGridView1 runat="server" id="WebUserControlGridView1" />
    <uc1:WebUserControlLabel1 runat="server" id="WebUserControlLabel1" />
</asp:Content>

默认.aspx.vb

通过GridView用户控件引发的事件将文本分配给Label用户控件的代码隐藏

Public Class _Default
    Inherits Page
    Private Sub WebUserControlGridView1_ReallyImportantLabelTextHandler(sender As Object, e As GridViewLabelEvent) _
      Handles WebUserControlGridView1.ReallyImportantLabelTextHandler
        WebUserControlLabel1.ReallyImportLabelText = e.ImportantLabelText
    End Sub
End Class

GridView用户控件的CodeBehind

' Define a custom EventArgs class to pass some really important text
Public Class GridViewLabelEvent
    Inherits EventArgs
    Public Property ImportantLabelText As String
End Class
' The user control with a GridView
Public Class WebUserControlGridView1
    Inherits System.Web.UI.UserControl
  Public Event ReallyImportantLabelTextHandler As EventHandler(Of GridViewLabelEvent)
  Private Sub GridView1_DataBound(sender As Object, e As EventArgs) Handles GridView1.DataBound
    Dim gvle As New GridViewLabelEvent
    gvle.ImportantLabelText = "This is really important"
    RaiseEvent ReallyImportantLabelTextHandler(Me, gvle)
  End Sub
End Class

标签UserControl的CodeBehind

Public Class WebUserControlLabel1
    Inherits System.Web.UI.UserControl
    ' Property to assign Label Text
    Public Property ReallyImportLabelText As String
        Get
            Return Label1.Text
        End Get
        Set(value As String)
            Label1.Text = value
        End Set
    End Property
End Class