mirror of
https://github.com/QB64Official/qb64.git
synced 2024-08-22 05:35:08 +00:00
67 lines
No EOL
3.1 KiB
Text
67 lines
No EOL
3.1 KiB
Text
The '''READ''' statement reads values from a [[DATA]] field and assigns them to one or a comma separated list of variables.
|
||
|
||
|
||
{{PageSyntax}}
|
||
::: [[READ]] value1$[, value2!, value3%, ...]
|
||
|
||
|
||
* READ statements assign variables to [[DATA]] statement values on a one-to-one basis sequentially.
|
||
* A single READ statement may access one or more [[DATA]] values. They are accessed in the order set.
|
||
* Several READ statements may access the same [[DATA]] statement block at the following sequential position.
|
||
* [[DATA]] can be READ using [[STRING]] or numerical [[TYPE]] variables singularly or in a comma separated list:
|
||
:: [[STRING]] READ variables can read quoted or unquoted text or numerical DATA values!
|
||
:: Numerical type READ variables can only read '''unquoted''' numerical DATA values!
|
||
::'''If they do not agree, a [[ERROR Codes|"Syntax error"]] may result when run reading string data as numerical values!'''
|
||
* If the number of variables specified is fewer than the number of elements in the DATA statement(s), subsequent READ statements begin reading data at the next unread element. If there are no subsequent READ statements, the extra data is ignored.
|
||
* If variable reads exceed the number of elements in the DATA field(s), an [[ERROR Codes|"Out of data" error]] will occur!
|
||
* Use the [[RESTORE]] statement to reread DATA statements from the start, with or without a line label as required.
|
||
* [[ACCESS]] READ can be used in an [[OPEN]] statement to limit file access to read only, preserving file data.
|
||
* '''WARNING! Do not place DATA fields after [[SUB]] or [[FUNCTION]] procedures! QB64 will FAIL to compile properly!'''
|
||
: Qbasic allowed programmers to add DATA fields anywhere because the [[IDE]] separated the main code from other procedures.
|
||
|
||
|
||
''Example 1:'' Placing data into an array.
|
||
{{CodeStart}}
|
||
{{Cl|DIM}} A(10) AS {{Cl|SINGLE}}
|
||
{{Cl|FOR...NEXT|FOR}} I = 1 {{Cl|TO}} 10
|
||
{{Cl|READ}} A(I)
|
||
{{Cl|NEXT}} I
|
||
{{Cl|FOR...NEXT|FOR}} J = 1 {{Cl|TO}} 10
|
||
{{Cl|PRINT}} A(J);
|
||
{{Cl|NEXT}}
|
||
{{Cl|END}}
|
||
|
||
{{Cl|DATA}} 3.08, 5.19, 3.12, 3.98, 4.24
|
||
{{Cl|DATA}} 5.08, 5.55, 4.00, 3.16, 3.37 '' ''
|
||
{{CodeEnd}}
|
||
{{OutputStart}}
|
||
3.08 5.19 3.12 3.98 4.24 5.08 5.55 4 3.16 3.37
|
||
{{OutputEnd}}
|
||
:''Explanation:'' This program reads the values from the DATA statements into array A. After execution, the value of A(1) is 3.08, and so on. The DATA statements may be placed anywhere in the program; they may even be placed ahead of the READ statement.
|
||
|
||
|
||
''Example 2:'' Reading three pieces of data at once.
|
||
{{CodeStart}}
|
||
PRINT " CITY ", " STATE ", " ZIP"
|
||
PRINT {{Cl|STRING$}}(30, "-") 'divider
|
||
{{Cl|READ}} C$, S$, Z&
|
||
PRINT C$, S$, Z&
|
||
|
||
{{Cl|DATA}} "DENVER,", COLORADO, 80211 '' ''
|
||
{{CodeEnd}}
|
||
{{OutputStart}}
|
||
CITY STATE ZIP
|
||
------------------------------
|
||
DENVER, COLORADO 80211
|
||
{{OutputEnd}}
|
||
:''Note:'' String DATA values do not require quotes unless they contain commas, end spaces or Qbasic keywords.
|
||
|
||
|
||
|
||
''See also:''
|
||
* [[DATA]], [[RESTORE]]
|
||
* [[PRINT USING]]
|
||
* [[OPEN]] FOR [[INPUT (file mode)|INPUT]] {{text|(file statement)}}
|
||
|
||
|
||
{{PageNavigation}} |