Go Down

Topic: Ayuda interficie VB - COM3 (Read 1 time) previous topic - next topic

adumet

Feb 05, 2011, 01:08 pm Last Edit: Apr 30, 2012, 04:31 am by coleoptero Reason: 1
Buenas foreros!

Este es el codigo de mi aplicacion en Visual Basic 2010:

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

       Dim cad As String
       cad = ReceiveSerialData()
       Me.TextBox1.Text = cad
   End Sub
   Function ReceiveSerialData() As String
       ' Receive strings from a serial port.
       Dim returnStr As String = ""

       Dim COM3 As IO.Ports.SerialPort = Nothing
       Try
           COM3 = My.Computer.Ports.OpenSerialPort("COM3")
           COM3.ReadTimeout = 10000
           Do
               Dim Incoming As String = COM3.ReadLine()
               If Incoming Is Nothing Then
                   Exit Do
               Else
                   returnStr &= Incoming & vbCrLf
               End If
           Loop
       Catch ex As TimeoutException
           returnStr = "Error: Serial Port read timed out."
       Finally
           If COM3 IsNot Nothing Then COM3.Close()
       End Try

       Return returnStr
   End Function

End Class


-->Tengo un simple formulario con un TextBox i un boton.
-->El Arduino lo tengo conectado al COM3.Este lee datos de temperatura,pression y humedad.
-->El programa debería leer el puerto serie COM3 y mostrarlo en el texbox.
No me salen errores de codigo pero me sale esto:


Excepción del tipo 'System.UnauthorizedAccessException' en System.dll
Excepción del tipo 'System.UnauthorizedAccessException' en System.dll


Si alguien me puede ayudar....

Un saludo!

Go Up
 


Please enter a valid email to subscribe

Confirm your email address

We need to confirm your email address.
To complete the subscription, please click the link in the email we just sent you.

Thank you for subscribing!

Arduino
via Egeo 16
Torino, 10131
Italy