READ

• 来源: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgRead
• 最后更新: 2016-03-13

---

读取由 Data 语句存储的值。

语法

Read variable_list

描述

读取程序中由 Data 命令存储的数据。

variable_list 中的元素必须是基本类型，包括数字型、字符串型，或数组元素和用户定义类型的元素。

程序中所有的 Data 语句构成一个单一的列表，当某条 Data 语句的最后一个元素被读取后，下一条 Data 语句的第一个元素将被继续读取。

程序不应在最后一个 Data 元素之后继续尝试 Read。其结果（在所有方言中）均未定义，程序可能崩溃（页面错误）。

Data 常量只能是简单类型（数字型或字符串型）。将字符串读入数字变量时，将通过 Val 函数进行求值。

"Restore label" 语句使 label 之后的第一个 Data 项成为下一个被读取的项，允许用户选择特定的数据段进行读取。

示例

start GeSHi

' 创建一个包含5个整数的数组和一个用于保存数据的字符串。
Dim As Integer h(4)
Dim As String hs
Dim As Integer readindex

' 设置循环5次（对应5个数字……查看数据）
For readindex = 0 To 4

  ' 读取一个整数。
  Read h(readindex)

  ' 显示它。
  Print "Number" ; readindex ; " = " ; h(readindex)

Next readindex

' 空行。
Print

' 读取一个字符串。
Read hs

' 打印它。
Print  "String = " + hs

' 等待按键。
Sleep

' 退出程序。
End

' 数据块。
Data 3, 234, 4354, 23433, 87643, "Bye!"

end GeSHi

方言差异

• Read 的语法和用法没有差异
• 有关存储数据差异的更多信息，请参见 Data 页面

与QB的差异

• Read 的语法和用法没有差异
• 有关存储数据差异的更多信息，请参见 Data 页面

参见

• Data
• Restore

返回 目录