[VB + Arduino] Input eingang aktiviert?

  • VB.NET

Es gibt 3 Antworten in diesem Thema. Der letzte Beitrag () ist von haiyyu.

    [VB + Arduino] Input eingang aktiviert?

    Hallo, ich habe mit vb einen Script geschrieben wo mit ich auf
    einem Arduino Uno den pin 13 anschalte und somit eine "LED" zum
    leuchten bringe.
    Das mache ich so:

    VB.NET-Quellcode

    1. Dim ser As New System.IO.Ports.SerialPort
    2. ser.BaudRate = 9600
    3. ser.PortName = "COM3"
    4. ser.Open()

    und anschalten tue ich es so:

    VB.NET-Quellcode

    1. ser.Write(Chr(1))

    Nun würde ich gerne wissen wie ich einen eingang überprüfe,
    da ich nichts testen will wo ich nicht weiss ob das kaputt geht
    machte ich erst nichts, ist es richtig das so zu überprüfen?

    VB.NET-Quellcode

    1. If ser.Read(Chr(1)) = true then
    2. msgBox("Hi")
    3. End if

    geht das so?
    Der Arduino-Code ist so:

    Quellcode

    1. int inByte = 0;
    3. void setup()
    4. {
    5. Serial.begin(9600);
    6. pinMode(13, OUTPUT);
    7. }
    9. void loop()
    10. {
    12. if (Serial.available() > 0
    13. {
    15. inByte = Serial.read();
    16. switch (inByte)
    17. {
    18. case 1:
    19. digitalWrite(13,HIGH);
    20. break;
    21. case 2:
    22. digitalWrite(13,LOW);
    23. break;
    24. }
    26. }
    27. }


    Ich wäre dankbar für eure hilfe :)

Facebook
Telefonspende