Avviare Microsoft Office Access 2007 , selezionare " Database vuoto " e clicca su "Crea ". Selezionare "Strumenti database" e cliccare su " visivo . Base"
2
Selezionare il menu "Inserisci" e fare clic su "Modulo ".
3
Copia e incolla il codice qui sotto per il vostro nuovo modulo per creare un nuovo sottoprogramma :
accessQueryParameters private Sub ()
Dim db As Database Dim rst
come Recordset
dim strSQL As String
Set db = CurrentDb
strSQL = " CREATE TABLE tmptable ( NumField numero, testo EmployeeName , posizione del testo ) ; "
DoCmd.RunSQL ( strSQL )
strSQL = " INSERT INTO tmptable ( NumField , EmployeeName , posizione ) "
strSQL = strSQL & " VALUES ( 1 , ' Ana ' , 'Maestro '); "
DoCmd.SetWarnings False
DoCmd.RunSQL ( strSQL ) per
strSQL = " Select * from tmptable tmptable ; ».
Set rst = db.OpenRecordset ( strSQL ) < br
rst.MoveLast >
rst.MoveFirst
Do While Not rst.EOF
Debug.Print rst.Fields ( " EmployeeName " ) . Value & " è un " & Sub
Programmazione © www.354353.com