Saper utilizzare un pulsante in una maschera per eseguire comandi può presentare la domanda più dinamica . Microsoft Office Access è un sistema di gestione di database relazionali comunemente usato per i database più piccoli . Visual Basic, Applications Edition (VBA ) è un linguaggio di programmazione per computer utilizzato per automatizzare le attività di routine altrimenti fatto manualmente. VBA può essere utilizzato in Access per creare interfacce grafiche utente ( GUI) per fornire un modo più semplice per inserire i dati nel database. Istruzioni
1
Avviare Microsoft Office Access 2007 , selezionare " Database vuoto ", quindi fare clic su "Crea ".
2
Selezionare la scheda " Crea" e selezionare " Form Design " per creare un nuovo modulo . Fare clic su "Pulsante" sui "Controlli ", quindi a sinistra clic sul form e trascinare per creare un nuovo pulsante .
3
destro del mouse su " Command0 " e selezionare " Proprietà". Fare clic sulla scheda "Evento" e selezionare " [ Event Procedure ] " accanto a " Al clic del mouse . " Fare clic sui puntini di sospensione ( ... ) per aprire la finestra " Microsoft Visual Basic " . Premere il tasto " Ctrl " e "A" e poi "Elimina " per rimuovere il codice esistente.
4
Copia e incolla il seguente codice nel modulo . Questo codice crea una nuova tabella con una "Data " tipo di dati di campo e di aggiungere la data odierna ad esso .
Option Compare Database
Private Sub Command0_Click ( ) per
Dim todaydate As String
todaydate = Ora
sqlstr = " CREATE TABLE dateTable ( TodaysDate data) ; "
DoCmd.RunSQL ( sqlstr ) per
sqlstr = " INSERT INTO dateTable ( [ TodaysDate ] ) "
sqlstr = sqlstr &" VALUES ( ' "& ( todaydate ) &" '); "
DoCmd.SetWarnings False
DoCmd.RunSQL ( sqlstr ) per
End Sub
5
Chiudere la finestra "Microsoft Visual Basic " e fare clic destro " Form1 ". Selezionare " Visualizza come modulo . " Fare clic su " Command0 " per eseguire il codice.
