Afficher la version de VBScript

Sub Version
Dim Chaine
Chaine = "Langage : " &_
ScriptEngine & vbCrLf &_
"version : " & ScriptEngineMajorVersion & "." &_
ScriptEngineMinorVersion & "." & ScriptEngineBuildVersion
MsgBox(Chaine)
End Sub

Le même script en dehors de WinIBW :

Dim Chaine
Chaine = "Langage : " &_
ScriptEngine & vbCrLf &_
"version : " & ScriptEngineMajorVersion & "." &_
ScriptEngineMinorVersion & "." & ScriptEngineBuildVersion
MsgBox(Chaine)

Où l'on voit que WinIBW utilise le même VBScript que Windows.