Aprire il database di Access .
2
Selezionare la scheda " Crea" e selezionare " Struttura maschera " per creare un nuovo modulo . Fare clic su "Pulsante" nel riquadro " Controls ", quindi a sinistra del mouse il modulo e trascinare per creare un nuovo controllo 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 ( ... ) top aprire la finestra "Microsoft Visual Basic " .
4
Copia e incolla il seguente codice nel nuovo modulo per aggiornare " Importo dovuto " a 50 per il numero di fattura 5 nella tabella " Fatture " :
private Sub Command0_Click ( ) per
Dim strSQL As String
strSQL = " UPDATE Fatture Fatture SET [ Importo dovuto ] = ".
strSQL = strSQL & " 50 WHERE ( ( ( Invoices. [ ID fattura ] ) = 5) ) ; "
DoCmd.SetWarnings False
DoCmd.RunSQL ( strSQL )
End Sub
5
Chiudere il " Microsoft Visual Basic " finestra e destro del mouse su " Form1 ", quindi selezionare " Visualizza come modulo " . Fare clic su " Command0 . "
Programmazione © www.354353.com