Open Access , quindi creare una nuova tabella denominata " tabella1 " con due colonne : " Campo1 " e " campo2 ". Ti scrive un programma VBA per controllare le proprietà di una di queste colonne, e la proprietà di un controllo casella di controllo .
2
Creare un modulo basato su " Tabella 1 " facendo clic sul pulsante " Form" sul menu "Crea" .
3
destro fare clic sulla scheda del nuovo modulo e selezionare " View design ", quindi fare clic sul controllo " casella di controllo" sulla barra multifunzione ( la grande barra degli strumenti ) . Trascinare nell'area " Modulo Header" per creare la casella di controllo .
4
destro del mouse sulla casella di controllo e selezionare "Proprietà ", quindi digitare " justread " nel campo " Nome" della " Altro" scheda a destra dello schermo . Questa azione imposta il nome di una casella di controllo la cui proprietà "value" si check-in codice VBA .
5
Fare clic su " ... " pulsante sul campo " OnClick " della scheda " Evento" . . Doppio clic su " Generatore di codice " per entrare nell'ambiente di sviluppo integrato VBA ( IDE ) economici 6
Incollare il seguente codice tra i " Private Sub " e le dichiarazioni "End Sub ":
private Sub justread_Click ( ) per
Con Me! Campo1
Me! justread.value = True Then
. Enabled = False
. Locked = vero
Else
. Enabled = True
. Locked = False
End If End With
End Sub
Questa subroutine controlla la proprietà " justread " di controllo "valore" per il valore "True" . Se il "valore" è vero, la subroutine disabilita voce utente nella casella di testo " Campo1 " .
7
Premi " Alt- F11 " per tornare ad Access , quindi fare clic destro sulla scheda del modulo. Selezionare " View Form" per eseguire il form .
8
digitare il testo nel campo " campo1 " , quindi controllare la casella di controllo nella parte superiore del modulo . Provate a digitare più testo nel campo " Campo1 " . La subroutine VBA immesso impedirà ingresso , in base al valore della proprietà "valore" della casella di controllo.
9
destro del mouse tabella del form e selezionare Vista "Design" . Immettere nuovamente l'IDE con il pulsante " ... " . pulsante nel campo " OnClick " del checkbox " justread " , come è stato fatto nel passaggio 5
10
Sostituire la subroutine " justread_Click " con questo codice modificato :
Private Sub justread_Click ( ) per
With Me Campo2
. BackColor = 16777215 Poi
. BackColor = 13.597.561
Else
. BackColor = 16777215 !
End If End With
End Sub
Questa subroutine controlla la proprietà colore di sfondo (chiamato " BackColor " ) del secondo campo . Il programma passa quindi che la proprietà se il colore è bianco .
11
Comunicati " Alt-F8 " per tornare ad Access , quindi eseguire nuovamente il modulo con le istruzioni passo 7 di .
12
selezionare e deselezionare la casella di controllo . Il programma lo hanno modificato cambierà il colore di sfondo " Campo2 ".
Programmazione © www.354353.com