谁有关于BASIC发展史的资料？我想了解一下？

[cy_nwau]

谁有关于BASIC发展史的资料？我想了解一下？

[KiteGirl]

提起这些真是令人感慨啊！以下是本人的一点心得，但不是全部历史。以下所举程序例子其实是同一个功能的程序：

行号时代：

1、使用Goto转移实现条件循环。
2、使用Gosub……Return实现子程序。

程序例子：[MS BASIC]

10 Xm=INT(RND*100)
30 IF X<Xm Then X=X+1
40 IF X>Xm Then X=X-1
44 IF INKEY$=CHR$(27) Then END
45 LOCATE 1,1
46 PRINT X
50 IF Not X=Xm Then Goto 30
60 Goto 10

典型语：MS BASIC、GW BASIC、Apple BASIC

结构化时代：针对行号BASIC的杂乱无章的程序恶习进行改进。

1、使用Do……Loop实现条件循环（早期是While……End While，后期被淘汰了。）
2、使用Sub……End Sub、Function …… End Fucntion。编写函数和子程序。

典型语言：QuickBASIC Edit[For DOS]、QuickBASIC 4.5、MS BASIC 7.0

程序例子：[QuickBASIC/MS BASIC 7.0]

Xm=INT(RND*100)
Do
Do
If X<Xm Then
X=X+1
ElseIf X>Xm Then
X=X-1
End If
Locate 1,1:Print X
Loop Until X=Xm Or Inkey$=Chr$(27)
Xm=INT(RND*100)
Loop Until Inkey$=Chr$(27)

VB时代

1、面向对象和控件的编程。
2、更完善的数据类型。
3、更完善的Sub……End Sub、Function …… End Fucntion。
4、For Each …… Next语句

程序例子：[VBScript和VB 6.0]

VBScript代码：

Dim X
Dim Xm
Dim LoopCode

Sub document_onload()
Xm=NewX
LoopCode=setTimeout("TimerLoop()",1)
End Sub

Function NewX()
NewX=Int(Rnd*100)
End Function

Sub TimerLoop()
If X<Xm Then
X=X+1
ElseIf X>Xm Then
X=X-1
Else
Xm=NewX
End If
idViewText.innerText=X
LoopCode=setTimeout("TimeLoop()",1)
End Sub


VB6.0代码

Public X As Single
Public Xm As Single

Private Sub Form_Load()
Xm=NewX
End Sub

Function NewX() As Single
NewX=Int(Rnd*100)
End Function

Private Sub Timer1_Timer()
If X<Xm Then
X=X+1
ElseIf X>Xm Then
X=X-1
Else
Xm=NewX
End If
Text1.Text=X
End Sub

典型语言：Visual Basic 6.0、VBScript、VBA

以下是小仙妹的个人经历：
1、1989年小仙妹第一次用的是Apple IIe上的BASIC。[行号BASIC]
2、1992年在PC上用的是MS BASIC[行号BASIC]
3、1994年在PC上DOS下使用Quick BASIC，第一次可以编译成EXE文件。[结构化BASIC]
4、1999年使用VBScript
5、2000年转用Visual BASIC 6.0

[cy_nwau]

谢谢，我一定给你分。

[zyl910]

To KiteGirl(小仙妹)：你的QB学得不错吗？我有问题要请教你：
以下三个版本的QB，它们对字符串的处理是怎样的（顺序 还是 链表）？
QBASIC 1.1
Quick BASIC 4.5
Quick BASIC 7.1

这里为什么没有QB区，我有一些QB高难度问题！

[cy_nwau]

我对QB有一定了解，楼上的有问题你可以问。

[vcbug]

To KiteGirl(小仙妹)：
你多大了啊，89年就开始搞b了？

[lihonggen0]

To KiteGirl(小仙妹)：
你多大了啊,你的QB学得不错吗？

[KiteGirl]

zyl910(910：分儿，我来了！)：
我实在对这个问题没啥研究，但是我猜测是这样的：如果语言中提供灵活的插入字符串的功能，那大概是链表。我个人一直认为QB是顺序的。

[KiteGirl]

回vcbug(今夜最后一次陪你而醉)、lihonggen0(用VB)：

我今年20岁了，我用Apple IIe的时候是9岁的小孩。如果从第一次用PRINT语句开始，那我用BASIC应该有十年了。不过时间长未必就懂得的更多。

[田九]

问　比　尔　吧

[zyl910]

前几天在研究 QB内嵌汇编 时发现：
QBASIC 1.1 顺序
Quick BASIC 4.5 顺序
Quick BASIC 7.1 链表

所以许多 QB内嵌汇编 的程序 不能在 QB7.1 中运行！

[aladings]

等我明天答复你！！！

[vcbug]

to KiteGirl(小仙妹):
你的回答真是令我惭愧啊，我都到可以做你大叔的年纪拉(快30),研究B的历史还不如你长，看来你真是年轻有为啊，还是个姑娘，更是令我等敬佩啊。