QB64中BASIC报错‘Statement cannot be placed between SUB FUNCTIONS’求助

问题原因 #

QB64继承了QBASIC的代码结构规则：所有SUB（子程序）、FUNCTION（函数）的定义必须放在主程序执行代码的后面。你在主程序执行语句中间使用REM $INCLUDE: 'test2.bas'，会把test2.bas里的Hey子程序直接插入到当前位置，导致后续的调用语句、PRINT语句被夹在主程序代码和子程序定义之间，违反了语法规则，因此触发Statement cannot be placed between SUB FUNCTIONS错误。

解决方法 #

方法1：调整INCLUDE指令的位置 #

将REM $INCLUDE指令移到主程序所有执行语句的末尾，确保子程序定义在主代码之后：

' test1.bas 正确结构
PRINT "测试开始"
Hey
PRINT "测试结束"
REM $INCLUDE: 'test2.bas'

test2.bas保持原有结构即可：

' test2.bas
SUB Hey
    PRINT "Hey from test2!"
END SUB

方法2：先声明子程序，再INCLUDE #

如果需要在主程序开头INCLUDE文件，可以先在主程序开头声明子程序，再将INCLUDE放在主代码末尾：

' test1.bas
DECLARE SUB Hey ()
PRINT "测试开始"
Hey
PRINT "测试结束"
REM $INCLUDE: 'test2.bas'

方法3：规范被包含文件的结构 #

在test2.bas开头添加子程序声明，然后将子程序定义放在文件末尾，这样INCLUDE到主程序任意位置都不会出错（推荐用于多模块场景）：

' test2.bas
DECLARE SUB Hey ()
' 这里可以放其他共享常量、变量定义
SUB Hey
    PRINT "Hey from test2!"
END SUB

test1.bas中INCLUDE的位置可以灵活调整，但仍建议放在主代码末尾以保持结构清晰。

内容的提问来源于stack exchange，提问作者Sebastiaan Hoedeman