vb.net错误：无法访问由于其保护级别

本文介绍了vb错误：无法访问由于其保护级别的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！ 问题描述

我工作的第1次用vb code，但我有一个C＃5年工作经验。从previous开发者，我被告知，code这是在服务器上运行正常，没有任何错误，但只要我一打开网页文件夹（网站没有解决方案文件），我试着建立网站和我说吨的错误：

I am working for 1st time with vb code, but I have 5 years experience with C#. From the previous developer I was told that the code which is on the server runs fine without any errors, but as soon as I opened the website folder (the website doesn't have solution file), I tried to build the site and I got tons of errors saying:

labelControl'未声明。它可能无法访问由于其  保护级别。

'labelControl' is not declared. It may be inaccessible due to its protection level.

这是怎么回事全部两个我打开到目前为止页面的控制。老实说，我很害怕，打开更多的网页:)。

That's happening for all the controls on two of the pages I opened so far. Honestly I am afraid to open more pages :).

下面是该文件中的一个标记，逻辑和设计师code部分：

Here are parts of the markup, logic and designer code for one of the files:

标记：

<%@ Page Title="" Language="vb" AutoEventWireup="false" MasterPageFile="~/Site.Master" CodeBehind="OverriedCalcValues.aspx.vb" Inherits="Homevesters.Overried_Calc_Values" %> <asp:Content ID="Content1" ContentPlaceHolderID="HeadContent" runat="server"> </asp:Content> <asp:Content ID="Content2" ContentPlaceHolderID="MainContent" runat="server"> <table cellpadding="5" border="1"> <tr> <td class="style15"><asp:label ID="lblDoorJam1" runat="server" Font-Bold="true" Text="Door Jamb"/><br />Cost per door jamb replacement</td> <td class="style38"><asp:label ID="lblFactorType1" runat="server" Text="$/Each"/></td> <td class="style41"><asp:label ID="lblDoorJam" runat="server" Text=""/></td> <td class="style32"><asp:CheckBox ID="ckDoorJam" runat="server"/></td> <td class="style35">$<asp:TextBox ID="txtDoorJam" runat="server" Text="" Width="80px" /></td> </tr> <tr> <td class="style16"><asp:label ID="lblExtDoor1" runat="server" Font-Bold="true" Text="Exterior Door"/><br />Cost per exterior door replacement</td> <td class="style39"><asp:label ID="lblFactorType2" runat="server" Text="$/Each"/></td> <td class="style42"><asp:label ID="lblExtDoor" runat="server" Text=""/></td> <td class="style33"><asp:CheckBox ID="ckExtDoor" runat="server"/></td> <td class="style36">$<asp:TextBox ID="txtExtDoor" runat="server" Text="" Width="80px" /></td> </tr> <tr> <td class="style15"><asp:label ID="lblGarageSingle1" runat="server" Font-Bold="true" Text="Garage (1 Single)"/><br />Cost to replace one single garage door</td> <td class="style38"><asp:label ID="lblFactorType3" runat="server" Text="$/Each"/></td> <td class="style41"><asp:label ID="lblGarageSingle" runat="server" Text=""/></td> <td class="style32"><asp:CheckBox ID="ckGarageSingle" runat="server"/></td> <td class="style35">$<asp:TextBox ID="txtGarageSingle" runat="server" Text="" Width="80px" /></td> </tr> <tr> <td class="style16"><asp:label ID="lblGarageDouble1" runat="server" Font-Bold="true" Text="Garage (1 Double)"/><br />Cost to replace one double garage door</td> <td class="style39"><asp:label ID="lblFactorType4" runat="server" Text="$/Each"/></td> <td class="style42"><asp:label ID="lblGarageDouble" runat="server" Text=""/></td> <td class="style33"><asp:CheckBox ID="ckGarageDouble" runat="server"/></td> <td class="style36">$<asp:TextBox ID="txtGarageDouble" runat="server" Text="" Width="80px" /></td> </tr> <tr> <td class="style15"><asp:label ID="Label1" runat="server" Font-Bold="true" Text="Interior Door"/><br />Cost per interior door replacement</td> <td class="style38"><asp:label ID="Label2" runat="server" Text="$/Each"/></td> <td class="style41"><asp:label ID="lblInteriorDoor" runat="server" Text=""/></td> <td class="style32"><asp:CheckBox ID="ckInteriorDoor" runat="server"/></td> <td class="style35">$<asp:TextBox ID="txtInteriorDoor" runat="server" Text="" Width="80px" /></td> </tr> <tr> <td class="style16"><asp:label ID="Label4" runat="server" Font-Bold="true" Text="Patio Door"/><br />Cost to replace one patio door</td> <td class="style39"><asp:label ID="Label5" runat="server" Text="$/Each"/></td> <td class="style42"><asp:label ID="lblPatioDoor" runat="server" Text=""/></td> <td class="style33"><asp:CheckBox ID="ckPatioDoor" runat="server"/></td> <td class="style36">$<asp:TextBox ID="txtPatioDoor" runat="server" Text="" Width="80px" /></td> </tr> <tr> <td class="style15"><asp:label ID="Label3" runat="server" Font-Bold="true" Text="Patio Glass"/><br />Cost per patio glass replacement</td> <td class="style38"><asp:label ID="Label6" runat="server" Text="$/Each"/></td> <td class="style41"><asp:label ID="lblPatioGlass" runat="server" Text=""/></td> <td class="style32"><asp:CheckBox ID="ckPatioGlass" runat="server"/></td> <td class="style35">$<asp:TextBox ID="txtPatioGlass" runat="server" Text="" Width="80px" /></td> </tr> <tr> <td class="style16"><asp:label ID="Label7" runat="server" Font-Bold="true" Text="Dishwasher"/><br />Cost to replace one dishwasher</td> <td class="style39"><asp:label ID="Label8" runat="server" Text="$/Each"/></td> <td class="style42"><asp:label ID="lblDishWasher" runat="server" Text=""/></td> <td class="style33"><asp:CheckBox ID="ckDishwasher" runat="server"/></td> <td class="style36">$<asp:TextBox ID="txtDishwasher" runat="server" Text="" Width="80px" /></td> </tr> </table> </asp:Content>

