Posts Tagged 'Module'
Samstag, 2 Mai, 2009 |
Manchmal ist es notwendig, ein Formular zu öffnen verhindern, wenn es Aufzeichnungen zu zeigen, zum Beispiel, wenn dabei eine Abfrage und eine Registrierung ist nicht erforderlich sind, brauchen wir nicht zu offenen Form sein, da wir keine Daten angezeigt werden müssen. Also, was wir haben, um zu überprüfen ist, ob es Aufzeichnungen zu zeigen, und wenn es keine zeigen eine Meldung an und behindern das Formular geöffnet. Wie?
Es ist leicht, einfach den folgenden Code in den Eigenschaften des Formulars für den Fall 'zu öffnen ":
= 0 Then Wenn Form.RecordsetClone.RecordCount
MsgBox "Keine Datensätze gefunden.", VbExclamation, "Fehler!"
DoCmd.Close acForm, "Daten zu finden"
Exit Sub
End If
Um ein Beispiel zu sehen, herunterladen: Verhindern Formular öffnen
Posted in Beispiele , Formulare , Module | 2 Kommentare »
DONNERSTAG, 11 Dezember, 2008 |
1 - Erstellen Sie ein Bestellformular, in Struktur und Ereignis "Klick" auf die Eigenschaften des Formulars geben Sie den folgenden: me.keypreview = true
Oder ist das hier machen die Tastatur-Ereignisse in der ersten Form empfangen werden.
2 - In den Eigenschaften des Formulars, das Ereignis 'Button unten, um "den folgenden Code:
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Fall vbKeyF2
DoCmd.OpenForm "Form1"
Fall vbKeyF3
DoCmd.OpenForm "Form2"
Fall vbKeyF4
DoCmd.OpenForm "formulario3"
Fall vbKeyF5
As Double Dim Rechner
Rechner = Shell ("calc.exe", vbNormalFocus)
Fall vbKeyF6
DoCmd.Close
Case Else
End Select
End Sub
Was dieses tut, ist die folgende:
- Durch Drücken der F2-Taste öffnet das Form1
- Durch Drücken der F3-Taste öffnet Form2
- Durch Drücken der F4-Taste öffnet das formulário3
- Durch Drücken der F5-Taste öffnet den Windows-Rechner
- Durch Drücken der Taste F6, schließt die Form
Neben der Funktionstaste F1, F2 ... etc, können wir auch jede andere Taste, um Funktionen zu erfüllen, aber in Anbetracht, dass, wenn wir die Daten in einer Form nicht geeignet, um Schlüssel, die verwendet werden, um Daten in den Feldern zu schreiben sind, nutzen zu betreten.
Eine andere Sache ist, dass es funktioniert nur auf dem Formular, wo Sie die oben genannten Codes.
Herunterladen: Keys
Posted in Beispiele , Formulare , Module | 1 Kommentar »
Samstag, 20 September, 2008 |
Dies ist eine Art Menü, das uns zu der Zeit, Codezeilen und eine bessere Anordnung in Bezug auf die offenen Formen zu sparen, da mit diesem Menü müssen nur eine offene Form ermöglicht. Neben der Verringerung der Zahl der offenen Formen nimmt auch die Anzahl der Tasten in einem Menü, jedes Formular zu öffnen.
Diese Art von Menü, das sicherlich schon seit einiger Zeit bestanden und wird bereits von vielen Benutzern von Access verwendet.
Also, wo ist dieses Menü?
Wir erstellen nun ein Menü mit einer Combo-Box, die alle Formen, die wir planen, um durch sie zu öffnen enthält. Wenn Sie eine Option wählen Sie aus der Combo-Box das Antragsformular wird innerhalb des Unterformulars angezeigt. Dann beginnen wir, um das Menü Schritt für Schritt zu machen.
1 - Lasst uns eine Tabelle erstellen, in dem wir den gewünschten Namen, um jede Form und Namen des Formulars gehen Sie auf geben gespeichert werden. Im Beispiel habe ich die Tabelle 'tblmenu' mit den folgenden Feldern:
Feldtyp
Nomedomenu Text -> Name, der im Menü zu sehen sein wird (Combobox)
Text bilden -> Name des Formulars gehen Sie auf
Nachdem die Daten in dem Beispiel aufgeführt:
NomedoMenu Formular
Konten Form1
Einlagen Form2
Movements formulario3
Konto-Box formulario4
Konto-Konto formulario5
Auszug formulario6
2 - Dann erstellen wir eine Abfrage aus der obigen Tabelle:
Tblmenu entschied sich für die Tabelle und wählen Sie dann die beiden Felder, in denen wir für aufsteigend sortieren nomedomenu leichter zu sein, finden Sie das Menü schon ein paar Mal, wenn wir zu Formen öffnen wollen wählte. Um diese Abfrage Ich rief 'CSMenu'.
3 - Lassen Sie uns das Formular "Menü", wählen Sie also neue Formular in der Entwurfsansicht. Dann erstellen wir eine Combo-Box und die folgenden Eigenschaften:
- Anzahl der Spalten: 2
- Spaltenbreiten: 1cm, 0cm;
- Herkunft der Linie: CSMenu (das ist der Name der Abfrage im vorherigen Absatz erstellt)
4 - In der gleichen Form werden wir ein ungebundenes Hauptformular das Unterformular zu erstellen (Im Beispiel habe ich genannt menuquadro). Es ist diese Form, die gleichzeitig geöffnet wird jede der Formen aus dem Menü (Combobox) wählen.
5 - Erstellen Sie nun ein Modul, das es uns ermöglichen, das Menü, das im Kombinationsfeld im Unterformular gewählt wird geöffnet.
Wir haben ein Modul (was ich 'abrirmenu' genannt) und klebte den folgenden Code:
Public Function AtivarMenu (Combmenu die ComboBox, subabrir Das Unterformular)
Abrirform As String Dim
= Combmenu.Column abrirform (1)
subabrir.SourceObject = abrirform
subabrir.LinkChildFields = ""
subabrir.LinkMasterFields = ""
End Function
Nachdem wir zu den Eigenschaften der Combobox auf dem Formular-Menü und die Veranstaltung nach dem Update stellen die geschaffene Funktion: ativarmenu = ([Menu], [menuquadro]), dass "Menü" der Name der Combo-Box und 'menuquadro' ist der Name des Unterformular.
Und schließlich ist das Menü einsatzbereit. Versuchen Sie einfach und zu verwenden. Ich hoffe euch hat diesen Tipp.
Download: Menu
Hier ein Bild des Menüs.
Custom Menu
Posted in Beispiele , Formulare , Module | 12 Kommentare »
Dienstag 6 Mai, 2008 |
Dieses Beispiel zeigt, wie ein Management-System für die Bereitstellung von Zahlungen.
Das Beispiel zeigt, dass dies erstellen und automatisch ist mit einem Klick auf eine Schaltfläche, trat die Vorteile eines Kaufvertrags, der durch die Daten. Das heißt, führen wir den Namen des Clients an den Vertragsbeginn und dem zu zahlenden Gesamtbetrag. Dann klicken Sie einfach auf den "berechnen Zahlungen", die es generiert automatisch die Anzahl der Raten und teilt den Wert von jedem von ihnen angegeben und berechnet den Zeitpunkt der einzelnen Tranchen (eine pro Monat). Dies ist auch ein Beispiel dafür, wie mehrere Datensätze auf einmal hinzufügen, weil, wenn Sie auf die Schaltfläche klicken es einen Datensatz für jeden Nutzen fügt demonstriert.
Herunterladen: Mehrere Datensätze einfügen
Posted in Termine , Proben , Formulare , Module , Aufzeichnungen | 17 Kommentare »
Samstag, 29 März, 2008 |
Dies ist ein Beispiel der Anwendungsfelder, dass Sonia Lesegerät für einen Datenbank-Eintrag Daten von Tieren bestimmt sind. Es ist eine einfache Datenbank mit nur einem Formular für die Dateneingabe mit einem Foto des Tieres.
Download: Animal Shelter
Jede Änderung einfach hier kommentieren.
Geschrieben Formulare , Fotos , Module , Aufzeichnungen , Tabellen | 12 Kommentare »
Mittwoch, 20 Februar, 2008 |
Es gibt mehrere Möglichkeiten, um einen Datensatz eingeben, und die häufigste ist es, durch eine Form, gebunden an einen Tisch zu bekommen. Eine andere Möglichkeit, dies zu tun ist über unabhängige Felder, dh über ein Formular mit Feldern unabhängig in keinem Zusammenhang mit der Tabelle. Zu
geben die Daten verwenden wir die "Cord", dh durch einen Code, der im Fall dieses Beispiels ist wie folgt:
Dim db As Database
Dim rs As Recordset
If MsgBox ("Möchten Sie schreiben?" VbYesNoCancel, "Optionen") = vbYes Then
"Durch Drücken wird gefragt, ob Sie den Datensatz zu speichern oder nicht, wenn der Code so lange fortgesetzt, bis Ende
Set db = CurrentDb ()
Set rs = db.OpenRecordset ("Daten", dbOpenTable)
"Öffnen Sie die Tabelle einfügen das Datenregister
rs.addNew
rs ("name") = Me! INome
rs ("Adresse") = Me! Imorada
rs ("Alter") = Me! Iidade
rs.Update 'sendet die Daten an die Tabelle
rs.Close "löschen Sie die Daten und schließt das Recordset
Set rs = Nothing
Set db = Nothing
Me.INome = NULL 'löscht die Felder im Formular
Me.Imorada = Null
Me.Iidade = Null
MsgBox "Datensatz gespeichert", vbInformation, "Display Bestätigungsmeldung" Fertig "
Me.INome.SetFocus 'Bewegen Sie den Cursor zum ersten Feld
Else: Exit Sub
End If
Download: Platz Unabhängige
Posted in Beispiele , Formulare , Module , Aufzeichnungen , Tabellen | Keine Kommentare »
Dienstag 19 Februar, 2008 |
Dieses Beispiel zeigt, wie Berechnungen auf Stunden durchzuführen. Es ist nützlich für diejenigen, die wissen, wie viel Zeit zwischen einem Start-und Endzeit abgelaufen benötigen. Es reicht nicht aus, um die Subtraktion der Endzeit für die Startzeit zu machen, denn wenn das Ende der Zeit bewegt von einem Tag auf den nächsten Konten werden nicht mehr korrekt, zum Beispiel:
Startzeit: 23.00.00
Endzeit: 02:00:00
Endzeit - Startzeit = 2.00.00 bis 23.00.00 = -21:00:00
Offensichtlich ist es nicht so einfach mit der Zeit zu arbeiten, weil dann statt mit drei Stunden, um korrekte Ergebnis wäre falsch -21 Stunden.
Um dieses Zeitraums, die von Tag zu Tag haben wir erst prüfen, ob das Ende der Zeit größer ist als die Startzeit, der größere Wert gilt dann bekommen die Berechnung lautet: Endzeit - Startzeit.
Wenn Sie unter dann sind wir zu tun haben, die Berechnung einen anderen Weg, nämlich:
Startzeit: 23.00.00
Endzeit: 02:00:00
Gesamtzeit: 23.59.59
Hit: 00.00.01
Im Grunde, was wir tun, ist hinzuzufügen, um den Wert von 24:00:00 Subtraktion, um uns die richtigen drei Stunden. Das heißt:
Endzeit - Startzeit + Total Hours + Hit = 2.00.00 bis 23.00.00 + 23.59.59 + 00.00.01 = 24:00:00 = 03 + -21:00:00 : 00:00
Download: Calculus mit Time
Posted in Beispiele , Formulare , Öffnungszeiten , Module | 21 Kommentare »
Mittwoch 6 Februar, 2008 |
Dieses Beispiel zeigt, wie man ein Datum über einen Popup-Kalender wählen. Das heißt, als ein Modul und kann eine Auswahl eines Datums bilden, da dies ein Kalender. In dem Beispiel können wir das Datum durch Klicken auf die Schaltfläche neben dem Feld Datum oder Klicken mit der rechten Taste der Maus in das Feld Datum zu wählen. Dieser Weg, um Daten einzugeben ist sehr praktisch, da es uns um einen Kalender zu sehen und die besten gewünschte Datum auswählen können.
Download: Popup-Kalender
Posted in Termine , Proben , Formulare , Module | 1 Kommentar »
SONNTAG, 27 Januar, 2008 |
Normalerweise, wenn wir die mittlere Taste einer Maus laufen auf einem Formular, ändern Sie das Zugriffsprotokoll. In manchen Situationen kann es nützlich sein, dass das nicht geschieht.
In diesem Beispiel wird ein Modul für den Fall des Formulars, um zu laden, um zu verhindern, der Benutzer durch die Datensätze mit den Scroll-Maus navigieren. Um zu testen, können wir mit dem Mausrad (mittlere Taste), um zu sehen, das ändert nichts an der Registrierung.
Download hier: Wheel-Maus
Posted in Beispiele , Formulare , Module , Maus , Aufzeichnungen | Keine Kommentare »
Montag 21 Januar, 2008 |
In diesem Beispiel wird ein Modul, das das Microsoft Access-Hauptfenster versteckt, so dass nur das Fenster des Formulars sichtbar.
Aufruf fsetAccessWindow (SW_HIDE): Um dieses Modul müssen wir den folgenden Befehl an der Eröffnungsveranstaltung der Form Gebrauch zu verwenden.
Um beispielhaft zu überprüfen gehen Sie downloa: Manipulieren Fenster Acces
Posted in Beispiele , Formulare , Module | 8 Kommentare »
