无法在模块的类中声明具有公共访问权限的变量

2023-12-07

我正在制作一个基于 GUI 的应用程序(表单),并遇到以下错误。

首先,我在模块中声明以下内容

Module test_mod

    Public Structure sub_struct
        Public test_int() As Integer
        Public Sub foo()
            ReDim test_int(3)
        End Sub
    End Structure

    Public Structure main_struct
        Public test_aaa As sub_struct
    End Structure

End Module

当然,我的真实代码比这更长、更复杂,但这段代码将是一个完美的例子。

然后我声明这一点test_mod在主课中

Public Class Form1
    Public test_this_struct As New test_mod.main_struct
    'do something here
End class

我的目的是使test_this_struct可以被其他模块访问(这里没有显示),这样主类就会变得简短而整洁。然而,它不断抱怨以下几点:test_this_struct无法公开类型test_mod.main_struct通过课堂在项目之外form1.

我没有看到任何Private在这里,我厌倦了删除new, redim,和“struct in struct”,但它们不起作用。

我找到了一个article以及MSDN上的相关内容,但并没有真正帮助我。


默认情况下模块和类是Friend(仅对您的程序集可见)。

但是,您的表格明确表示Public,将其及其成员暴露给世界 - 延伸test_mod.main_struct的可见度。

将您的模块声明为Public too.

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

无法在模块的类中声明具有公共访问权限的变量 的相关文章

  • 在 Visual Basic 中将窗体放置在屏幕右下角

    当表单加载时 如何将表单定位在屏幕的右下角 我正在使用 Visual Basic 2010 Express Thanks 编辑 我这样做了 看起来效果很好 Dim x As Integer Dim y As Integer x Screen
  • 如何打开 Windows 资源管理器窗口并选择特定文件夹

    我有一个 winform 应用程序 这个 winform 应用程序创建了几个文件 我想在我的应用程序中实现 查找目标 功能来显示这些文件 这些文件位于同一文件夹中 看图片 假设我创建了几个文件 C Test 文件夹 该文件夹包含以下文件 C
  • 插入具有只读主键列的表

    我正在使用一个使用 sql server 数据库的应用程序 我试图在表中插入一行 如下所示 该表有一个主键 prodNum 这是自动生成的密钥 当我尝试向表中插入一行时 如下所示 在行中intResult oSglProdTableAdap
  • 变量替换为字符串

    我可以做类似的事情吗 s said s blah name blah 在 VB NET 中 写字越来越痛苦name said blah blah 在VB NET 14 对于VS2015 中 您可以使用字符串插值 https msdn mic
  • 有没有更简单的方法来处理复选框?

    在 vb net 中 我有一个包含一组四个复选框的表单 每个复选框都表示 选中时 用户想要向其订单添加特殊指令 代码如下所示 If SpecialInstruction1CheckBox Checked Then AddSpecialIns
  • VB无法访问不同项目中的类,相同的解决方案

    我正在使用 VB for Visual Studio 工作 并且项目中有一个类需要将变量声明为另一个项目中的类 对于可视化 解决方案 A 包含 Project1 和 Project2 在 Project1 的类中 我需要声明一个变量作为 P
  • 简单的if检查多个值vb

    在Sql中我们可以像这样过滤 SELECT FROM 表名 WHERE 列名 IN firstValue secondValue 如何在VB Net中检查 有简单的方法吗 或者 只是 If variable firstValue Or va
  • x86 LargeAddressAware 兼容性的单元测试

    对于 win32 可执行文件 x86 我们可以设置 LargeAddressAware 标志 以便它在 x64 Windows 上运行时可以访问 4 GB 而不是仅 2 GB 的虚拟地址空间 这看起来很吸引人 然而 这也存在风险 例如参见
  • 使用 DirectCast、CType、TryCast 转换数据类型

    自从我在 2005 年从 VB6 迁移到 VB NET 以来 我一直在使用 CType 将一种数据类型转换为另一种数据类型 我这样做是因为它打字速度更快 以前存在于 VB6 中 而且我不知道为什么我必须使用 DirectCast 如果它们之
  • 如何在 Visual Studio 2013 中使用 Git 的外部 diff 工具?

    我找到了这个帖子 http architects dzone com articles how configure diff and merge这解释了如何让 Visual Studio 2013 在比较 Git 中的文件时使用内置 dif
  • 在 vb.net 中添加记录并使用 elseif 检查记录是否存在

    我是 vb net 的新手 提前抱歉 谁能帮我看看我的 elseif 代码行有什么问题吗 Dim con As SqlConnection New SqlConnection Data Source PC11 PC kim Initial
  • VB.NET - 有没有办法在委托中使用可选参数? (或者计划允许这样做?)

    据我了解 在 VS2008 附带的 VB 版本中 委托中不可能有可选参数 但是 我想知道将来是否有任何解决方法或计划将此功能合并到 VB NET 中 我想做的事 Public Delegate Function Deserializer O
  • 如何在 Windows 窗体中制作窗体模式?

    我正在尝试创建一个子表单 帮助用户在父表单中的字段中输入数据 我希望这个子表单是模态的 但是我需要做什么才能使这个表单成为模态 我需要使用其他类型的物品吗 Use Form ShowDialog http msdn microsoft co
  • Visual Studio 2013 的 TypeScript 1.3 缺少 SDK 目录 (tsc.exe)

    Typescript v1 3 是今天宣布 http blogs msdn com b typescript archive 2014 11 12 announcing typescript 1 3 aspx 所以我安装了VS2013 的电
  • Visual Studio 2013 Intellisense 不会将枚举类型放在方法参数的位置

    例如 我有以下代码 namespace VS2013 EnumTypes class Program enum SomeEnum One Two static void SomeMethod SomeEnum someEnum some c
  • 根据值从绿色到红色[关闭]

    Closed 这个问题需要多问focused help closed questions 目前不接受答案 我需要一个在 vb net 中返回从红色 值 0 到绿色 值 100 的颜色的函数 另外 我需要一种方法来确定字体的颜色应该是白色还是
  • 如何在 vb.Net 中设置默认表单?

    如何将第四个表单设置为在 Visual Studio 2008 中按 f5 时将运行的默认表单 因为表单 1 始终是第一个启动的 在解决方案资源管理器中右键单击您的项目 选择属性 选择应用程序选项卡 从 启动表单 下的下拉列表中选择您的表单
  • WPF DataGrid 显示点而不是逗号

    在网上查找并寻找答案后没有结果 我想向您寻求帮助 我有一个包含 2 列的 SQL 数据库表 浮点数据类型 例如 1 2 1 3 1 4 等 绑定到一个DataGrid XAML 代码
  • 您是否必须在 VB.NET 中显式创建表单实例? [复制]

    这个问题在这里已经有答案了 如果一个项目包含Form类 形式可以通过以下方式显示 Form1 Show 或者是否需要首先创建表单的实例 Dim frm As New Form1 frm Show 正如所建议的 使用表单名称使用默认实例 而第
  • windows XP中如何设置默认编码?

    我尝试使用 StreamReader 打开文件并设置编码 但我希望它采用默认 Windows 编码 我如何更改我的 Windows 编码 区域和语言选项控制面板项目 高级选项卡 影响整个计算机

