Zuviel Werbung? - > Hier kostenlos beim SPS-Forum registrieren

Page 556 of 567 FirstFirst ... 56456506546554555556557558566 ... LastLast
Results 5,551 to 5,560 of 5663

Thread: Fun zum Feierabend

  1. #5551
    Join Date
    08.04.2016
    Location
    4040 Linz, Österreich
    Posts
    492
    Danke
    43
    Erhielt 154 Danke für 122 Beiträge

    Default


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    Hihi, der ist fies. Aber für 999 funktioniert prima....

  2. Folgender Benutzer sagt Danke zu maxder2te für den nützlichen Beitrag:

    DeltaMikeAir (04.06.2020)

  3. #5552
    Join Date
    29.03.2004
    Posts
    7,524
    Danke
    170
    Erhielt 2,242 Danke für 1,610 Beiträge

    Default

    Quote Originally Posted by maxder2te View Post
    Hihi, der ist fies. Aber für 999 funktioniert prima....
    Für die 0 auch noch

    Warum erzeugt das denn überhaupt einen Syntax-Fehler?

  4. #5553
    Join Date
    27.06.2009
    Location
    am Nordharz
    Posts
    5,003
    Danke
    608
    Erhielt 1,375 Danke für 1,128 Beiträge

    Default

    Quote Originally Posted by Thomas_v2.1 View Post
    Warum erzeugt das denn überhaupt einen Syntax-Fehler?
    Weil das Advanced vbScript bei Case das a To z nicht kann.
    Deswegen muss man für Case-Bereiche einen TRUE-Ausdruck erzeugen.

    PS:

    Eigentlich müsste es auch
    Code:
    SELECT CASE TRUE
    heißen.

    Jedenfalls hab' ich es so:
    Code:
    ...
                Select Case True
                    Case Current >= 1 And Current <= 4
                        Start = 1
                    Case Current >= 5 And Current <= 12
                        Start = 5
                    Case Current >= 13 And Current <= 20
                        Start = 13
                End Select
    ...
    in einem funktionierenden Script auf dem TP1200 Comfort.
    Last edited by hucki; 04.06.2020 at 13:47.

  5. #5554
    Join Date
    13.10.2007
    Posts
    13,334
    Danke
    3,259
    Erhielt 3,731 Danke für 2,407 Beiträge

    Default

    Quote Originally Posted by hucki View Post
    Weil das Advanced vbScript bei Case das a To z nicht kann.
    Deswegen muss man für Case-Bereiche einen TRUE-Ausdruck erzeugen.

    PS:

    Eigentlich müsste es auch
    Code:
    SELECT CASE TRUE
    heißen.

    Jedenfalls hab' ich es so:
    Code:
    ...
                Select Case True
                    Case Current >= 1 And Current <= 4
                        Start = 1
                    Case Current >= 5 And Current <= 12
                        Start = 5
                    Case Current >= 13 And Current <= 20
                        Start = 13
                End Select
    ...
    in einem funktionierenden Script auf dem TP1200 Comfort.
    Dann kann man ja gleich eine ELSE_IF-Orgie nutzen.
    - - -
    Wer als Werkzeug nur einen Hammer hat, sieht in jedem Problem einen Nagel.
    Das Problem ist nicht das Problem, das Problem ist die Einstellung zum Problem.

  6. #5555
    Join Date
    27.06.2009
    Location
    am Nordharz
    Posts
    5,003
    Danke
    608
    Erhielt 1,375 Danke für 1,128 Beiträge

    Default

    Quote Originally Posted by rostiger Nagel View Post
    Dann kann man ja gleich eine ELSE_IF-Orgie nutzen.
    Im Prinzip ja, aber Elsif geht auch nicht...

  7. #5556
    Join Date
    13.10.2007
    Posts
    13,334
    Danke
    3,259
    Erhielt 3,731 Danke für 2,407 Beiträge

    Default

    Quote Originally Posted by hucki View Post
    Im Prinzip ja, aber Elsif geht auch nicht...
    nimmt er doch ohne zu meckern !?
    - - -
    Wer als Werkzeug nur einen Hammer hat, sieht in jedem Problem einen Nagel.
    Das Problem ist nicht das Problem, das Problem ist die Einstellung zum Problem.

  8. Folgender Benutzer sagt Danke zu rostiger Nagel für den nützlichen Beitrag:

    hucki (04.06.2020)

  9. #5557
    Join Date
    27.06.2009
    Location
    am Nordharz
    Posts
    5,003
    Danke
    608
    Erhielt 1,375 Danke für 1,128 Beiträge

    Default

    Achja, stimmt.
    War nur nicht Elsif sondern ElseIf.


    Hab' ich sogar im selben Script...



  10. #5558
    Join Date
    25.06.2017
    Location
    Oerlinghausen
    Posts
    3,202
    Danke
    394
    Erhielt 601 Danke für 503 Beiträge

    Default

    Quote Originally Posted by rostiger Nagel View Post
    Dann kann man ja gleich eine ELSE_IF-Orgie nutzen.
    Ich weiss gar nicht, was ich an einer ElseIf-Variante sooo orgiastisch finden soll.
    Code:
    If Current < 1 Then
    ElseIf Current <=4 Then
        Start = 1
    ElseIf Current <=12 Then
        Start = 5
    ElseIf Current <=20 Then
        Start = 13
    End If
    Ist doch klar, einfach und eindeutig und man muss nicht über die in den verschiedenen Sprachen und Dialekten unterschiedlichen Einschränkungen nachgrübeln!
    Wenn man Code produzieren möchte, den man nicht immer wieder (unnötig) an das jeweilige SprachUmfeld anpassen möchte, ist Case doch Käse, wie der Name schon sagt.

  11. #5559
    Join Date
    22.06.2009
    Location
    Sassnitz
    Posts
    16,166
    Danke
    1,337
    Erhielt 4,763 Danke für 3,849 Beiträge

    Default

    Quote Originally Posted by hucki View Post
    Weil das Advanced vbScript bei Case das a To z nicht kann.
    Das geht generell nicht in VBS (VB Script), sondern nur im richtigen VB (Visual Basic)

    Harald
    Es ist immer wieder überraschend, wie etwas plötzlich funktioniert, sobald man alles richtig macht.
    'Funktioniert nicht' ist keine Fehlerbeschreibung

    FAQ: Linkliste SIMATIC-Kommunikation über Ethernet

  12. #5560
    Join Date
    06.11.2008
    Location
    Steinhagen
    Posts
    1,029
    Danke
    205
    Erhielt 162 Danke für 141 Beiträge

    Default


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    Moin Heinileini,

    Quote Originally Posted by Heinileini View Post
    Ich weiss gar nicht, was ich an einer ElseIf-Variante sooo orgiastisch finden soll.
    Code:
    If Current < 1 Then
    ElseIf Current <=4 Then
        Start = 1
    ElseIf Current <=12 Then
        Start = 5
    ElseIf Current <=20 Then
        Start = 13
    End If
    Ist doch klar, einfach und eindeutig und man muss nicht über die in den verschiedenen Sprachen und Dialekten unterschiedlichen Einschränkungen nachgrübeln!
    Wenn man Code produzieren möchte, den man nicht immer wieder (unnötig) an das jeweilige SprachUmfeld anpassen möchte, ist Case doch Käse, wie der Name schon sagt.
    Aber "ElseIf" ist auch nicht plattformunabhängig einsetzbar. Im TIA-SCL muss es "ElsIf" heißen. Aber irgendwas ist ja immer

    VG

    Mario
    _____________________________________________
    Zwei Aussagen, die man nicht ungeprüft hinnehmen sollte:
    - "Das machen wir schon immer so!"
    - "Das machen die Anderen auch so!"

Similar Threads

  1. Gedankenspiele zum Feierabend
    By Eddy001 in forum Stammtisch
    Replies: 119
    Last Post: 12.04.2013, 22:26
  2. ironie und sarkasmus zum feierabend...
    By vierlagig in forum Stammtisch
    Replies: 1
    Last Post: 24.04.2010, 14:24
  3. fun zum samstag: wer nervt mehr?
    By vierlagig in forum Stammtisch
    Replies: 29
    Last Post: 24.09.2008, 21:48

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •