Ouverture port COM

Bonjour,

Je suis actuellement en train d'essayer de faire imprimer une page à une imprimante via un port COM. J'ai déjà une petite base que voici :

Public Class Form1
    Sub SendSerialData(ByVal data As String)
        ' Send strings to a serial port.
          Using com1 As IO.Ports.SerialPort =
            My.Computer.Ports.OpenSerialPort("COM1")
            com1.WriteLine(data)
           End Using
   End Sub
   Private Sub Valider_Click(sender As Object, e As EventArgs) Handles
        Valider.Click
        Dim Text As String
        Text = tbxVal.Text
        SendSerialData(Text)
     End Sub
End Class 

J'essaie d'apprendre le vba sur le tas étant donné que je n'en ai jamais fait. Lorsque je compile ce code, une exception surgit "le port COM1 n'existe pas" alors qu'il est bien présent depuis le gestionnaire de périphériques.

J'aurais imaginé que l'erreur vient du fait que je n'ouvre pas le port mais pour moi ceci prouve le contraire

           Using com1 As IO.Ports.SerialPort =
           My.Computer.Ports.OpenSerialPort("COM1")

Est-ce que vous auriez une idée de ce que je pourrais faire pour atteindre mon objectif qui est de faire imprimer une page à mon imprimante depuis ce programme?