gpt4 book ai didi

vb6 - "Compile Error: Only Comments may appear after End Sub, End Function.."访问 2010 VBA

转载 作者:行者123 更新时间:2023-12-02 15:38:45 26 4
gpt4 key购买 nike

我正在创建一个表单,并且我已经在 VBA 窗口中创建了我的第一个函数。该函数创建按钮。在“结束功能”之后输入任何内容后,我收到错误消息 - “只有注释出现在 ..”之后,有什么问题吗?我是否将函数放在了错误的区域?

这是我的代码:

Option Compare Database 
Option Explicit

Function MainMenuOptions()

Dim frm As String
frm = "Main"

Dim SCFormB As Control
Dim SCSearchB As Control
Dim SCReportB As Control

Set SCFormB = CreateControl(frm, acOptionButton, , , , 0.5, 0.6, 1.5, 0.55)
Set SCSearchB = CreateControl(frm, acOptionButton, , , , 0.5, 1.5, 1.5, 0.55)
Set SCReportB = CreateControl(frm, acOptionButton, , , , 0.5, 2.4, 1.5, 0.55)


End Function

最佳答案

我最近遇到了这个问题。我正在创建一个新的股票/衍生品交易和管理应用程序,并且我在创建表单方面取得了惊人的进展,有一次,我开始为表单上控件的所有 _Click() 处理程序收到此错误.但是,对于表单上的一个字段的 _Enter() 处理程序并没有发生这种情况。在任何“结束”语句之后都没有多余的文字 - 根本没有!我发现,不知何故,不正确的 LINE ENDINGS 已经进入了“End”语句的末尾。

修复:转到每个“End”语句的末尾,点击 DELETE 直到下一个 Sub 语句到达光标(即,您现在在与前一个相同的行上开始下一个过程proc 的 End 语句),然后按 ENTER 将下一个 Sub 语句放回它自己的行。这将确保您在每个事件处理程序的末尾都有正确的 CR/LF(或该编辑器/编译器所需的任何内容)。

关于vb6 - "Compile Error: Only Comments may appear after End Sub, End Function.."访问 2010 VBA,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/12327805/

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com