Non visualizza le informazioni più recenti nella vostra applicazione database può essere un problema se i dati visualizzati vengono utilizzati per prendere decisioni importanti . È possibile utilizzare un controllo casella di riepilogo per visualizzare le informazioni da una tabella del database attraverso l'utilizzo di una query . Le " Requery " rinfresca proprietà della query utilizzata nel controllo casella di riepilogo per visualizzare le informazioni più recenti . E ' buona norma aggiornare i dati in un controllo di programmazione , invece di riavviare l'applicazione per aggiornare i dati. Cose che ti serviranno
Northwind database di
Show More Istruzioni
1
aprire il database Northwind , fare clic sul menu "Crea " e fare clic su " Progettazione Form" in " Forms " riquadro . Fare clic sulla scheda "Design" e selezionare " Casella di riepilogo " nel pannello "Controlli" . Fare clic su " Form" nell'area " Dettagli" e trascinare il mouse tenendo premuto il tasto del mouse per disegnare un nuovo controllo casella di riepilogo . Fare clic su "Pulsante" e utilizzare la stessa tecnica per disegnare un nuovo pulsante nel modulo .
2
click destro - il nuovo controllo casella di riepilogo e fare clic su "Proprietà ". Fare clic sulla scheda "Formato" e digitare " 5 " accanto a " Numero colonne ".
3 Fare clic sulla scheda "Dati" , e copiare e incollare il codice SQL di seguito elencati accanto a " . . . . Row Source " :
SELEZIONA Customers.Company , clienti [ Cognome ] , Clienti [ Nome ] , Clienti [E- mail], i clienti [ Professione ] FROM Clienti ;
4
click destro - il nuovo pulsante sul form e fare clic su "Proprietà ". Fare clic sulla scheda "Evento" e scegliere " [ Event Procedure ] " accanto a " Al clic del mouse . " Fare clic sui puntini di sospensione per creare una nuova procedura " button_click " e aprire la finestra di Microsoft Visual Basic
5
Copia e incolla il codice riportato di seguito all'interno della procedura di pulsante per creare due variabili: .
< P > Dim dbs As Database
Dim strSQL As String
6
Copia e incolla il codice riportato di seguito per definire il database corrente come database da usare :
dbs = CurrentDb
7
Copia e incolla il codice elencato qui sotto per inserire un nuovo cliente nella tabella " clienti " :
strSQL = " INSERT INTO clienti ( società , [ Cognome ] , [ Nome ] , [ Indirizzo e-mail ] , [ Professione ] ) "
strSQL = strSQL &" VALUES (' Compnay 1 ', ' Smith ', ' John ', ' johnsmith @ yahoo . com ',' manager '); "
dbs.Execute ( strSQL ) economici 8
Copia e incolla la seguente riga di codice per aggiornare la query nella casella di riepilogo e visualizzare il nuovo cliente ha aggiunto:
List0.Requery
9
tornare alla finestra di Microsoft Access e fare clic sull'icona "Visualizza" . Fare clic sul pulsante per eseguire il codice. Scorrere verso il basso nella casella di riepilogo , e vedrete il nuovo cliente ha aggiunto .
