Ho una maschera singola Supporti con vari campi tra cui Contenuto che può avere i seguenti valori:
DettagliSupporti
Documenti
Foto
Misto
Poi ho una struttura a schede, quindi una maschera singola collegata FotoDocumenti. Qui dentro c'è un pulsante PersoneCoinvolte che apre una maschera collegata in foglio dati PersoneCoinvolte avente i seguenti campi:
IDPC
IDPersona
IndiceFoto
DettaglioFoto
RuoloDocumento
IDFD
Quando clicco sul pulsante PersoneCoinvolte vorrei che a seconda del valore contenuto in Forms!Supporti!Contenuto i controlli/campi IndiceFoto, DettaglioFoto, RuoloDocumento siano mostrati o meno in base ai seguenti codici
Private Sub PersoneCoinvolte_Click()
DoCmd.RunCommand acCmdSaveRecord
DoCmd.OpenForm "PersoneCoinvolte", acFormDS, , "[IDFD] = " & Me!IDFD, , , Forms!Supporti!Contenuto
End Sub
Private Sub Form_Load()
Select Case Me.OpenArgs
Case "Documenti"
Me!IndiceFoto.Visible = False
Me!DettaglioFoto.Visible = False
Me!RuoloDocumento.Visible = True
Case "Foto"
Me!IndiceFoto.Visible = True
Me!DettaglioFoto.Visible = True
Me!RuoloDocumento.Visible = False
Case "Misto"
Me!IndiceFoto.Visible = True
Me!DettaglioFoto.Visible = True
Me!RuoloDocumento.Visible = True
Case Else
End Select
End Sub
Nonostante ho verificato che Me.OpenArgs recepisce il valore preso da Forms!Supporti!Contenuto, quando si apre la maschera PersoneCoinvolte vedo sempre tutti i campi.
1) Cosa c'è di sbagliato nei codici che ho postato?
2) Aprire una maschera in foglio dati (acFormDS) non consente di nascondere colonne?