Skip to content

SYSTEM


关闭所有打开的文件并结束程序

语法

declare sub System ( byval retval as long = 0 )

用法

System( [ retval ] )

参数

retval

返回给系统的错误代码。

说明

关闭所有打开的文件,退出程序,并返回到操作系统。可以指定一个可选的整数返回值,用于向系统返回错误代码。如果未给出返回值,则自动返回 0。这与 End (Statement) 相同,此处保留是为了与旧版 BASIC 方言的兼容性。建议使用 End (statement) 代替。

使用此语句不会干净地关闭作用域。局部变量的析构函数不会被自动调用,因为 FreeBASIC 不进行栈展开。在这种情况下,只有全局变量的析构函数会被调用。

因此,不建议仅仅用 System 来标记程序结束;当模块级代码的最后一行执行完毕后,程序会自动结束,且方式更为干净。

示例

start GeSHi

vb
Print "this text is shown"
System
Print "this text will never be shown"

end GeSHi

与QB的区别

参见

  • End (statement)

返回 目录

基于 FreeBASIC 官方文档翻译 如有侵权请联系我们删除
FreeBASIC 是开源项目,与微软公司无隶属关系