Ir para conteúdo

Posts Recomendados

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 +-

21ngu9y.png

 

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

Editado por homersapiens
Link para o comentário
https://xtibia.com/forum/topic/229389-seu-pc-fala-ingl%C3%AAs-claro-que-fala/
Compartilhar em outros sites

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.

Link para o comentário
https://xtibia.com/forum/topic/229389-seu-pc-fala-ingl%C3%AAs-claro-que-fala/#findComment-1618695
Compartilhar em outros sites

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

'-'

Link para o comentário
https://xtibia.com/forum/topic/229389-seu-pc-fala-ingl%C3%AAs-claro-que-fala/#findComment-1618697
Compartilhar em outros sites

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 ._.

Link para o comentário
https://xtibia.com/forum/topic/229389-seu-pc-fala-ingl%C3%AAs-claro-que-fala/#findComment-1618871
Compartilhar em outros sites

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? worriedsmiley.gif

 

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

Link para o comentário
https://xtibia.com/forum/topic/229389-seu-pc-fala-ingl%C3%AAs-claro-que-fala/#findComment-1618877
Compartilhar em outros sites

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

Link para o comentário
https://xtibia.com/forum/topic/229389-seu-pc-fala-ingl%C3%AAs-claro-que-fala/#findComment-1618883
Compartilhar em outros sites

  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...