Confusion de programmation QBASIC

Question

Je viens de créer un convertisseur de texte en parole en utilisant ce langage de programmation.

Le code est,

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 

Vous savez, ici, j'ai programmé un code de Visual Basic en utilisant cette langue. Ma principale confusion est que, puis-je dire que ce programme est construit en utilisant le langage de programmation QBASIC ou devrais-je appeler un programme Visual Basic?

Answer 1

C'est un programme QBasic qui démarre un VBScript.

Bien que je ne vois pas vraiment le point. C'est comme si quelqu'un avait déjà commenté, pourquoi ne pas écrire directement un vbscript? Il serait un code beaucoup plus court aussi, quelque chose comme ceci:

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

Et si vous voulez exécuter dans l'invite de commande, vous pouvez taper: cscript /nologo myscript.vbs