Nwlapcug.com


Come accedere ai dati della sottomaschera



Sapendo come aggiungere dati e poi leggere utilizzando una sottomaschera possa risparmiare tempo quando è necessario modificare ulteriormente i dati in un database di Access. Access è un sistema di gestione di database relazionale spesso utilizzato per creare i database locali. Una sottomaschera è una maschera all'interno di un'altra forma spesso utilizzata per visualizzare dati da una tabella diversa rispetto alla forma principale. Un modulo viene utilizzato per progettare un'interfaccia utente grafica e ti dà la possibilità di utilizzare Visual Basic per applicazioni o VBA, per l'automazione. VBA è un linguaggio usato nelle applicazioni di Microsoft Office di programmazione.

Istruzioni

1

Aprire il database Northwind Microsoft Office Access. Il database Northwind è incluso nella suite Microsoft Office.

2

Selezionare la scheda "Crea" e selezionare "Modulo Design" per creare un nuovo modulo. Cliccare su "Sottomaschera/sottoreport" nel riquadro controlli, poi sinistro del mouse il form e trascinare per creare un nuovo controllo sottomaschera. Aggiungere un nuovo controllo button nello stesso modo.

3

Pulsante destro del mouse la sottomaschera per visualizzare la finestra delle"proprietà." Fare clic sulla scheda "Dati" e accanto all'oggetto di origine, selezionare "Table.Suppliers."

4

Pulsante destro del mouse la sottomaschera per visualizzare la finestra delle proprietà. Fare clic sulla scheda "Eventi" e accanto a scegliere, selezionare "[routine evento]" per aprire la finestra di Visual Basic di Microsoft.

5

Digitare quanto segue per accedere ai dati della sottomaschera e visualizzare i risultati delle prime tre colonne attraverso la finestra immediata:

Private Sub Command2_Click()

Dim tmpString As String

Dim rst As DAO. Recordset

Set rst = Me.Child0.Form.Recordset

RST. MoveFirst

Mentre non rst. EOF

tmpString = rst.Fields(1).Value & "|"

tmpString = tmpString & rst.Fields(2).Value & "|"

tmpString = tmpString & rst.Fields(3).Value

Debug.Print tmpString

rst.MoveNext

Wend

End Sub