Vamos Precisar do Visual Studio. Recomendo 2012

Crie um form, depois de feito isso, iremos precisar de 1 button , 1 textbox, 1 timer.

print de como deve ficar +-

De 2 cliques no botão e adicione:

Timer1.Start()

Depois va para o design novamente e de 2 cliques no timer e adicione:

Dim SAPI
        SAPI = CreateObject("sapi.spvoice")
        SAPI.speak(TextBox1.Text)
        Timer1.Stop()

Créditos

Criador: Desconhecido

Contéudo Postado ao Fórum: Eu ;P

lol, interessante :>

Oo, não entendi muito bem o que é mais parece legal kkk, deixa eu ver se entendi. ele pega um texto em português e traduz?

fico bem legal, Obrigado por trazer esse conteúdo ao Xtibia.

Oo, não entendi muito bem o que é mais parece legal kkk, deixa eu ver se entendi. ele pega um texto em português e traduz?

 

fico bem legal, Obrigado por trazer esse conteúdo ao Xtibia.

Ele diz a palavra ingles que esta ali

'-'

O que é a variável do tipo dim? E de que forma a função CreateObject cria este objeto? Como é instanciado?

Create Object: Cria e retorna uma referência a um objeto COM. CreateObject não pode ser usado para criar instâncias de classes no Visual Basic, a menos que essas classes são expostas explicitamente sistema autônomo componentes COM.

Váriavel Dim: O compilador do Visual Basic usa a declaração de Dim para determinar informações de variável e o tipo de dados, como o código que pode acessar a variável.

Espero que tenha entendido algo ._.

Certo, pelo que eu entendi dim é o mesmo que $ no php por exemplo. Utilizado para declarar uma variável!

Quanto ao CreateObject parece um pouco confuso, no meu ponto de vista, ele cria um objeto de uma classe, ou seja, instancia um objeto.

Mas ao mesmo tempo ele diz que não pode ser usado para criar instância de classes?

Seria utilizado o CreateObject apenas para instanciar classes nativas do VisualBasic?

Com um Exemplo talvez te ajude.

O exemplo a seguir utiliza o CreateObject função para criar uma planilha do Microsoft Excel e salva a planilha para um arquivo. Para usar esse exemplo, Excel deve estar instalado no computador onde este programa é executado. Além disso, você deve adicionar uma referência à biblioteca de tipos do COM Guia de do Adicionar referência caixa de diálogo sobre o Projeto menu. O nome da biblioteca de tipos varia dependendo da versão do Excel instalada em seu computador. Por exemplo, a biblioteca de tipos para o Microsoft Excel 2002 é denominada Biblioteca de objetos do Microsoft Excel 10.0.

Sub TestExcel()
    Dim xlApp As Microsoft.Office.Interop.Excel.Application
    Dim xlBook As Microsoft.Office.Interop.Excel.Workbook
    Dim xlSheet As Microsoft.Office.Interop.Excel.Worksheet

    xlApp = CType(CreateObject("Excel.Application"), _
                Microsoft.Office.Interop.Excel.Application)
    xlBook = CType(xlApp.Workbooks.Add, _
                Microsoft.Office.Interop.Excel.Workbook)
    xlSheet = CType(xlBook.Worksheets(1), _
                Microsoft.Office.Interop.Excel.Worksheet)

    ' The following statement puts text in the second row of the sheet.
    xlSheet.Cells(2, 2) = "This is column B row 2"
    ' The following statement shows the sheet.
    xlSheet.Application.Visible = True
    ' The following statement saves the sheet to the C:\Test.xls directory.
    xlSheet.SaveAs("C:\Test.xls")
    ' Optionally, you can call xlApp.Quit to close the workbook.
End Sub