Come popolare le caselle di testo con le selezioni di caselle combinate a più colonne

Moderato: richiede competenze di base di macro, codifica e interoperabilità.

Questo articolo si applica a un database di Microsoft Access (.mdb) e a un progetto di Microsoft Access (con estensione adp).

Riepilogo

Questo articolo illustra come popolare diverse caselle di testo con le selezioni effettuate in una casella combinata a più colonne e quindi salvare il contenuto delle caselle di testo come un record in una tabella.

Ulteriori informazioni

Microsoft fornisce esempi di programmazione a scopo puramente illustrativo, senza alcuna garanzia di qualsiasi tipo, sia espressa che implicita, ivi incluse, senza limitazioni, le garanzie implicite di commerciabilità o idoneità per uno scopo particolare. In questo articolo si presuppone che l'utente conosca il linguaggio di programmazione in questione e gli strumenti utilizzati per creare ed eseguire il debug delle procedure. Gli esperti Microsoft sono autorizzati a fornire spiegazioni in merito alla funzionalità di una particolare routine, ma in nessun caso a modificare questi esempi per fornire funzionalità aggiuntive o a creare routine atte a soddisfare specifiche esigenze. Per aggiornare le caselle di testo con le selezioni effettuate in una casella combinata a più colonne, seguire questa procedura:

1. Aprire il Northwind.mdb di database di esempio.

2. Creare una nuova tabella in Northwind.mdb che include i campi seguenti:

   Table: Table1
   ----------------------
   Field Name: ID
   Data Type: Autonumber
   Primary Key
   ---
   Field Name: FirstName
   Data Type: Text
   ---
   Field Name: LastName
   Data Type: Text
   ---
   Field Name: Title
   Data Type: Text
   

3. Creare un nuovo modulo in Northwind.mdb contenente i controlli seguenti:

   Form: Form1
   ----------------------
   RecordSource: Table1
   ---
   Control Type: Text Box
   Name: txtFirstName
   ControlSource: FirstName
   ---
   Control Type: Text Box
   Name: txtLastName
   ControlSource: LastName
   ---
   Control Type: Text Box
   Name: txtTitle
   ControlSource: Title
   

4. Aggiungere una casella combinata a Form1. Nella procedura guidata Casella combinata seguire questa procedura:

   1. Fare clic su I want the combo box to look up the values in a table or query, and then click Next.
   2. Fare clic su Tabella: Dipendenti e quindi su Avanti.
   3. Spostare i campi LastName, FirstName e Title dall'elenco Campi disponibili all'elenco Campi selezionati selezionando ogni campo e quindi facendo clic sul > pulsante. Fare clic su Avanti.
   4. Fare clic su Avanti, fare clic su Memorizza il valore per un uso successivo e quindi fare clic su Avanti.
   5. Nella casella Etichetta desiderata per la casella combinata digitare Effettua selezione e quindi fare clic su Fine.

5. Fare clic con il pulsante destro del mouse sulla casella combinata creata nel passaggio 4 e quindi scegliere Proprietà.

6. Fare clic sulla scheda Altro e quindi digitare cboNames nella casella Nome.

7. Fare clic sulla scheda Evento, fare clic sulla casella di evento Dopo l'aggiornamento e quindi sul pulsante Compila (...) .

8. Fare clic su Generatore di codice e quindi su OK.

9. Nella Editor di Visual Basic digitare il codice seguente:

Private Sub cboNames_AfterUpdate()
   Me.txtFirstName = Me![cboNames].column(1)
   Me.txtLastName = Me![cboNames].column(2)
   Me.txtTitle = Me![cboNames].column(3)
End Sub

10. Chiudere la Editor di Visual Basic e quindi aprire la maschera Form1 in visualizzazione Maschera.
11. Fare clic su un elemento nella casella combinata e quindi su Record successivo. Ripetere questo passaggio per ogni record da salvare.
12. Aprire Tabella1 nella visualizzazione Tabella per verificare che i nuovi record siano stati salvati. Si noti che dopo aver fatto clic su un elemento nella casella combinata, la proprietà AfterUpdate esegue la routine evento che popola le tre caselle di testo della maschera e un nuovo record viene aggiunto a Table1.