In Microsoft Access, un report dinamico è un report che fa qualcosa di per sé: crea o si apre o calcola un campo di per sé, in modo da non dovete. È specificare queste azioni automaticamente durante la progettazione del report, utilizzando il linguaggio di programmazione Visual Basic per applicazioni.

Istruzioni

1

Creare una tabella di esempio delle vendite di film, utilizzando i dati che segue. Immettere la riga superiore dei dati come i nomi dei campi della tabella.

MovieTitle, DataVendita, CostoUnitario, qtysold
doc zhivogo,1/1/2009,$5.01,3
doc zhivogo,1/3/2009,$4.95,2
guidare warts,1/5/2009,$1.95,1
guidare warts,1/6/2009,$0.95,2
doc zhivogo,1/13/2009,$3.00,1

2

Selezionare "Crea," seguita da "Report" per creare un nuovo report. (Gli utenti di access 2003, selezionare "Oggetti", quindi fare clic su "Report" e "Nuovo".) Pulsante destro del mouse sulla scheda del nuovo report e selezionare "Visualizzazione struttura". Fare clic sull'icona di controllo casella di testo sulla barra di accesso, quindi fare clic su uno spazio vuoto a destra dei campi esistenti, nella sezione "Dettagli" del report.

3

Selezionare la casella di testo a sinistra della coppia di caselle di testo che l'accesso è automaticamente creato, quindi premere il tasto "CANC". Pulsante destro del mouse la casella di testo rimanente e selezionare "Proprietà".

4

Fare clic sulla scheda "Dati" della finestra "Proprietà delle", quindi immettere il seguente testo nel campo "Origine controllo":

= [qtysold] * [unitcost]

5

Pulsante destro del mouse sulla scheda del report e selezionare "Visualizza Report" per eseguire il report. Si noti il nuovo campo calcolato che hai aggiunto, che consente di visualizzare il totale della vendita (prezzo unitario volte quantità venduta).

6

Pulsante destro del mouse sulla scheda del report e selezionare "Visualizzazione struttura", quindi fare clic sul report e fare clic su "Proprietà Report." Fare clic sulla scheda "Eventi" della finestra "Proprietà delle", quindi fare clic sulla freccia giù nel campo "Il carico". Selezionare "Routine evento", quindi fare clic sul pulsante "..." per inserire l'ambiente di sviluppo integrato (IDE) di Visual Basic.

7

Incollare la seguente subroutine tramite la subroutine "Report_Load" esistente:

Private Sub Report_Load()
wDay = Weekday(Now())
Se (wday = vbThursday) quindi

Me.Filter = "([moviesales].[movietitle] Like ""steer*"")"

Altro

Me.Filter = "([moviesales].[movietitle] Like ""doc*"")"

End If
Me.FilterOn = True
End Sub

Sostituire il testo che legge "vbThursday" con "vb < weekday odierno >"

8

Torna a Access ed eseguire nuovamente il report, utilizzando istruzioni iniziali passaggio di 5. Si noti che vengono visualizzate solo le righe che contengono "dirigere le verruche", perché il codice della macro ha creato un filtro dinamico per le righe particolari, per giovedì.

9

Aprire il "visualizzazione struttura del report," utilizzando il passaggio di 6 istruzioni iniziali. Restituire all'evento "Report_Load" hai inserito precedenti (Vedi punto 6.) Sostituire "vb < weekday odierno >" con "vb < alcuni altri nei giorni feriali >", quindi eseguire nuovamente il report. Si noti che vengono visualizzate solo le righe di "zhivogo doc", basato sulla modifica apportata al codice.