Como converter texto de sua escolha em áudio usando o Bloco de Notas no Windows

Table Of Contents

• Truque simples para converter um texto completo em áudio usando o Bloco de Notas para usuários do Windows
• Como converter texto em áudio usando o Bloco de Notas
• #Atualização: Muitos de nossos leitores reclamaram sobre o erro de compilação 800A0401. Isso foi devido a problemas de espaçamento. O mesmo foi corrigido. Obrigado

Truque simples para converter um texto completo em áudio usando o Bloco de Notas para usuários do Windows

Imagine uma situação em que você tem um texto bastante longo que está entediado de ler e prefere ouvi-lo no seu PC/laptop. Uma das razões pelas quais os audiolivros são populares hoje é que, em vez de ler, você pode ouvir o que o livro diz. E você pode compilar seu próprio audiolivro com a ajuda do Bloco de Notas. Sim, você pode fazer isso facilmente com este truque realmente legal do Bloco de Notas.

Como converter texto em áudio usando o Bloco de Notas

PASSO 1: Abra o Bloco de Notas. Você pode fazer isso pesquisando por Bloco de Notas na pesquisa do Windows ou pressionando Win+R e digitando Bloco de Notas e pressionando Enter.

PASSO 2: Agora, copie o código dado no final do artigo e cole-o no Bloco de Notas.

PASSO 3: Agora salve o código que você inseriu acima. O código deve ser salvo no formato .vbs em vez do formato padrão .txt. Você pode nomear como Sound.vbs ou qualquer outro nome que desejar e salvá-lo na sua área de trabalho para que você possa acessá-lo facilmente.

PASSO 4: Agora, visite o local onde você salvou o conversor (área de trabalho neste caso) e procure seu arquivo salvo. Você verá que seu programa do Bloco de Notas foi automaticamente convertido em um Arquivo de Script Visual Basic (Arquivo VBS).

PASSO 5: Agora, clique duas vezes neste ícone e insira o texto que você deseja ouvir. Ao clicar em OK, o texto será convertido em áudio imediatamente.

Agora vá para o longo texto que você deseja ouvir no seu PC. Selecione todo o texto e copie-o usando CTRL + C. Vá para o conversor de áudio para texto que você salvou na sua área de trabalho e cole todo o texto usando CTRL-V e pressione OK.

Ouça seu PC/laptop reproduzir todo o texto sem problemas enquanto você pode continuar usando suas mãos para fazer outras tarefas.

Dim message, sapi
message=InputBox(“Comando Techworm.net para Dizer Qualquer Coisa?”,”Pronto para Ouvir”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message

Espero que você tenha gostado deste tutorial. Volte para o Techworm para mais tutoriais incríveis.

#Atualização: Muitos de nossos leitores reclamaram sobre o erro de compilação 800A0401. Isso foi devido a problemas de espaçamento. O mesmo foi corrigido. Obrigado