Visualizzazione post con etichetta TUTTE le 4°.. Mostra tutti i post
Visualizzazione post con etichetta TUTTE le 4°.. Mostra tutti i post

sabato 2 novembre 2013

Indicazioni per caricamento maschera aereoporti tramite pulsanti e metodo del REQUERY.

Cari ragazzi eccovi le linee di codice da

collegare alle proprietà eventi su ogni singolo pulsante con le lettere A, B, C,   etc. etc. etc.

Procediamo per STEP:
1) Dopo aver creato il pulsante A lo nominiamo come

cmd_Filtro_A  lo chiameremo così perchè il pulsante comanda la maschera sottostante a lavorare esclusivamente sulla qry_Filtro_A che seleziona le informazioni di interesse esclusivamente e solo per
gli aereoporti che sono situati in città che iniziano per A.

Corrispondentemente, cambiando le lettere, cambieranno le query di caricamento delle informazioni congruentemente con il pulsante della lettera richiesta.

2) Suggerimento: sull'evento on_click della proprietà del pulsante con la lettera andrà il seguente codice VBA visual basic access e quindi riporto di seguito lo script VBA corretto:


Private Sub cmd_Filtro_A_Click()  questo è l'evento da attivare
On Error GoTo Err_cmd_Filtro_A_Click

Me.RecordSource = "qry_Filtro_A"
Me.Requery

Exit_cmd_Filtro_A_Click:
Exit Sub

Err_cmd_Filtro_A_Click:
MsgBox Err.Description
Resume Exit_cmd_Filtro_A_Click
End Sub

Dopo questo cospicuo aiuto penso che siate in grado di concludere la costruzione della maschera con il funzionamento di tutti i pulsanti.

Buono studio e otteniamo la vittoria sull'ignoranza.

Ogni riferimento è puramente casuale

Prof in gamba