还问一下,是Qbasic写的一句话,我不懂。请大说一下这句话的意思。多谢!(50分)

  • 主题发起人 yaozhan168
  • 开始时间
Y

yaozhan168

Unregistered / Unconfirmed
GUEST, unregistred user!
Dim LIN$(30), ER$(20)
For x = 0 To 29: READ LIN$(x): Next
这个read的是干什么?本人不知道,想问一下。
 
http://content.edu.tw/senior/computer/ks_ks/student/program/qbasic/qb-4.htm
 
read是读取数据
 
read就是读取数据的呀
 
那从那里读呢?我这中间没有值啊,我也觉得是读,但是没有给过值啊!
/Dim LIN$(30), ER$(20)
'
' Const data
'
Const VERSION$ = "1.002"
Const PORT$ = "COM1:"
Const BAUD$ = "9600"
'
' Calibrator Id-Name 1
'
Const IDNAME = 1
'
' Initialize screen
'
Color 14, 1, 1: Cls
'
' Define error-handling routine
'
On Error GoTo ERRHANDL:
'
' Initialize Array LIN$ : Scaling/Linearizations names
' ER$ : Errors names
' RJ$ : Reference Junction types
' ITS$ : ITS types
'
For x = 0 To 29: READ LIN$(x): Next
For x = 0 To 15: READ ER$(x): Next
 
READ 是从DATA语句中读去数据并赋值的
看看DATA后面的数据
给你个简单例子:
READ a$,b$,c$
d$=a$+b$+c$
PRINT d$
DATA 123,456,hh
结果为:123456hh
 
从Data中读入 30个字符串。
Data 是在程序中定义的数据.
Data "aaaa","vvv",..........
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
顶部