vba出错

欢乐马64406

Option Explicit    ' 强制显示声明变量。
Dim MyVar          '声明变量。
MyInt = 10         '未声明变量产生错误。
MyVar = 10         '声明变量不产生错误。
上面的是你们vba手册的例子，为什么出错说“编译器错误 ‘1024’
缺少语句”？

技术006

VBScript参考手册是微软提供，它不是百分百适用于金字塔的vba特性。

第一句话去掉，如果要显示声明，只能在设置中选择

欢乐马64406

技术006 发表于 2025-3-14 14:22
VBScript参考手册是微软提供，它不是百分百适用于金字塔的vba特性。

第一句话去掉，如果要显示声明，只 ...

已经设置选择好，但下面这句在excel的vba没有问题，在金字塔中就提示编译器错误 ‘1024’
缺少语句，什么原因？
#If VBA7 Then
    Private Declare PtrSafe Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
#Else
    Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
#End If

技术006

不支持。我们的vba语法，整个语法架构都是基于vbs。属于原生vba的窗体功能和vbs语法的结合体。

欢乐马64406

技术006 发表于 2025-3-14 14:38
不支持。我们的vba语法，整个语法架构都是基于vbs。属于原生vba的窗体功能和vbs语法的结合体。

就是我像下面这样写也不行吗?
Private Declare PtrSafe Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)

Sub abc()
.......

技术006

不支持，语法结构要基于vbs。建议你根据手册学习。