Hot To Set Property in User-Control

-------Back-End Code-----------

Partial Class UserControls_CompanyDetail
Inherits System.Web.UI.UserControl
Private _CompanyId As Integer = 0

Public Property CompanyId() As Integer
Get
Return _CompanyId
End Get
Set(ByVal value As Integer)
_CompanyId = value
DataSrcCompanyDetail.SelectParameters("Cid").DefaultValue = value
frmCompDetails.DataBind()
End Set
End Property

End Class
-----------------------------------
------Source-Code-----------------
----------------------------------
<%@ Control Language="VB" AutoEventWireup="false" CodeFile="CompanyDetail.ascx.vb"
Inherits="UserControls_CompanyDetail" %>

DataKeyNames="CompanyId" DataSourceID="DataSrcCompanyDetail" CellPadding="0" Width="100%" HorizontalAlign="Center" EnableViewState="false"> <%# Eval("CompName") %> Address: <%# EVal("CompAddress") %> , <%# Eval("AreaName") %> <%# EVal("CompCity") %> - <%# EVal("CompPin") %> <%# EVal("CompState") %>   Telephone: <%#Eval("CompTelNo")%> Fax: <%#Eval("CompFax")%> E-mail: <%#Eval("CompEmail")%>   Key Person: <%#Eval("ContactPerson")%> Mobile No <%#Eval("MobileNo")%>   Keywords: <%#Eval("Keywords")%>   Description: <%#Eval("BriefInfo")%> SelectMethod="GetCompanyById" TypeName="MainDatasetTableAdapters.CompanyDetailTableAdapter" EnableViewState="false">