referentie naar object op subform

Status
Niet open voor verdere reacties.

so10070

Gebruiker
Lid geworden
4 feb 2014
Berichten
419
Ik wil onderzoeken of een object op een tabformulier Null is of niet, maar slaag er niet in.
Volgende functie geeft onwaar als waarde, dus het formulier is actief
Code:
isnull(forms!frmWerkgroepCGS!tabProjecten)
Nu wil ik op dit formulier onderzoeken of een datumveld leeg wordt gelaten of niet.
Code:
isnull(forms!frmWerkgroepCGS!tabProjecten.form!txtPJOpleverdatum)
En dit geeft de foutmelding: Deze eigenschap of methode wordt niet ondersteund door dit object. Wat doe ik fout? :confused:
 
Beetje vreemde manier van werken vind ik het wel... Je kunt prima checken of een formulier geopend is of niet met deze functie:
Code:
Function fIsLoaded(ByVal strForm As String) As Integer
    'Geeft '0' als het formulier gesloten is en '-1' als het open is.
    If SysCmd(acSysCmdGetObjectState, acForm, strForm) <> 0 Then
        If Forms(strForm).CurrentView <> 0 Then fIsLoaded = True
    End If
End Function

En die gebruik je dan zo:
Code:
If fIsLoaded("frmWerkgroepCGS") = True Then
etc.
Met deze functie kun je bepalen wat voor view je gebruikt:
Code:
Function GetCurrentView(frm As Form) As Integer
    GetCurrentView = frm.CurrentView
End Function
Daar rolt 0 (Ontwerpweergave), 1 (Formulierweergave) of 2 (Gegevensbladweergave) uit.
Met Set zou ik het geopende formulier dan aan een objectvariabele toewijzen, en vervolgens kun je elk element van het formulier dan benaderen.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan