QBASIC程序设计混乱

Question

我刚刚用这种编程语言创建了一个文本到语音转换器。

密码是，

DO
    CLS
    PRINT "This is the program built by Adhikari Newtorks Team Using QBASIC..........."
    PRINT "This is a text to speech converter.."
    PRINT
    PRINT
    INPUT "Enter the word to pronounce: ", speak$
    OPEN "sound.vbs" FOR OUTPUT AS #1
    PRINT #1, "dim speechobject"
    PRINT #1, "set speechobject=createobject ("; CHR$(34); "sapi.spvoice"; CHR$(34); ")"
    PRINT #1, "speechobject.speak"; CHR$(34); speak$; CHR$(34)
    CLOSE #1
    SHELL "sound.vbs"
    KILL "sound.vbs"
LOOP

你知道，我用这种语言编写了一个可视化的基本代码。我的主要困惑是，我是否可以说这个程序是用QBASIC编程语言构建的，还是应该称之为Visual程序？

Answer 1

这是一个启动QBasic程序的VBScript程序。

虽然我不太明白重点。就像有人已经评论过了，为什么不直接写一个vbscript呢？它的代码也要短得多，如下所示：

Do 
   str = InputBox("Enter the word to pronounce","Enter text")
   Dim speechobject
   Set speechobject = createobject("sapi.spvoice")
   speechobject.speak str
Loop Until (str = "")

如果您想在命令提示符中运行它，可以键入：cscript /nologo myscript.vbs