Articoli marcati con tag 'moduli'
Sabato 2 maggio, 2009 |
A volte è necessario per evitare una forma aperta se ci sono record per mostrare, ad esempio quando si esegue una query e nessuna registrazione non è necessaria, non abbiamo bisogno di essere forma aperta dal momento che non abbiamo i dati da visualizzare. Quindi quello che dobbiamo verificare è se ci sono record da mostrare e se non vi è mostrare un messaggio e impedire la forma aperta. Come?
E 'facile mettere solo il codice qui sotto nelle proprietà del modulo nel caso in cui il' aprire ':
= 0 Then Se Form.RecordsetClone.RecordCount
MsgBox "Nessun record trovato.", VbExclamation "Errore!"
DoCmd.Close acForm, "trovare i dati"
Exit Sub
End If
Per vedere un esempio scaricare: Prevenire Open Form
Posted in Esempi , i moduli , i Moduli | 2 Commenti »
Giovedi, December 11, 2008 |
1 - Creare un modulo d'ordine nella struttura e l'evento 'Cliccando' sulle proprietà del modulo immettere il seguente: me.keypreview = true
Oppure è questo andare a fare gli eventi della tastiera vengono ricevuti nella prima forma.
2 - Nelle proprietà del modulo, 'bottone qui sotto per' l'evento inserire il seguente codice:
Privato Form_KeyDown Sub (KeyCode As Integer, Shift As Integer)
Seleziona KeyCode Caso
Caso vbKeyF2
DoCmd.OpenForm "Form1"
Caso vbKeyF3
DoCmd.OpenForm "Form2"
Caso vbKeyF4
DoCmd.OpenForm "formulario3"
Caso vbKeyF5
As Double Dim Calculator
Calcolatrice = Shell ("calc.exe", vbNormalFocus)
Caso vbKeyF6
DoCmd.Close
Case Else
End Select
End Sub
Quello che fa è la seguente:
- Premendo il tasto F2 apre la form1
- Premendo il tasto F3 si apre Form2
- Premendo il tasto F4 apre la formulário3
- Premendo il tasto F5 si apre la calcolatrice di Windows
- Premendo il tasto F6 chiude la maschera
Oltre al tasto funzione F1, F2 ... ecc, possiamo anche usare qualsiasi altro tasto per eseguire le funzioni, ma tenendo presente che se vogliamo inserire dati in una forma non adatti utilizzare i tasti che vengono utilizzati per scrivere i dati nei campi.
Un'altra cosa è che funziona solo sul modulo dove si mettono i codici di cui sopra.
Download: Keys
Posted in Esempi , i moduli , i moduli | 1 Commento »
Sabato 20 settembre, 2008 |
Questo è un tipo di menu che ci permette di risparmiare tempo, righe di codice e una disposizione migliore in termini di forme aperte, poiché con questo menu solo bisogno di una forma aperta. Oltre a ridurre il numero di forme aperte diminuisce anche il numero di pulsanti di un menu per aprire ogni modulo.
Questo tipo di menu, certo che esiste da qualche tempo ed è già utilizzato da molti utenti di Access.
Allora, dove è questo menù?
Creiamo il menu utilizzando una casella combinata che contiene tutte le forme che abbiamo in programma di aprire attraverso di essa. Quando si seleziona un'opzione dalla casella combinata il modulo di domanda viene visualizzata all'interno della sottomaschera. Allora cominciamo a fare il passo menù per passo.
1 - Creiamo un tavolo dove verrà memorizzato il nome che vuoi dare ad ogni forma e nome del modulo che si apre. In questo esempio ho creato 'tblmenu' la tabella con i seguenti campi:
Tipo di campo
Nomedomenu testo -> Nome che sarà visibile nel menu (combo box)
sotto forma di testo -> Nome del modulo che si aprirà
Dopo che i dati introdotti nell'esempio sono:
NomedoMenu Form
Conti Form1
Depositi Form2
Movimenti formulario3
Account-Box formulario4
Account-Account formulario5
Estratto formulario6
2 - Poi creiamo una query dalla tabella precedente:
Tblmenu ha scelto la tabella e quindi scegliere i due settori in cui abbiamo scelto per la risalita nomedomenu sorta di essere più facile trovare il menu di un bel paio di volte in cui vogliamo aprire i moduli. Per questa query ho chiamato 'CsMenu'.
3 - Creiamo 'Menu' la forma, vale a dire scegliere nuova maschera in visualizzazione Design. Poi si crea una casella combinata e modificare le seguenti proprietà:
- Numero di colonne: 2
- Larghezza delle colonne: 1cm, 0cm;
- Origine della linea: csmenu (che è il nome della query creata nel paragrafo precedente)
4 - Nello stesso modulo creeremo sottomodulo una maschera non associata principale (nell'esempio ho chiamato menuquadro). E 'questa forma che si aprirà ciascuna delle forme di scegliere dal menu (casella combinata).
5 - Ora create un modulo che ci permetterà di aprire il menu che viene selezionato nella casella combinata nella sottomaschera.
Abbiamo creato un modulo (che ho chiamato 'abrirmenu') e incollate il seguente codice:
AtivarMenu Funzione pubblica (Combmenu Il ComboBox, subabrir La sottomaschera)
Abrirform As String Dim
= Abrirform Combmenu.Column (1)
subabrir.SourceObject = abrirform
subabrir.LinkChildFields = ""
subabrir.LinkMasterFields = ""
End Function
Dopo essere andato alle proprietà della casella combinata nel menu form e il dopo evento di aggiornamento messo il creato funzione: ativarmenu = ([Menu], [menuquadro]), che 'Menu' è il nome della casella combinata e 'menuquadro' l' il nome della sottomaschera.
Infine il menù è pronto all'uso. Basta provare e utilizzare. Spero vi sia piaciuto questo suggerimento.
Download: Menu
Qui di seguito una foto del menu.
Menu personalizzato
Posted in Esempi , i moduli , i Moduli | 12 Commenti »
Martedì 6 maggio 2008 |
Questo esempio mostra come un sistema di gestione per l'erogazione dei pagamenti.
L'esempio mostra che questo è creare e automaticamente con un semplice clic di un pulsante, i benefici di un contratto di vendita attraverso i dati inseriti. Cioè, si introduce il nome del cliente per la data di inizio del contratto e l'importo totale da pagare. Poi basta fare clic su "Calcola pagamenti" che genera automaticamente il numero di rate e divide il valore indicato da ciascuna di esse e calcola la data di ciascuna rata (uno al mese). Questo è anche un esempio che dimostra come aggiungere più record in una sola volta, perché quando si fa clic sul pulsante aggiunge un record per ciascuna prestazione.
Download: Inserire più record
Pubblicato in Appuntamenti , i campioni , i moduli , i moduli , le Records | 17 Commenti »
Sabato 29 Marzo 2008 |
Questo è un esempio dei campi di applicazione che Sónia lettore destinati registrare dati in un database di animali. Si tratta di un semplice database con solo un modulo per l'immissione di dati con una foto dell'animale.
Download: Animal Shelter
Qualsiasi modifica solo commentare qui.
Scritte forme , le foto , i moduli , le Records , i Tavoli | 11 Commenti »
Mercoledì 20 febbraio 2008 |
Ci sono diversi modi per inserire un record, e il più comune è quello di ottenere attraverso una forma associata a una tabella. Un altro modo per farlo è attraverso i campi non collegati, vale a dire utilizzando un modulo con i campi non collegati indipendente al tavolo. A
immettere i dati che utilizzano il 'recordset', cioè da un codice, che nel caso di questo esempio è il seguente:
Dim db As Database
Rs As Recordset
Se MsgBox ("Ti piacerebbe scrivere?" VbYesNoCancel, "Opzioni") = vbYes Poi
"Premendo viene chiesto se per salvare il record o no, in tal caso il codice continua fino alla fine
Set db = CurrentDb ()
Set rs = db.OpenRecordset ("Dati", dbOpenTable)
'Aprire la tabella per inserire i dati registrati
rs.AddNew
rs ("name") = Me! INome
rs ("indirizzo") = Me! Imorada
rs ("età") = Me! Iidade
rs.Update 'invia i dati alla tabella
rs.Close 'cancellare i dati e chiude il recordset
Set rs = Nothing
Set db = Nothing
Me.INome = Null 'cancella i campi del form
Me.Imorada = Null
Me.Iidade = Null
MsgBox "Record salvato", vbInformation, "Fatto" 'messaggio di conferma di visualizzazione
Me.INome.SetFocus 'Sposta il cursore sul primo campo
Exit Sub: Else
End If
Download: Luogo Independent
Posted in Esempi , i moduli , i moduli , i dischi , i tavoli | Nessun Commento »
Martedì, 19 febbraio 2008 |
Questo esempio mostra come eseguire calcoli sulle ore. E 'utile per coloro che hanno bisogno di sapere quanto tempo intercorso tra un orario di inizio e di fine. Non è abbastanza per fare la sottrazione del tempo di fine per l'ora di inizio, perché se l'ora di fine movimento da un giorno ai conti successivi non saranno più corretta, ad esempio:
Ora di inizio: 23:00:00
End Time: 02:00:00
Ora fine - Start Time = 2:00:00-23:00:00 = -21:00:00
Ovviamente non è così semplice per lavorare con il tempo, perché allora invece di avere tre ore al risultato corretto erronea -21 ore.
Per ovviare a questo periodo che va da un giorno all'altro dobbiamo verificare prima se l'ora di fine è maggiore del tempo di avvio, a seconda di quale è maggiore il calcolo è il seguente: Fine - Start Time.
Se hai meno di allora dobbiamo fare il calcolo in un altro modo, e cioè:
Ora di inizio: 23:00:00
End Time: 02:00:00
Total Time: 23:59:59
Hit: 00:00:01
Fondamentalmente quello che facciamo è aggiungere al valore della 24:00:00 sottrazione di darci le corrette tre ore. Cioè:
End Time - Tempo di inizio ore totali + + = Hit 2:00:00-23:00:00 + 23:59:59 + 00:00:01 = 24:00:00 = 03 + -21:00:00 : 00:00
Download: Calcolo con il Tempo
Posted in Esempi , i moduli , le ore , i Moduli | 20 Commenti »
Mercoledì 6 febbraio 2008 |
Questo esempio mostra come per scegliere una data in un calendario PopUp. Cioè, come modulo e può formare una selezione di una data in quanto questo è un calendario. In questo esempio possiamo scegliere la data facendo clic sul pulsante accanto al campo della data o cliccando con il tasto destro del mouse nel campo della data. Questo modo di inserire date è molto pratico in quanto ci permette di vedere un calendario e di scegliere il miglior data desiderata.
Download: PopUp Calendar
Pubblicato in Appuntamenti , i campioni , i moduli , i moduli | 1 Commento »
Domenica, 27 Gennaio 2008 |
Di solito, quando si corre il pulsante centrale del mouse su un modulo, modificare il registro degli accessi. In alcune situazioni può essere utile che ciò non accada.
Questo esempio utilizza un modulo nel caso del modulo da caricare, per impedire all'utente di navigare tra i record utilizzando il mouse. Per testare possiamo usare la rotellina del mouse (tasto centrale) per vedere che non cambia la registrazione.
Scarica qui: rotellina del mouse
Posted in Esempi , i moduli , i moduli , i mouse , le Records | Nessun Commento »
Lunedi, January 21st, 2008 |
Questo esempio utilizza un modulo che nasconde la finestra di accesso principale di Microsoft, lasciando solo la finestra del form visibile.
Per utilizzare questo modulo dobbiamo usare il seguente comando al l'evento di apertura del modulo: fsetAccessWindow chiamata (SW_HIDE).
Per verificare a titolo di esempio, fare il downloa: Manipola Acces finestra
Posted in Esempi , i moduli , i Moduli | 8 Commenti »
