David's blog

In questo articolo abbiamo visto come visualizzare una finestra in cui inserire una password per l'accesso ad una sezione del database, qui vedremo come rendere compatibile il database alle versioni di Office a 64bit Per maggiori informazioni consultare questa guida in inglese Per rendere compatibile il database con i sistemi a 64bit occorre sostituire l'intero codice del modulo con questo Download Project

All'interno di un database di Access è comodo poter bloccare certe sezioni del database tramite password. Per fare questo occorre creare un modulo in Visual Basic con all'interno queste righe di codice: Poi occorre preparare l'interfaccia grafica in questo modo: Creare una maschera principale che chiameremo Mascehra 1 Creare all'interno della Maschera 1 un pulsante Creare una maschera secondaria che ciameremo Maschera 2, contenente i dati che vogliamo proteggere da password All'interno della Maschera 1 cliccare sul pulsante e nella finestra delle proprietà cliccare sulla scheda Evento , cliccare poi sulla voce Su clic e selezionare Routine Evento . Verrà aperto Visual Basic in modo da inserire il codice da associare al pulsante quando clicchiamo su di esso (Su clic). Quindi inserire queste righe di codice all'interno della funzione nomepulsante_Click() Ecco il risultato: Download Project

In questo articolo vedremo come interagire con i plusanti all'interno delle MsgBox. All'interno del codice Visual Basic della Routine evento " SuClick " è necessario inseire le righe di codice che permettono oltre alla visualizzazione della MsgBox anche di eseguire codice quando si clicca uno dei pulsanti al suo interno. Se non si specifica alcun codice, alla pressione di uno dei pulsanti, si chiude la MsgBox. ESEMPIO 1: Clic sul pulsante Si Clic sul pulsante No Download Project ESEMPIO 2: Questa è una alternativa all'esempio 1: La visualizzazione viene assegnata ad una variabile iMsg di tipo Integer e quindi con l'istruzione if viene interrogata la variabile per conoscere quale dei due pulsanti è stato premuto. Download Project ESEMPIO 3: In questo esempio viene utilizzato il Select Case per gestire i tre pulsanti all'interno della MsgBox. Download Project Vedi anche visualizzazione MsgBox Vedi anche personalizzazione dell...

In questo articolo vedremo come personalizzare le MsgBox. PERSONALIZZAZIONE 1: All'interno delle MsgBox è possibile visualizzare il testo su più righe utilizzando una serie di stringhe speciali: Chr(13) oppure vbCr - Ritorno a capo Chr(10) oppure vbLf - Nuova riga E' possibile combinare queste due stringhe attraverso il carattere & ad esempio: Chr(10) & Chr(10) oppure Chr(13) & Chr(10) ESEMPIO 1: Download Project PERSONALIZZAZIONE 2: Le MsgBox possono essere combinate tra loro come tipologia ESEMPIO 1: In questo esempio si combina vbCritical e vbYesNo Download Project ESEMPIO 2: In questo esempio si combina vbInformation e vbRetryCancel Download Project Vedi anche visualizzazione MsgBox Vedi anche interazione con le MsgBox

All'interno del proprio database è utile poter visualizzare dei messaggi di avviso, di informazione, ecc. a seconda dell'operazione che si vuole eseguire oppure che si è eseguita. Esistono diversi tipi di messaggi di avviso che all'interno del codice Visual Basic si chiamano MsgBox vbOKOnly - Visualizza solo il pulsante OK vbOKCancel - Visualizza i pulsanti OK e Annulla vbAbortRetryIgnore - Visualizza i pulsanti Termina, Riprova, e Ignora vbYesNoCancel - Visualizza i pulsanti Sì, No e Annulla vbYesNo - Visualizza i pulsanti Sì e No vbRetryCancel - Visualizza i pulsanti Riprova e Annulla vbCritical - Visualizza l'icona di messaggio critico vbQuestion - Visualizza l'icona di richiesta di avviso vbExclamation - Visualizza l'icona di messaggio di avviso vbInformation - Visualizza l'icona di messaggio di informazione Per fare questo è necessario associare ad un pulsante un Evento routine su click vbOKOnly vbOKCancel vbAbortRe...