Hallo,

kann jemand den dargestellten Fehler mit dem "Optional"-Parameter ("IsMissing" liefert kein "True" für die fehlende Variable "B") nachvollziehen ?

Oder mache ich etwas falsch ?

Grüße
Hans-Werner


[0] Test-Makros

Sub Calling
   Dim A,B,C as String
   A= "A" : B = "B" : C = "C"
   Called(A,B,C)
End Sub

Sub Called(Optional A as String,Optional B as String,Optional C as String)
   MsgBox("A: " & IsMissing(A) & Chr(13) &_
          "B: " & IsMissing(B) & Chr(13) &_
          "C: " & IsMissing(C) & Chr(13))
End Sub

[1] Aufruf okay:

Called(A,B,C)

IsMissing(A): False
IsMissing(B): False
IsMissing(C): False

[2] Aufruf gemäß BASIC-IDE Hilfe, Ergebnis aber fehlerhaft: Kein "True" für "B" !

Called(A,,C)

IsMissing(A): False
IsMissing(B): False
IsMissing(C): False

[3] BASIC-IDE Hilfe

Function MeineFunktion(Text1 As String, Optional Arg2, Optional Arg3)

Result = MeineFunktion("Hier", 1, "Dort") ' alle Argumente vorhanden.
Result = MeineFunktion("Test",,1) ' zweites Argument fehlt.

[4] Mit "Function" anstatt "Sub" ist das Ergebnis identisch.

[5] LO Version 5.3.7.2 (x64)  @  Windows 7 Home Premium 64-bit
--
Liste abmelden mit E-Mail an: users+unsubscr...@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

Antwort per Email an