网站资讯 news
您现在的位置:首页 > 网站资讯 > BASIC语言的种类
NEWS

新闻资讯

  • 黎曼猜想到底在表达什么?
    2018/09/30

    众所周知黎曼几何为爱因斯坦的相对论做出了完美的数学解释,那么这个黎曼猜想到底说了些什么呢? 证明过程肯定很复杂的,我们...

  • BASIC语言的种类
    2018/09/12

    BASIC语言的种类 以下是同样的运行结果,但用不同时期的BASIC的方式所写的示例。 行号类型(非结构化) 这是第一代的BASIC,...

  • 拒绝沦为DDOS攻击的肉鸡,请关闭WordPress的XML-RPC端口
    2018/08/09

    XML-RPC 是 WordPress 用于第三方客户端(如 WordPress iPhone 和安卓客户端,Windows Live Writer 等)的 API 接口,还可以...

  • 我不是药神还没走,疫苗造假又来了
    2018/07/26

    昆山网站建设小编来给大家说说这个夏天被刷屏的两件事情。这两件毫无干系的热点事件竟全都落在了医疗领域上,细想之下,偶然...

  • 区块链的未来是什么?
    2018/07/17

        何为区块链?《中国区块链技术和应用发展白皮书2016》这样解释区块链:广义来讲,区块链技术是利用块链式数据...

  • 程序员面试题,都答错?恭喜你被录取了
    2018/07/09

    做产品久了,喜欢吐槽App功能设计反人类,体验差;做设计久了,强迫症严重;万年码字的程序员们,天天被公司的各方面军锤需求...

  • SEO超级外链工具有用吗?
    2018/07/05

      答案是没有太大作用,而且昆山网站建设小编建议大家不要尝试这种外链建设的方法,主要原因如下: 1、百度明确表示:软...

BASIC语言的种类

发布时间:2018/09/12 网站资讯 浏览次数:401

BASIC语言的种类

以下是同样的运行结果,但用不同时期的BASIC的方式所写的示例。

行号类型(非结构化)

这是第一代的BASIC,例如早期BASICAGW-BASIC……等,BASIC解释器。这类的BASIC程序的特征,就是每一行的代码前面都有一个数字作为“行号”。由于这种类型的BASIC程序的写法,很容易滥用GOTO的跳跃指令,以及代码没有办法使用到缩进去区分区段,因此很容易导致面条式代码。

10 INPUT “What is your name: “, U$

20 PRINT “Hello “; U$

30 INPUT “How many stars do you want: “, N

40 S$ = “”

50 FOR I = 1 TO N

60 S$ = S$ + “*”

70 NEXT I

80 PRINT S$

90 INPUT “Do you want more stars? “, A$

100 IF LEN(A$) = 0 THEN GOTO 90

110 A$ = LEFT$(A$, 1)

120 IF A$ = “Y” OR A$ = “y” THEN GOTO 30

130 PRINT “Goodbye “; U$

140 END

无行号类型(结构化)

这是第二代的BASIC,例如QuickBASICPowerBASIC。这时期,同时有功能相近的解释器与编译器的版本出现。这类的BASIC程序的特征,是不使用行号,改使用标签作为跳跃点(仍有GOTO指令,但已可使用其他写法可完全避开使用GOTO),与使用函数或副程序的方式,以及可使用缩进,将程序结构化。[1]

INPUT “What is your name: “, UserName$

PRINT “Hello “; UserName$

DO

  INPUT “How many stars do you want: “, NumStars

  Stars$ = STRING$(NumStars, “*”)

  PRINT Stars$

  DO

    INPUT “Do you want more stars? “, Answer$

  LOOP UNTIL Answer$ <> “”

  Answer$ = LEFT$(Answer$, 1)

LOOP WHILE UCASE$(Answer$) = “Y”

PRINT “Goodbye “; UserName$

面向对象化

这是第三代的BASIC,例如Visual BasicREALbasicStarOffice Basic。这类的BASIC程序的特征,是导入类(Class)的应用,使用面向对象的继承与代码封装的写法。通常也使用“事件驱动”的写法,虽然下面这个Visual Basic .NET的示例并不是用到“事件驱动”。

 

Public Class StarsProgram

    Public Shared Sub Main()

        Dim UserName, Answer, stars As String, NumStars As Integer

        Console.Write(“What is your name: “)

        UserName = Console.ReadLine()

        Console.WriteLine(“Hello {0}”, UserName)

        Do

            Console.Write(“How many stars do you want: “)

            NumStars = CInt(Console.ReadLine())

            stars = New String(“*”, NumStars)

            Console.WriteLine(stars)

            Do

                Console.Write(“Do you want more stars? “)

                Answer = Console.ReadLine()

            Loop Until Answer <> “”

            Answer = Answer.Substring(0, 1)

        Loop While Answer.ToUpper() = “Y”

        Console.WriteLine(“Goodbye {0}”, UserName)

    End Sub

End Class

云风网络是集昆山网站制作,昆山网页设计,昆山网站推广于一体的昆山网络公司,业务涵盖:昆山手机网站制作,昆山网站设计,昆山网络建设,昆山做网站,昆山网站建设,电话:13912673321

点击这里给我发消息 技术咨询
回到顶部