逻辑：

Imports Homevesters Public Class Overried_Calc_Values Inherits System.Web.UI.Page Dim clsValueOrganization As New clsCalcValues Dim clsValueDefaults As New clsCalcValues Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If IsUserLoggedIn(Me) = False Then Response.Redirect("~/Account/Login.aspx") Exit Sub End If If IsPostBack = False Then clsValueOrganization.Load("", False, Session("OrgID")) clsValueDefaults.Load("", False, "DEFAULT") ' c is dollar format with dollar symbol lblDoorJam.Text = clsValueDefaults.dDoorJamb.ToString("c") lblExtDoor.Text = clsValueDefaults.dExtDoor.ToString("c") lblGarageSingle.Text = clsValueDefaults.dGarageDoorSgl.ToString("c") lblGarageDouble.Text = clsValueDefaults.dGarageDoorDbl.ToString("c") lblInteriorDoor.Text = clsValueDefaults.dIntDoor.ToString("c") lblPatioDoor.Text = clsValueDefaults.dPatioDoor.ToString("c") lblPatioGlass.Text = clsValueDefaults.dPatioGlass.ToString("c") lblDishWasher.Text = clsValueDefaults.dDishwasher.ToString("c") lblFans.Text = clsValueDefaults.dFans.ToString("c") lblLightFixtures.Text = clsValueDefaults.dLightFixture.ToString("c") lblServicePanel.Text = clsValueDefaults.dServicePanel.ToString("c") lblRange.Text = clsValueDefaults.dRange.ToString("c") lblRefrigerator.Text = clsValueDefaults.dRefrigerator.ToString("c") lblStoveTop.Text = clsValueDefaults.dStoveTop.ToString("c") lblVentHood.Text = clsValueDefaults.dVentHoods.ToString("c") lblElectricalWiring.Text = clsValueDefaults.dWiringReplace.ToString("c") lblFloorCovering.Text = clsValueDefaults.dFloorCover.ToString("c") lblTileFloor.Text = clsValueDefaults.dTileFloor.ToString("c") lblOldHouse4150.Text = clsValueDefaults.dOldHouse1.ToString("c") lblOldHouse2140.Text = clsValueDefaults.dOldHouse2.ToString("c") lblOldHouse0020.Text = clsValueDefaults.dOldHouse3.ToString("c") lblOldHouse1900.Text = clsValueDefaults.dOldHouse4.ToString("c") ckMedWood.Checked = Not (clsValueOrganization.dMdWoodWindow = clsValueDefaults.dMdWoodWindow) ckSmallMet.Checked = Not (clsValueOrganization.dSmMetalWindow = clsValueDefaults.dSmMetalWindow) ckSmallPane.Checked = Not (clsValueOrganization.dSmGlassPanes = clsValueDefaults.dSmGlassPanes) ckSmallWood.Checked = Not (clsValueOrganization.dSmWoodWindow = clsValueDefaults.dSmWoodWindow) End If End Sub End Class

