PDF download Загрузить PDF PDF download Загрузить PDF

Создайте свою собственную программу преобразования речи, чтобы ваш компьютер говорил все, что вы печатаете.

    • Dim message, sapi
      message=InputBox("What do you want me to say?","Speak to Me")
      Set sapi=CreateObject("sapi.spvoice")
      sapi.Speak message
  1. Запустите файл, в текстовом поле напечатайте все, что угодно, а затем нажмите кнопку ОК.
  2. Реклама

Советы

  • vbs расшифровывается как Visual Basic Scripting (основной визуальный скрипт).
  • Текст в двойных кавычках в коде (скрипте) можно редактировать в соответствии с выбором пользователя.
Реклама

Предупреждения

  • Не меняйте код, или это может привести к выполнению любой другой операции. Только пользователь несет ответственность за свою работу.
  • Обязательно сохраняйте файл с расширением .vbs .
  • Это предназначено только для образовательных целей.
Реклама

Об этой статье

Эту страницу просматривали 8020 раз.

Была ли эта статья полезной?

Реклама