Re: [de-users] LO Makro Basic Option ''Optional'' - ''IsMissing'' immer ''False''

Hallo Thomas,

danke für Deine Erläuterungen. Sie hören sich für mich (durchaus) 
logisch und nachvollziehbar an, aber beschreiben eine doch etwas andere 
Vorgehensweise als in der BASIC-IDE-Hilfe (identsich mit der englischen 
Version) dargestellt und lassen die Anweisung "IsMissing" ins "Leere 
laufen":

[1] Optional (in Anweisung Function) [Laufzeit]
[1.1] "Ermöglicht es, ein Argument, das einer Function übergeben wird, 
als optionales Argument zu definieren."
[1.2] Beispiele
+ Function MeineFunktion(Text1 As String, Optional Arg2, Optional Arg3)
+ Result = MeineFunktion("Hier", 1, "Dort") ' alle Argumente vorhanden.
+ Result = MeineFunktion("Test",,1) ' zweites Argument fehlt.

Diese Hilfebeschreibung empfinde ich schon etwas "dünn". Dennoch, wenn 
ich das Hilfe-Beispiel (richtig) interpretiere:

+ Der erste Parameter darf wohl nicht "Optional" sein.
+ Alle Parameter nach dem ersten müssen "Optional" sein.
+ Wird der (erste) "Optional"-Parameter weggelassen, bleibt das 
zugehörige Komma (,) erhalten.

Allerdings ist es in der praktischen Anwendung so, dass man die 
Schnittstelle bezüglich Reihenfolgen gestalten kann wie man möchte und 
auch die optionalen Parameter weglassen kann wie man möchte, wenn man 
sich an die beiden "Regeln" hält:
+ Das Komma (,) des weggelassenen optionalen Parameters bleibt bestehen.
+ Keine Typ-Deklaration bei optionalen Parametern.
Über "IsMissing" hat man stets die volle Kontrolle über die 
weggelassenen Parameter. Siehe unten Punk [3].

[2] Funktion IsMissing [Laufzeit]
[2.1] "Ermöglicht es, festzustellen, ob einer Funktion ein optionales 
Argument übergeben wurde."
[2.2] Test-Makro 4

Sub Calling_4
   Dim A1,optB2,optC3,optD4 as Integer
   A1=1 : optB2=2 : optC3=3 : optD4=4
   Called_4(A1,optB2,optC3,optD4)
End Sub

Sub Called_4(A1 as Integer,Optional optB2,Optional optC3,Optional optD4)
   Dim ZK as String : ZK = ""
   MsgBox("IsMissing(optB2): " & IsMissing(optB2) & Chr(13) &_
          "IsMissing(optC3): " & IsMissing(optC3) & Chr(13) &_
          "IsMissing(optD4): " & IsMissing(optD4) & Chr(13))
   ZK = ZK & "A1=" & A1 & Chr(13)
   If (Not IsMissing(optB2)) Then : ZK = ZK & "optB2=" & optB2 & Chr(13) 
: End IF
   If (Not IsMissing(optC3)) Then : ZK = ZK & "optC3=" & optC3 & Chr(13) 
: End IF
   If (Not IsMissing(optD4)) Then : ZK = ZK & "optD4=" & optD4 & Chr(13) 
: End IF
   MsgBox (ZK)
End Sub

[2.3] Lässt man, wie von Dir angegeben, das Komma (,) des weggelassenen 
Parameters auch weg, läuft die "IsMissing"-Anweisung "ins Leere". Behält 
man das Komma (,) bei, funktioniert alles bestens.

[3] Test-Makro 5

Sub Calling_5
   Dim A1,optB2,optC3,optD4,E5 as Integer
   A1=1 : optB2=2 : optC3=3 : optD4=4 : E5=5
   Called_5(A1,optB2,optC3,optD4,E5)
End Sub

Sub Called_5(A1 as Integer,Optional optB2,Optional optC3,Optional 
optD4,E5 as Integer)
   Dim ZK as String : ZK = ""
   MsgBox("IsMissing(optB2): " & IsMissing(optB2) & Chr(13) &_
          "IsMissing(optC3): " & IsMissing(optC3) & Chr(13) &_
          "IsMissing(optD4): " & IsMissing(optD4) & Chr(13))
   ZK = ZK & "A1=" & A1 & Chr(13)
   If (Not IsMissing(optB2)) Then : ZK = ZK & "optB2=" & optB2 & Chr(13) 
: End IF
   If (Not IsMissing(optC3)) Then : ZK = ZK & "optC3=" & optC3 & Chr(13) 
: End IF
   If (Not IsMissing(optD4)) Then : ZK = ZK & "optD4=" & optD4 & Chr(13) 
: End IF
   ZK = ZK & "E5=" & E5 & Chr(13)
   MsgBox (ZK)
End Sub

