collapse

* Posts Recentes

Amplificador - Rockboard HA 1 In-Ear por almamater
[27 de Março de 2024, 19:13]


O que é isto ? por KammutierSpule
[26 de Março de 2024, 19:35]


Bateria - Portátil por almamater
[25 de Março de 2024, 22:14]


Emulador NES em ESP32 por dropes
[13 de Março de 2024, 21:19]


Escolher Osciloscópio por jm_araujo
[06 de Fevereiro de 2024, 23:07]


TP4056 - Dúvida por dropes
[31 de Janeiro de 2024, 14:13]


Leitura de dados por Porta Serie por jm_araujo
[22 de Janeiro de 2024, 14:00]


Distancia Cabo por jm_araujo
[08 de Janeiro de 2024, 16:30]


Meu novo robô por josecarlos
[06 de Janeiro de 2024, 16:46]


Laser Engraver - Alguém tem? por almamater
[16 de Dezembro de 2023, 14:23]

Autor Tópico: VB.NET Arduino  (Lida 1795 vezes)

0 Membros e 1 Visitante estão a ver este tópico.

Offline magtaem

  • Mini Robot
  • *
  • Mensagens: 25
VB.NET Arduino
« em: 24 de Junho de 2014, 20:11 »
Boas pessoa,

Tou aqui com uma dúvida referente a uma comparação de dados em VB.net do arduino.

Código: [Seleccione]
If (SerialPort2.ReadLine >= "0" < "500") Then


                distancia = SerialPort2.ReadLine
            End If


            If (SerialPort2.ReadLine >= "500" < "2000") Then


                aguatemp = SerialPort2.ReadLine
            End If

            If (SerialPort2.ReadLine >= "3000" < "4000") Then


                gas = SerialPort2.ReadLine
            End If

            If (SerialPort2.ReadLine >= "4000" < "5000") Then


            humidade = SerialPort2.ReadLine
            End If

            If (SerialPort2.ReadLine >= "5000" < "7000") Then


                temperaturesen = SerialPort2.ReadLine
            End If

            If (SerialPort2.ReadLine >= "8000" < "9000") Then


                fluxoagua = SerialPort2.ReadLine
            End If

            If (SerialPort2.ReadLine = "movimento") Then


                movimento = SerialPort2.ReadLine

            End If

Coloquei uma msgbox antes para dar o resultado e ele imprime o problema é aqui no código, acho que a comparação est´mal , mas ja tentei de variadas maneiras. Em relação ás comparações de valor muito altas eu sei , mas é para depois saber de que sensor estou a tratar.

Desde já muito obrigado,

Cumprimentos
"O mundo pertence a quem se atreve"

Offline poliveira1978

  • Mini Robot
  • *
  • Mensagens: 335
Re: VB.NET Arduino
« Responder #1 em: 24 de Junho de 2014, 21:50 »
Código: [Seleccione]
If (SerialPort2.ReadLine >= "0" < "500") Then
não devia ser
Código: [Seleccione]
If ((SerialPort2.ReadLine >= "0") and (SerialPort2.ReadLine < "500")) Then
o meu vb está um bocado enferrujado, mas a sintaxe deve ser algo daquele género.

Offline magtaem

  • Mini Robot
  • *
  • Mensagens: 25
Re: VB.NET Arduino
« Responder #2 em: 24 de Junho de 2014, 21:57 »
Mano obrigada o estava a atrufiar com esta sintaxe agora .
Cumprimentos
"O mundo pertence a quem se atreve"