随机推荐

  • 为什么这个 JavaScript 调用不会破坏“同源策略”

    我正在使用 jQuery 显示外部 JavaScript 文件 同源策略 没有被破坏的原因是因为它不是 AJAX 请求吗 http jsfiddle net m7q3H 52 小提琴代码 HTML 这里绝对没问题哦 您可以从任何您想要的地方
  • 如何在 Eclipse 编辑器中将 IFile 处理程序获取到活动文件

    我正在准备一个 Eclipse 插件 它检查测试套件中的代码质量 编译器错误 警告 语法检查由默认编译器完成 如果测试代码中出现问题 我们想通知测试套件的开发人员 例如 GOTO 跳转到标签上 这可能会导致无限循环 测试套件非常旧 它们不是
  • 如何使用 QuickCheck 为 StateT 编写测试

    StateT 处于Control Monad Trans State Lazy 里面的函数和m变得更善良使得事情变得困难 LANGUAGE FlexibleContexts import Test QuickCheck newtype St
  • 取消 applicationWillTerminate 中的所有本地通知?

    当我的应用程序终止时 通过操作系统或双击主页按钮并终止应用程序 我想 cancelAllLocalNotifications 并将 setApplicationIconBadgeNumber 设置为 0 我只是将这两个调用添加到我的主要应用
  • Pandas `to_sql` 通过 `if_exists = 'append'` 给出了 `表已存在` 错误

    我正在尝试使用 Pandas v1 3 4 SQLAlchemy v1 4 26 和 PyMySQL v1 0 2 写入 MySQL 数据库 我可以使用 pandas 创建一个新表 称为 test table to sql方法 但随后尝试写
  • 在 PHP 准备好的语句中插入日期

    我正在尝试将准备好的语句中的当前日期 以 d m Y 为单位 插入 mysql 表中 我无法正确获取代码 我在 php 中调用当前日期 dat date d m Y 然后包括在这样的准备好的声明中 stmt mysqli gt prepar
  • Tkinter 初始屏幕和主循环之外的多处理

    我已经实现了一个启动屏幕 当我的应用程序在启动时从远程云存储加载数据库时会显示该启动屏幕 启动屏幕通过调用 update 保持活动状态 上面有一个进度条 并在单独的加载过程结束后被销毁 之后 主循环启动 应用程序正常运行 下面的代码在我的
  • 如何从本地结帐恢复 svn 服务器

    我们的 svn 服务器意外丢失了所有数据 并且我们的 svn 存储库文件也丢失了 目前我们只有 svn 存储库的本地签出 有什么方法可以恢复 svn 存储库吗 整个 svn 历史记录都在服务器中 因此您无法从结账中恢复它 您唯一能做的就是创
  • ASP.NET 文本框 LostFocus 事件

    我需要在文本框失去焦点时触发服务器端的代码 我知道有 onblur 客户端事件 并且没有 LostFocus 事件 那么当我的 TextBox 失去焦点时如何导致回发发生 Update 我找到了一个blog这似乎为此提供了一个相当不错的解决
  • Python:分析输入以查看其是否为整数、浮点数或字符串

    我已经为此工作了一两天 以便判断输入是整数 浮点数还是字符串 简而言之 该程序旨在将每个输入转换为字符串 循环遍历每个字符串并检查列表数字 如果字符串包含所有数字 则它是整数 如果它包含 它是一个浮点数 如果没有 它就不是一个数字 明显的缺
  • Sqlite3、SQLSTATE[HY000]:一般错误:5 数据库已锁定

    我有这个小测试脚本 session start session write close error reporting 1 register shutdown function function echo shutdown MAX 120
  • Iphone钥匙串访问下导出/导入证书、私钥的问题

    我想将证书和私钥从一台计算机导出到另一台计算机 以便可以重复使用配置文件 钥匙串访问中的证书下有一个私钥 1 我将证书导出为 certifcate cer 文件 然后从另一台计算机导入该文件 然而 它的任务是私钥 新机器上的 xcode 抱
  • Godaddy - Codeigniter - 服务器上未指定输入文件

    我刚刚将我的演示项目上传到 godaddy 的子文件夹中 当我打开网站网址时example com demo主页工作正常 但当我尝试打开内页时 我的网址看起来像example com demo index php home overview
  • tinyMCE - 获取光标位置处的内容

    我正在为tinyMCE制作一个小单词预测插件 需要提取一些文本 然后从预测单词列表中插入文本 插入应该没有问题 因为我知道光标在哪里并且可以使用mceInsertContent命令 然而 获取预测文本 我需要提取以光标位置之前的字母结尾并从
  • 重写 Angularjs 应用程序以消除延迟的 Bootstrapper

    我正在尝试对应用程序进行逆向工程 并以摆脱 deferredBootstrapper 的方式重新编写它 我遇到了模块加载问题等 我是否在标准意义上正确调用了多个模块 当前的任务是在没有引导程序的情况下简化应用程序 这是最初的 deferre
  • 逐行读取流

    Delphi中有没有办法逐行读取流 有没有办法设置流的编码 我知道 TEncoding getEncodingPage 1250 如何从流中获取它 我想你正在寻找TStreamReader 您在构造函数中设置编码 然后调用ReadLine
  • Facebook Graph API 和 FQL 之类的照片计数都不正确?

    Hey all 我为竞赛制作了一个 Facebook 应用程序 允许用户上传他们的照片 上传后 照片将发布到其个人资料上的专用相册中 一旦照片出现 用户应该收集尽可能多的喜欢 目前 我已尝试使用 Facebook Graph API 和 F
  • .Net 中的图形错误图像插值

    我有一个简单的测试 当它解决时 我的问题也解决了 当处理小图像时 图形插值的效果很差 请检查您是否知道如何解决以下代码中的结果图像忽略要绘制的图像的后半部分的问题 使用 JPG 中的 loadimage 或任何你想要的东西在图像上绘制一些东
  • 如何从html页面中提取文本?

    例如网页是链接 https www architecture com FindAnArchitect FAAPractices aspx display 50 我必须知道公司名称及其地址和网站 我尝试了以下方法将 html 转换为文本 im
  • 无法在模块的类中声明具有公共访问权限的变量

    我正在制作一个基于 GUI 的应用程序 表单 并遇到以下错误 首先 我在模块中声明以下内容 Module test mod Public Structure sub struct Public test int As Integer Pub