Routine per lo sviluppo di database per la qualità

Come si inseriscono le routine in un database

Ogni oggetto (tasti, finestre, caselle di testo, ecc..) può contenere varie routine, ognuna rispondente ad un evento.
Vediamo gli eventi di un pulsante e poi proviamo a mettere manualmente una routine.

Questi sono, nella maschera proprietà, gli eventi disponibili per un pulsante:

La scritta Routine evento indica che quando si verifica l'evento Su clic parte un programma in visual basic.
Proviamo ora a creare una casella di testo di nome T1 e fare in modo che, alla pressione di un pulsante nella casella appaia la scritta ISI

Creiamo una maschera, disegnamo un pulsante senza autocomposizione, modifichiamo la scritta su di esso (basta cliccarci sopra 2 volte) e, nelle proprietà, assegnamogli come nome Pulsante1.

Ora creiamo una casella di testo e diamogli nome T1.

Scegliamo l'evento Su clic del Pulsante1 e clicchiamo sul tastino con 3 puntini

 

Ora inseriamo il codice in visual basic (le righe rosse le mette in automatico Access):

Private Sub Pulsante1_Click()

If Me!T1 = "sviluppoisi.com" Then
Me!T1 = "ISI"

Else
Me!T1 = "sviluppoisi.com"

End If

End Sub

Copiate e provate il codice.
Per fare ciò che volevamo era sufficiente inserire la riga:

T1 = "ISI"

Noi invece gli abbiamo detto di fare un controllo sul contenuto di T1 e quindi decidere cosa scrivere.
Se T1 contiene la scritta sviluppoisi.com il pulsante scrive ISI, altrimenti scrive sviluppoisi.com.
Le due scritte si alterneranno quindi ad ogni pressione del tasto.

Il comando If ..... Then .... Else è molto importante e presto impareremo ad utilizzarlo.
In italiano lo potremmo tradurre così: se una variabile è uguale ad un determinato valore esegui il comando 1, altrimenti esegui il comando 2.
Ogni volta in cui dovremo operare delle scelte useremo If (se).

Allenatevi copiando negli eventi Su clic le varie routine che avete trovato in queste pagine e guardando il database d'esempio.


<<< Torna a pagina precedente


Scarica il database Access 2000 d'esempio


 

Home

Torna Su

Chiedi aiuto