fout 94

[dinoshop]

ik krijg een fout 94 op dit , wat is her fout aan ?

Sub Form_Open(Cancel As Integer)
strForm = Left(OpenArgs, (InStr(1, OpenArgs, ",") - 1))
strControl = Trim(Mid(OpenArgs, (InStr(1, OpenArgs, ",") + 1)))
End Sub

 

[OctaFish]

Behalve dat je de code niet met de code knop opmaakt? Is zo niet te zeggen. Ik neem aan dat je er 100% zeker van bent dat het formulier niet geopend wordt zonder waarde in de OpenArgs?

 

[dinoshop]

http://www.mijnbestand.nl/Bestand-ZTTVUS6ALP7G.zip

bij frmcolorpicker gaat fout

 

[OctaFish]

Als je die zelfstandig opent, is de fout zeer logisch. Vandaar mijn vraag over die 100%.

 

[OctaFish]

Ik heb nog even verder getest, en als het formulier wordt geopend vanuit het formulier <frmCalendarSettings> werkt het perfect.