Il programma di database di Access da Microsoft ha un built-in linguaggio di programmazione Visual Basic, Applications Edition (VBA) , che gli sviluppatori utilizzano per estendere di default di accesso set di funzioni . L'ordinamento è una delle tante funzioni di VBA può eseguire sui dati che gli utenti di creare o gestire in Access . Accesso utenti possono ordinare i dati con VBA utilizzando una varietà di approcci , comprese quelle che non richiedono l'apprendimento di una notevole quantità di codice VBA . Un vantaggio fondamentale di ordinamento dei dati in Access VBA è il tempo risparmiato da non dover ordinare manualmente i dati . Cose che ti serviranno
Microsoft Access
Mostra più istruzioni
1

Open Access e fare clic sul menu "Crea" intestazione , seguito da " Tabella ". Potrai creare un piccolo tavolo per eseguire una sorta di VBA su .
2

doppio clic nella colonna " di Tabella1 " intestazione e digitare "Nome ", quindi digitare diversi nomi in quella colonna . Verificare ogni nome inizia con una diversa lettera dell'alfabeto in modo da poter vedere chiaramente l'effetto del tipo di VBA che segue . Per lo stesso motivo , assicurarsi di inserire i nomi in un ordine non differenziati. Ad esempio , immettere i nomi " Carol ", " Bob " e " Amanda ", in questo ordine .
3

Premere " Ctrl " + " S ", quindi digitare " userinfo " per il nome della tabella .
4

Fare clic sul menu "Crea" voce , quindi fare clic sul pulsante nel pannello "Altro" di " progettazione query" . Potrai creare una query per il programma sorta VBA da eseguire .

5 Fare doppio clic sulla voce " userinfo " nella finestra di dialogo " Mostra tabella ", quindi fare clic sul pulsante "Chiudi" della finestra di dialogo .
6

Trascina la " * ", che rappresenta tutti i campi di una tabella , sul primo colore della griglia della query .
7

Fare clic con il " Query1 " scheda , quindi selezionare" visualizzazione SQL . " Digitare il seguente subito dopo il "FROM userinfo " clausola : .

ORDER BY " . FirstName "

ordini Questa nuova clausola i dati quando Access esegue la query
8 < p > Premere il tasto " Ctrl " + " S ", quindi digitare " Q1 " per il nome della query.
9

Premere " Alt " + " F11 " per entrare nell'ambiente VBA integrato di sviluppo ( IDE ) , che è dove potrai entrare nel codice del programma per l'ordinamento della tabella " userinfo "
10

Clicca voce del menu "Inserisci" "Modulo" , quindi incollare il seguente codice di programma nella finestra del modulo. :

pubblico doQuery Sub ( ) per

Const qName = " q1 "

Dim db1 Come DAO.Database

Dim RS1 Come
DAO.Recordset

db1 = CurrentDb

Set RS1 = db1.OpenRecordset ( qName ) per

Do While Not rs1.EOF

Debug.Print "Nome:" & RS1 ! [Nome]

rs1.MoveNext

loop

rs1.Close

db1.Close

End Sub