Como: Show disponível Serial Ports in Visual Basic

  • Artigo

Este tópico descreve como usar o My.Computer.Ports para mostrar as portas seriais disponíveis do computador no Visual Basic.

Para permitir que um usuário selecione qual porta usar, os nomes das portas seriais são colocados em um controle ListBox.

Exemplo

Este exemplo realiza um loop por todas as sequências de caracteres retornadas pelo propriedade My.Computer.Ports.SerialPortNames.Estas sequências de caracteres são os nomes das portas seriais disponíveis no computador.

Geralmente, um usuário seleciona qual porta serial a aplicação deve usar a partir da lista de portas disponíveis.Nesse exemplo, os nomes das portas seriais são armazenados no controle ListBox.Para obter mais informações, consulte Caixa de Listagem Controlar (Windows Forms).

Sub GetSerialPortNames()
    ' Show all available COM ports.
    For Each sp As String In My.Computer.Ports.SerialPortNames
        ListBox1.Items.Add(sp)
    Next
End Sub

Este exemplo de código também está disponível como um trecho de código IntelliSense.No selecionador de trechos de código, ele está localizado em Connectivity and Networking.Para obter mais informações, consulte Como: Inserir trechos em seu código (Visual Basic).

Compilando o código

Este exemplo requer:

  • Uma referência de projeto para System.Windows.Forms.dll.

  • Acesso aos membros do espaço de nomes System.Windows.Forms.Adicione uma declaração Imports se você não está qualificando completamente os nomes de membros em seu código.Para obter mais informações, consulte Declaração Imports (Tipo e Namespace .NET).

  • Que seu formulário tem o controle ListBox com o nome ListBox1.

Programação robusta

Você não precisa usar o controle ListBox para exibir os nomes das portas serial disponíveis.Em vez disso, você pode usar um ComboBox ou outro controle.Se o aplicativo não precisa de uma resposta do usuário, você pode usar um controle TextBox para exibir as informações.

Observação:

Os nomes das portas retornados por My.Computer.Ports.SerialPortNames pode estar incorreto quando executado no Windows 98. Para evitar erros de aplicativo, use a manipulação de exceção, sistema autônomo a Try...Catch...Finally demonstrativo ou o Using demonstrativo, ao usar sistema autônomo nomes de porta para em aberto portas.

Consulte também

Tarefas

Como: Discar modems anexados a portas seriais no Visual Basic

Como: Enviar seqüências para portas seriais no Visual Basic

Como: Receber Strings From Serial Ports in Visual Basic

Referência

Objeto My.Computer.Ports