设计师：

'------------------------------------------------------------------------------ ' <auto-generated> ' This code was generated by a tool. ' ' Changes to this file may cause incorrect behavior and will be lost if ' the code is regenerated. ' </auto-generated> '------------------------------------------------------------------------------ Option Strict On Option Explicit On Partial Public Class Override_Calc_Values '''<summary> '''lblDoorJam1 control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents lblDoorJam1 As Global.System.Web.UI.WebControls.Label '''<summary> '''lblFactorType1 control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents lblFactorType1 As Global.System.Web.UI.WebControls.Label '''<summary> '''lblDoorJam control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents lblDoorJam As Global.System.Web.UI.WebControls.Label '''<summary> '''ckDoorJam control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents ckDoorJam As Global.System.Web.UI.WebControls.CheckBox '''<summary> '''txtDoorJam control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents txtDoorJam As Global.System.Web.UI.WebControls.TextBox '''<summary> '''lblExtDoor1 control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents lblExtDoor1 As Global.System.Web.UI.WebControls.Label '''<summary> '''lblFactorType2 control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents lblFactorType2 As Global.System.Web.UI.WebControls.Label '''<summary> '''lblExtDoor control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents lblExtDoor As Global.System.Web.UI.WebControls.Label '''<summary> '''ckExtDoor control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents ckExtDoor As Global.System.Web.UI.WebControls.CheckBox '''<summary> '''txtExtDoor control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents txtExtDoor As Global.System.Web.UI.WebControls.TextBox '''<summary> '''lblGarageSingle1 control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents lblGarageSingle1 As Global.System.Web.UI.WebControls.Label '''<summary> '''lblFactorType3 control. '''</summary> '''<remarks> '''Auto-generated field. '''To modify move field declaration from designer file to code-behind file. '''</remarks> Protected WithEvents lblFactorType3 As Global.System.Web.UI.WebControls.Label End Class

下面是一些我收到的错误：

Here are some of the errors I am getting:

请让我知道你的想法可能是原因。我期待着听到您的到来。谢谢，Laziale

Please let me know what you think can be the reason. I look forward to hear from you soon. Thanks, Laziale

推荐答案

如果您code是逐字复制，然后在逻辑块类名称拼写错误和不匹配，在设计文件中的名称。此它会导致PTED作为两个独立的类间$ P $，这会导致错误。在一个文件中的code不是能引用在其它文件中定义的对象。 在逻辑块修复类的名称相匹配的设计师块和错误应该消失。 修改：我注意到它在标记​​文件的第一行拼错为好。一定要修复类的名称也有。

If your code is copied verbatim, then the class name in the Logic block is misspelled and doesn't match the name in the designer file. This causes it to interpreted as two separate classes, which causes the errors. The code in the one file is not able to reference objects defined in the other file. Fix the class name in the logic block to match the designer block and the errors should go away. Edit: I noticed it was misspelled in the first line of the markup file as well. Be sure to fix the class name there too.