Avere la conoscenza su come creare e utilizzare forme avanzate in Microsoft Office Access può rendere le applicazioni di database più potenti . È possibile creare facilmente un form utilizzando la Creazione guidata Maschera , ma non sarà sempre ottenere i risultati desiderati . Hai la possibilità di aggiungere diversi controlli per il Modulo quando si crea manualmente. Inoltre , è possibile scrivere Visual Basic, Applications Edition (VBA ) per eseguire i processi dietro quei controlli . Visual Basic, Applications Edition (VBA ) è un linguaggio di programmazione per computer utilizzato per automatizzare le attività di routine in Access e altre applicazioni di MS Office . Cose che ti serviranno
Microsoft Office Access
Northwind Database
Show More Istruzioni
1
Aprire il database di Access Northwind di Microsoft Office . Il database Northwind è incluso nella suite Microsoft Office .
2 Fare clic sulla scheda "Crea " e selezionare " Struttura maschera " per creare un nuovo modulo . Fai clic su " Casella combinata ", nel riquadro " Controlli " quindi clicca il modulo e trascinare per creare un nuovo controllo casella combinata . Fare clic su "Pulsante" nel riquadro " Comandi " e aggiungere un nuovo pulsante al form . Selezionare " Casella di riepilogo " e aggiungere un nuovo controllo casella di riepilogo al form.
3
destro del mouse su " Command0 " e selezionare "Proprietà" . Fare clic sulla scheda "Evento" e selezionare " [ Event Procedure ] " accanto a " Al clic " . Fare clic sui puntini di sospensione ( "..." ) per aprire la finestra " Microsoft Visual Basic " . Premere il tasto " Ctrl " e "A " e premere " Elimina" per rimuovere tutto il codice esistente .
4
Copia e incolla il seguente codice nel nuovo modulo . Il codice caricherà il controllo casella combinata con i cognomi dalla tabella "Prodotto" .
Option Compare Database
Private Sub Command2_Click ( ) per
Dim sqlstr As String < br
Dim > prductSelected As String
Me.Combo3.SetFocus
prductSelected = Me.Combo3.Text
sqlstr = "Prodotti selezionare. [ Nome di prodotto ] , Prodotti . [ Listino ] "
sqlstr = sqlstr & " FROM Prodotti "
sqlstr = sqlstr & " WHERE ( ( ( Products. [ Nome di prodotto ] ) = ' "& ( prductSelected ) &" ')); "
Me.List0.RowSourceType =" Tabella /query "
Me.List0.RowSource =
sqlstr < p > End Sub
private Sub Form_Load ( ) per
Me.List0.ColumnCount = 2
Me.Combo3.RowSourceType = " Tabella /query "
< p > Me.Combo3.RowSource = " . Prodotti SELECT [ Nome di prodotto ] FROM Prodotti ";
End Sub
5
Chiudere il " Microsoft Visual Basic " finestra e destro del mouse su " Form1 ", quindi selezionare " Visualizza come modulo " . Selezionare un nome producono dal controllo casella combinata . Fare clic su " Command0 " per visualizzare Listino nel controllo casella di riepilogo in base al nome del prodotto che hai selezionato .