none
Error que no encuentro en Visual Basic 6 con el puerto serie RRS feed

  • Pregunta

  • Hola:

    He hecho esto con el puerto serie pero me da error al pulsar CONECTAR.

    Private Sub cmdcon_Click()
        If cmdcon.Caption = "CONECTAR" Then
            puerto.CommPort = Val(cmbsel.ListIndex + 1)
            puerto.PortOpen = True
            cmdenviar.Visible = True
            Timer1.Enabled = True
            cmdcon.Caption = "DESCONECTAR"
    Else
        If cmdcon.Caption = "DESCONECTAR" Then
            Timer1.Enabled = False
            cmdenviar.Visible = False
            puerto.PortOpen = False
            cmdcon.Caption = "CONECTAR"
        End If
    End If
    End Sub
    
    Private Sub cmdenviar_Click()
    textout = txtenviar.Text
    puerto.Output = textout
    End Sub
    
    Private Sub Timer1_Timer()
    textin = puerto.Input
    If textin <> "" Then
    puerto.Output = textout
    End Sub

    Uso Windows 7 de 64 bits. He seguido este vídeo.

    El error que me aparece es este.


    Mi idea principal es enviar tramas de bytes o texto y también recibirlas por el puerto serie.

    ¿Alguna idea?


    http://electronica-pic.blogspot.com



    • Editado Metaconta domingo, 8 de marzo de 2015 1:32
    domingo, 8 de marzo de 2015 1:07

Respuestas

  • Hola

    Lo primero decirte que soy de C# asi que te voy hacer una pregunta que te sonara un poco rara.

    ¿Me puedes explicar un poco que se supone hace esta linea?

    puerto.CommPort = Val(cmbsel.ListIndex + 1)

    De todas formas el error parece ser que es debido a que falta un objeto.

    puerto ¿Es una variable global? ¿donde esta declarada?

    saludos


    Es de buena educación dar las gracias cuando te ayudan, si alguna respuesta te ha sido útil agradécelo marcándola como útil.

    • Marcado como respuesta Metaconta domingo, 5 de abril de 2015 8:41
    jueves, 12 de marzo de 2015 16:23

Todas las respuestas

  • ¿En que linea te da el error?

    Saludos, Javier J

    lunes, 9 de marzo de 2015 8:04
  • Buenas:

    El error lo muestra aquí.

    Gracias.


    http://electronica-pic.blogspot.com

    martes, 10 de marzo de 2015 0:05
  • ¿Existe el combo cmbsel?


    Saludos, Javier J

    martes, 10 de marzo de 2015 7:38
  • Hola

    Lo primero decirte que soy de C# asi que te voy hacer una pregunta que te sonara un poco rara.

    ¿Me puedes explicar un poco que se supone hace esta linea?

    puerto.CommPort = Val(cmbsel.ListIndex + 1)

    De todas formas el error parece ser que es debido a que falta un objeto.

    puerto ¿Es una variable global? ¿donde esta declarada?

    saludos


    Es de buena educación dar las gracias cuando te ayudan, si alguna respuesta te ha sido útil agradécelo marcándola como útil.

    • Marcado como respuesta Metaconta domingo, 5 de abril de 2015 8:41
    jueves, 12 de marzo de 2015 16:23