Como ler portas seriais usando Visual Basic

Escrito por lysis | Traduzido por josé fabián
  • Compartilhar
  • Tweetar
  • Compartilhar
  • Pin
  • E-mail
Como ler portas seriais usando Visual Basic
Ler portas seriais usando Visual Basic (Programming Code Source Background Texture Illustration Design image by Bob Davies from Fotolia.com)

Mesmo que os modens tenham sido substituídos por acesso a internet de alta velocidade, alguns computadores ainda os usam para a comunicação. Se estiver programando uma aplicação que usa um modem, verificar que existe e funciona é importante para a interface do usuário. Microsoft .NET inclui um espaço de nomes e classe para se comunicar com portas seriais.

Nível de dificuldade:
Moderado

Outras pessoas estão lendo

O que você precisa?

  • Visual Studio .NET

Lista completaMinimizar

Instruções

    Abrir um novo projeto

  1. 1

    Crie uma nova aplicação de console. No menu do Visual Studio, clique em "Novo" e selecione "Projeto".

  2. 2

    Selecione "Visual Basic" do lado esquerdo da janela. No lado direito há diferentes planilhas de projeto. Selecione "Aplicação de console". Pressione o botão "OK". Uma nova aplicação é configurada na área de trabalho do Visual Studio.

  3. 3

    Clique com o botão direito no nome de projeto no canto superior direito da área de trabalho. Selecione "adicionar referência".

  4. 4

    Clique na aba "COM". Selecione "Microsoft Comm Control 6.0" na caixa de lista, clique em "Selecionar" e em "OK" para fechar a janela de referências.

    Configurar a porta serial

  1. 1

    Crie uma nova variável COM. Precisará alocar memória e declarar uma nova variável. O texto abaixo chama à classe COM para o uso no resto do módulo. A variável buffer é usada para receber o texto de resposta da porta serial. Dim myPort As MSComm myPort = New MSComm Dim myBuffer As String

  2. 2

    Coloque a porta no valor 1. A maioria dos computadores vem com duas portas seriais. O código abaixo encaminha a conexão para a porta 1. myPort.CommPort = 1

  3. 3

    Crie as configurações comuns. Configure a taxa de transmissão e informação de bit de parada necessárias para controlar o modem. myPort.Settings = "9600,N,8,1"

  4. 4

    Leia o buffer completo. Este código faz com que o modem use o buffer inteiro quando envia dados à porta serial. myPort.InputLen = 0

    Comunicar-se com a porta

  1. 1

    Abra a porta serial. A porta serial precisa ser aberta e o buffer de entrada deve ser limpo antes que a aplicação possa se comunicar com ela. A terceira linha de código faz com que a porta serial devolva texto à aplicação. myPort.PortOpen = True myPort.InBufferCount() = 0 myPort.InputMode() = InputModeConstants.comInputModeText

  2. 2

    Envie um comando à porta serial. Este comando testa a resposta do modem. myPort.Output = "ATV1Q0" & Chr(13)

  3. 3

    Leia a resposta da porta serial. Esse laço lê o texto devolvido até receber um "OK". Do myBuffer = myBuffer & myPort.Input Loop Until InStr(myBuffer, "OK" & vbCrLf)

  4. 4

    Feche a porta. Após usar a porta serial, é importante fechá-la para outras aplicações. myPort.PortOpen = False

Não perca

Referências

Filtro:
  • Geral
  • Artigos
  • Slides
  • Vídeos
Mostrar:
  • Mais relevantes
  • Mais lidos
  • Mais recentes

Nenhum artigo disponível

Nenhum slide disponível

Nenhum vídeo disponível