[3.1] Hält man sich an die Regeln
+ das Komma (,) des weggelassenen optionalen Parameters bleibt bestehen
+ keine Typ-Deklaration bei optionalen Parametern
funktioniert alles bestens. Egal, welchen und wie viele optionierte 
Parameter man weg lässt, mit "IsMissing" hat man stets die volle 
Kontrolle.

[4] Das Zusammenspiel von "Optional" und "IsMissing" ist so, wie man es 
erwartet. So kann ich nicht wirklich nachvollziehen, dass das Konstrukt 
falsch sein sollte beziehungsweise hier "unsauber" programmiert wurde, 
zumal sich das Ganze auch mit der Beschreibung in der BASIC-IDE-Hilfe 
deckt.

[5] Da ich den Source-Code nicht kenne und deshalb nur "indirekt" 
argumentieren kann, bin ich jetzt doch etwas ratlos, zumal die 
Hilfe-Beschreibungen zu "Optional" und "IsMissing" doch etwas "dünn" 
sind und dummerweise (offensichtlich) auch noch im Gegensatz zu Deiner 
Darstellung (insbesondere bezüglich "Komma beibehalten" versus "Komma 
weglassen") stehen.

Grüße
Hans-Werner

------ Originalnachricht ------
Von: "Thomas Krumbein" <Thomas.Krumbein@documentfoundation.org>
An: users@de.libreoffice.org
Gesendet: 06.12.2017 23:35:03
Betreff: Re: [de-users] [NACHTRAG] LO Makro Basic Option ''Optional'' - 
''IsMissing'' immer ''False''

> Hallo Hans Werner,
>
> nein, kein Bug. völlig normales Verhalten. Nur von Dir falsch 
> angewendet.
>
> Eigentlich ein Zufall, dass es überhaupt funktioniert;)
>
> Optionale Parameter dürfen nur am Ende einer Kette verwendet werden. 
> Nach dem ersten optionalen Parameter müssen alle anderen ebenfalls 
> optional sein.
>
> Das Modell sah nie vor, mittlere Parameter auszulassen - also so etwas 
> wie bei Dir: "Called_3(A,,C)" - das das überhaupt funktioniert hat mich 
> sowieso gewundert. Hier sollte - wenn überhaupt- der Bug hin.
>
> Die Reihe wird immer von vorne nach hinten (also vom ersten zum letzen 
> Parameter abgearbeitet.
>
> Der typische Aufruf sähe also aus:
>
> Called_3(A,C)
>
> dazu dann die Funktion:
>
> Sub Called_3(Optional A as Integer, Optional B as integer, Optional C 
> as Integer)
>
> Das heisst, die Funktion akzeptiert Null bis max drei Parameter, in der 
> jeweiligen Reihenfolge.
>
> Übergibst Du keinen - alles ok.
>
> Übergibst Du einen - wird der auf A gemappt, die beiden anderen fehlen.
>
> Übergibst Du zwei, wird der erste auf A gemappt, der zweite auf b 
> gemappt, der dritte fehlt.
>
> Übergibst Du drei, werden sie der Reihenfolge nach auf die Variabel 
> A,B,C gemappt.
>
> Ein Aufruf "Called_3(A,,C)" übergibt drei Parameter auch wenn der 2. 
> leer ist. Dieser wird auf B gemappt - im Falle das unbestimmten 
> Platzhalters (variant) ist dieser leer und wird quasi als "nicht 
> übergeben" interpretiert. Ist der Platzhalter kein unbestimmter Typ, 
> wird immer der Grundwert angenommen (bei integer ist das Null, beim 
> String Leer etc - d.h. der 2. Parameter fehlt nicht!
>
> Hier ist der Konstrukt einfach falsch und sollte anders programmiert 
> (sauber;)) werden.
>
> Viele Grüße
>
> Thomas
>
>
>
> Am 06.12.2017 um 22:17 schrieb OoOHWHOoO:
> > [..]
> >
> > Die "Optional"-Option verhält sich ein wenig "beliebig":
> >
> > [..]
> > [3] Ich finde, der "Optional"-Parameter sollte sich immer gleich 
> > verhalten, egal, wie oft er in der Schnittstelle aufgeführt ist - also 
> > immer das Weglassen der Typ-Deklaration erfordern. In genau diese 
> > Falle bin ich getappt, da meine ersten Anwendungen mit dem 
> > "Optional"-Parameter immer nur mit 1 "Optional"-Parameter in der 
> > Schnittstelle waren und deshalb die Typ-Deklaration nicht "störte" - 
> > und mit mehr als einem "Optional"-Parameter bin ich dann "in die 
> > Fehlfunktion gelaufen" ...
> >
> > [4] Sollte man das unterschiedliche Verhalten des 
> > "Optional"-Parameters als BUG melden ?
> >
> > Grüße
> > Hans-Werner
>
>
> -- Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
> Probleme? 
> https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
> Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
> Listenarchiv: https://listarchives.libreoffice.org/de/users/
> Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
--
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert