Fare clic su "Start ", " Tutti i programmi ", "Microsoft Office " e " Microsoft Access 2007".
2
Aprire un database esistente con " File , " " Apri ".
3
Fare clic su" Visual Basic "nella scheda " Strumenti database " del nastro .
4
Clicca " Modulo "dal menu "Inserisci" . Selezionare "Procedura " dal menu "Inserisci" . Immettere un nome per la procedura. Selezionare un tipo , come " funzione", e un campo di applicazione e quindi fare clic su "OK".
5
Inserisci il codice per la procedura . Per esempio :
Public Function età ( varBirthDate As Variant ) As Integer Dim
varAge As Variant
Se IsNull ( varBirthDate ) Poi Età = 0 : Exit Function
varAge = DateDiff ( " yyyy" , varBirthDate , Now ) per
Data < DateSerial (Year ( Now ) , Month ( varBirthDate ) , Day ( varBirthDate )) Then
varAge = varAge - 1
End If
Età = CInt ( varAge ) per
End Function
6
Fare clic su " finestra immediata " da " View ". Digitare " ? Age ( " 1956/01/02 " ) " e premere " Invio " per testare il codice . Si dovrebbe ottenere "54" se la data corrente è il 2010 .
7
clic sull'icona del disco floppy sulla barra degli strumenti per salvare il lavoro .
software © www.354353.com