Saper utilizzare Visual Basic in Access 2007 si può dare una grande flessibilità nello sviluppo di applicazioni di database . Access 2007 offre la possibilità di migliorare il vostro sviluppo dando la possibilità di scrivere codice Visual Basic per le forme ei controlli creati. Visual Basic è un linguaggio di programmazione creato da Microsoft ed è facile da usare. Si può facilmente programmare in Visual Basic Creazione di report in un database di Access o di esecuzione di attività manuali ripetitive . Istruzioni
1

Fare clic sulla scheda "Crea" in Access e selezionare " Form Design ". Il programma crea una nuova forma . Selezionare il controllo " Button " sotto il riquadro " Comandi " e spostare il mouse sopra il nuovo modulo. Sinistro del mouse e creare il nuovo pulsante . Aggiungere un controllo " Casella di riepilogo " per la forma allo stesso modo è stato aggiunto il pulsante .
2

pulsante destro del mouse sulla casella di riepilogo e selezionare "Proprietà ". Sul " Foglio Proprietà ", fare clic sulla scheda " Dati" e selezionare la casella a discesa " Tipo origine riga " e selezionare " Elenco valori ".
3

destro del mouse sul nuovo pulsante e selezionare " Proprietà". Sul " Foglio Proprietà " fare clic sulla scheda "Evento" e selezionare la casella a discesa su " Al clic " e selezionare " [ Event Procedure ] . " . Clicca sul puntini di sospensione ( ... ) e si aprirà una nuova finestra di Microsoft Visual Basic
4

Digitare quanto segue:

Dim dbs As Database Dim

RST come Recordset

Dim X As Integer

Dim strSQL As String Dim

LastFirst As String

di dichiarare le variabili si intende utilizzare.

5

Tipo :

Set dbs = CurrentDb

per impostare il database corrente

Tipo : .

strSQL = " CREATE TABLE tabella1 ( TESTO nome ( 25 ) , testo Cognome ( 25) ) ; ".

DoCmd.RunSQL ( strSQL ) per

per creare una nuova tabella nel database denominato " Tabella1 "

6

Tipo :

strSQL = " INSERT INTO Tabella1 ( [Nome] , [ Cognome] ) "

strSQL = strSQL & " VALUES ( ' John' , 'Smith' ) ; "
7

Tipo

DoCmd.SetWarnings False

DoCmd.RunSQL ( strSQL ) per

per inserire la prima riga di dati . :

strSQL = " INSERT INTO Tabella1 ( [Nome] , [ Cognome] ) "

strSQL = strSQL & " VALUES ( ' Jaime ', ' Avelar '); "

. DoCmd.SetWarnings False

DoCmd.RunSQL ( strSQL ) per

per inserire una seconda riga di dati
8 Tipo

:

set rst = dbs.OpenRecordset ( " Tabella1 " ) per

per impostare il set di record

Tipo : .

rst.MoveFirst

per x = 0 per rst.RecordCount - 1

LastFirst = Trim ( . rst.Fields ( "Cognome " ) Value) & "" & Trim ( rst.Fields ( . " Nome " ) Valore ) per

List1.AddItem LastFirst

rst.MoveNext

Avanti X

un ciclo tra i record che avete appena creato e li visualizza nella casella di riepilogo sul modulo .
Pagina 9

Tipo :

MsgBox " ! avete visualizzati tutti i record nella tabella 1 per elencare scatola con successo " , vbInformation

per visualizzare un messaggio . Passare da una finestra torna ad Access 2007 e fare clic su "Visualizza" per eseguire il form . Fare clic sul pulsante " Comando0 " e vedrete il controllo casella di riepilogo visualizza i nomi .

• Come Master VBA per Microsoft Office 2007 
• Come controllare per un processo di applicazione in Visual Basic NET