Vraag : runtime fout: u ging een uitdrukking in die geen waarde heeft

Niet zeker wat deze fout of hoe te om het te verbeteren betekent. ik roep een functie die als verband tussen mijn vraag en mijn klasse object.
called door dienst doet:
DateRank: CreateTestClass (nz ([build_from], „01/01/1900“), nz ([vormen] ! [leiding]! [INTRODATE]. [Waarde], „01/01/1900 " ), „Datum“, nz ([build_to], „7000“) , nz ([forms]! [leiding]! [TERMINATIONDATE]. [Value], „1/1/1900“))

it ontbreekt slechts op het „datum“ deel alle andere vraag fine.

I werkt gelooft ik nietig verklaar correct met de nz.

The daterank functie zelf gestript ben naakt voor het testen heb behandeld tot ik kan vinden wat verkeerd gaat. van
novalue.PNG (8 KB) errorexample
" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126:
127:
van 
Public Functie CreateTestClass (zo Verschillende ClientValueIn, CWValueIn zoals Variant, test als Koord, Facultatieve CWValue2 zo Verschillende, Facultatieve CWValue3 zoals Variant) als Variant

Schemerige Veh als Voertuig
Verduister Resultaat als Variant

Plaats Veh = Nieuw Voertuig

Als IsNull (CWValueIn) of IsNull (ClientValueIn) toen
CreateTestClass = 0
De Functie van de uitgang
Anders


Selecteer de test van het Geval

    Geval „BHP“
        Resultaat = Veh.BhpRank (ClientValueIn, CWValueIn)

    Geval „kW“
        Resultaat = Veh.KWRank (ClientValueIn, CWValueIn)

    Geval „Karakter“
        Resultaat = Veh.CharacterRank (ClientValueIn, CWValueIn)

    Geval „KWStr“
        Resultaat = Veh.KWStrRank (ClientValueIn, CWValueIn)

    Geval „BPStrRank“
        Resultaat = Veh.BhpStrRank (ClientValueIn, CWValueIn)

    Geval „Motor“
        Resultaat = Veh.EngineRank (ClientValueIn, CWValueIn)

    Geval „CC“
        Resultaat = Veh.CCRank (ClientValueIn, CWValueIn)

    Geval „Brandstof“
        Resultaat = Veh.FuelRank (ClientValueIn, CWValueIn)

    Geval „NomStr“
        Resultaat = Veh.NomStrRank (ClientValueIn, CWValueIn)
        
'Geval „Nom“
'Resultaat = Veh.NomRank (ClientValueIn, CWValueIn)

    Geval „GetstrNom“
        Resultaat = Veh.GetStrNomCC (ClientValueIn)
        
    Geval „GetstrNomRev“
        Resultaat = Veh.StrNomReverseRank (ClientValueIn, CWValueIn)
        
    Geval „GetValvesStr“
        Resultaat = Veh.GetStrValves (ClientValueIn)
    Geval „NomCalc“
    
        Resultaat = Veh.NomCalcRank (ClientValueIn, CWValueIn)

    Geval „Deuren“
        Resultaat = Veh.DoorRank (ClientValueIn, CWValueIn)

    Geval „Kleppen“
        Resultaat = Veh.ValveRank (ClientValueIn, CLng (CWValueIn), CWValue2)
    
    Geval „ValvesRev“
        Resultaat = Veh.ValveReverseRank (ClientValueIn, CWValueIn)
        
    Geval „Aandrijving“
        Resultaat = Veh.GetDrive (ClientValueIn)
        
    Geval „DriveRev“
        Resultaat = Veh.DriveReverseRank (ClientValueIn, CWValueIn)
        
    Geval „Sleutelwoorden“
        Resultaat = Veh.KeywordsRank (ClientValueIn, CWValueIn)
        
    Geval „Model“
        Resultaat = Veh.ModelRank (ClientValueIn, CWValueIn)
    Geval „Datum“
       
        
        
        
        
        
        
        
        
        
        
        
        
        
        Resultaat = Veh.DateRank (ClientValueIn, CWValueIn, CWValue2, CWValue3)
        
Uitgezocht eind
Eind als
CreateTestClass = Resultaat

De Functie van het eind

'daterank functie

Overheidsfunctie DateRank (zo Verschillende ClientIntroDateIn, CWIntroDateIn zoals Verschillende, Facultatieve ClientTermdateIn zo Verschillende, Facultatieve CWTermdateIn zoals Variant) als Geheel

Schemerige CWIntroDate als Datum
Schemerige ClientIntroDate als Datum
Schemerige CWTermDate als Datum
Schemerige ClientTermDate als Datum
Schemerige Teller als Geheel
Schemerige ClientTermDateAvailable zoals Van Boole
Schemerige CWTermDateAvailable zoals Van Boole
Schemerige ClientintroDateAvailable zoals Van Boole
Schemerige CWintroDateAvailable zoals Van Boole
Schemerige AllTerminationDatesAvailable zoals Van Boole
Schemerige AllintroDatesAvailable zoals Van Boole
Schemerige AllDatesAvailable zoals Van Boole
Schemerige IntroYearPass zoals Van Boole
Schemerige TermYearPass zoals Van Boole
Schemerige VarianceIntroYear als Geheel
Schemerige VarianceTermYear als Geheel
Schemerige LifeCycleExpired als Geheel
Schemerige RemainingLifeCycle als Geheel
Schemerige LifeCycleYears als Geheel



eind functie

Antwoord : runtime fout: u ging een uitdrukking in die geen waarde heeft

U kunt de iserrorfunctie gebruiken
=iif (iserror ([Vormen]! [leiding]! [FrmLifeCycleModelVariant]! [De Cyclus van het Leven]. [Waarde], 0, [Vormen]! [leiding]! [FrmLifeCycleModelVariant]! [De Cyclus van het Leven]. [Waarde])
Andere oplossingen  
 
programming4us programming4us