<\/p>\n
Autor: André Minhorst, Duisburg<\/p>\n
<\/b><\/p>\n
Die Developer Edition von Office 2000 bietet einige nützliche Tools für den Entwickler. In loser Folge sollen Sie die unterschiedlichen nützlichen Features der ODE kennenlernen. Ein sehr interessantes Tool ist ein neues Steuerelement namens Microsoft DataGrid Control. Es dient zur Anzeige von Daten in Tabellenform innerhalb von Formularen und kann in manchen Fällen das Einbinden von Unterformularen verhindern. Außerdem bietet es einen nicht zu unterschätzenden Vorteil: Seine Datenherkunft und seine Eigenschaften können während der Laufzeit an die jeweiligen Gegebenheiten angepasst werden.<\/b><\/p>\n
Das Microsoft Datagrid Control dient zur Anzeige von Daten in tabellenähnlichem Format. Wenn Sie bereits einmal eine Auflistung von Daten in einem Formular anzeigen wollten, haben Sie wahrscheinlich eine Vorstellung von den unterschiedlichen Möglichkeiten. Anderenfalls finden Sie in den folgenden Abschnitten einige Alternativen inklusive ihrer Vor- und Nachteile.<\/p>\n
Die Beispiele im vorliegenden Beitrag beziehen sich auf die unterschiedlichen Tabellen der Nordwind-Datenbank. Dabei erstellen die meisten Prozeduren eine Verbindung zu der Datenbank. Damit Sie mit Ihrer Beispieldatenbank problemlos die vorgegebenen Prozeduren verwenden können, erstellen Sie bitte in dem gleichen Verzeichnis, in dem sich auch Ihre Beispieldatenbank befindet, eine Kopie der Nordwind-Datenbank. <\/p>\n
Datenlisten mit einem Endlosformular anzeigen<\/b><\/p>\n
Sie können einerseits die Daten mit Hilfe entsprechender Steuerelemente im Detailbereich des Formulars anordnen. Wenn Sie außerdem die Eigenschaft Standardansicht auf den Wert Endlosformular einstellen, erhalten Sie den gewünschten Effekt (siehe Bild 1). Der Nachteil liegt darin, dass Sie weitere Steuerelemente nur ober- oder unterhalb von der Datensatzliste im Kopf- oder Fußbereich anlegen können.<\/p>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic001.png\")
<\/p>\n
<\/b><\/p>\n
Bild 1: Datensatzliste im Detailbereich<\/span><\/b><\/p>\n Datenlisten in der Datenblattansicht anzeigen<\/b><\/p>\n Das funktioniert auch, in dem Sie einfach die gewünschten Felder aus der Feldliste in den Detailbereich des Formulars ziehen und die Eigenschaft Standardansicht auf den Wert Datenblattansicht einstellen (siehe Bild 2). Auch hier gibt es einen Nachteil: Sie können im Formular gar keine weiteren Steuerelemente mehr anlegen, da es diese nicht anzeigt. Die Alternative ist, das Formular als Unterformular in einem anderen Formular anzulegen und dort die gewünschten Steuerelemente zu platzieren.<\/p>\n <\/b><\/p>\n Bild 2: Datensätze in der Datenblattansicht<\/span><\/b><\/p>\n Daten per Listenfeld anzeigen<\/b><\/p>\n Die dritte Möglichkeit ist der Einsatz des Listenfeldes. Mit einem Listenfeld lassen sich zwar Daten anzeigen und auch einzelne Datensätze auswählen, aber es ist kein Hinzufügen, Löschen oder Bearbeiten der Daten möglich.<\/p>\n Daten mit dem Microsoft DataGrid-Steuerelement anzeigen<\/b><\/p>\n Eine neue Möglichkeit ist die Anzeige von Datenlisten in einem separaten Steuerelement – dem Microsoft DataGrid-Steuerelement.<\/p>\n Das Microsoft DataGrid-Steuerelement ist Bestandteil von Office 2000 Developer sowie von einigen Visual Basic-Paketen. Sie können es problemlos einsetzen, wenn eines der genannten Pakete auf Ihrem Rechner installiert ist. <\/p>\n Um die Funktionsweise des DataGrid-Steuerelements zu testen, erstellen Sie zunächst ein neues Formular. Gehen Sie dann folgendermaßen vor:<\/p>\n <\/b><\/p>\n Bild 3: Dialog zur Auswahl eines ActiveX-Steuerelements<\/span><\/b><\/p>\n Bevor Sie weitere Schritte unternehmen, sollten Sie dem Steuerelement zunächst einen sinnvollen Namen zuweisen, z.B. ocxDataGrid.<\/p>\n Speichern Sie außerdem das Formular unter dem Namen frmArtikelDataGrid.<\/p>\n Nun sollen Sie das neue Steuerelement mit Daten füllen. Im Beispiel soll das DataGrid alle Artikel der Tabelle Artikel anzeigen.<\/p>\n üblicherweise verfügen Steuerelemente über eine oder mehrere Eigenschaften, mit denen man die anzuzeigenden Daten festlegen kann. Wenn Sie die Eigenschaften des DataGrid-Steuerelements anzeigen und in das Register Daten wechseln, finden Sie keine derartige Eigenschaft (siehe Bild 4).<\/p>\n <\/b><\/p>\n Bild 4: Daten-Eigenschaften des DataGrid-Steuerelements<\/span><\/b><\/p>\n Statt dessen benötigen Sie eine Prozedur zum Zuweisen der gewünschten Daten. Das Formular soll die Prozedur beim Laden aufrufen. Sie müssen die Prozedur also für die Ereigniseigenschaft Beim Laden des Formulars hinterlegen.<\/p>\n Damit später keine Probleme auftreten, sollten Sie beim Entladen des Formulars – also z.B. wenn Sie es schließen oder in die Entwurfsansicht wechseln – die gesetzten Objektvariablen wieder löschen. Legen Sie daher für die Ereigniseigenschaft Beim Entladen die folgende Prozedur an:<\/p>\n Schließlich fehlt noch die Deklaration der beiden Objektvariablen für die Verbindung und für die Datensatzgruppe. Deklarieren Sie die beiden Variablen am Besten im Kopf des Formularmoduls:<\/p>\n Wenn Sie das Formular nun in der Formularansicht anzeigen, haben Sie bereits ein ordentliches Ergebnis (siehe Bild 5).<\/p>\n <\/b><\/p>\n Bild 5: Ein mit Daten gefülltes DataGrid<\/span><\/b><\/p>\n Leider können Sie in dieser Form nicht auf die entsprechenden Einträge der Tabellen Lieferanten und Kategorien zugreifen. Dadurch zeigt das DataGrid-Steuerelement nur die Datensatznummern der entsprechenden Tabellen an.<\/p>\n Leider können Sie mit dem DataGrid-Steuerelement nur die Inhalte der Felder von Tabellen oder Abfragen anzeigen, nicht aber den Inhalt verknüpfter Tabellen oder eingebettete Objekte.<\/p>\n Wenn Sie statt der Datensatznummern die Bezeichnungen der Kategorie und des Lieferanten anzeigen möchten, müssen Sie eine geeignete Abfrage erstellen. Die Abfrage soll die Tabellen Artikel, Kategorien und Lieferanten enthalten. Sie haben zwei Möglichkeiten, die gewünschte Abfrage zu verwenden. Entweder Sie erstellen einen geeigneten SQL-String und setzen ihn direkt in die Open-Anweisung ein oder Sie erstellen die Abfrage in der Nordwind-Datenbank selbst und verweisen von der Open-Anweisung aus auf die Abfrage.<\/p>\n <\/p>\n Um den gewünschten SQL-Befehl zu erhalten, müssen Sie kein SQL-Profi sein. Gehen Sie einfach folgendermaßen vor:<\/p>\n Nachdem Sie die Anweisung in die Zwischenanlage kopiert haben, können Sie die Nordwind-Datenbank schließen.<\/p>\n Nun müssen Sie die Anweisung noch in die entsprechende Zeile der Prozedur Form_Load einsetzen:<\/p>\n Ersetzen Sie den Befehl<\/p>\n durch die folgende Anweisung, wobei Sie statt dem Platzhalter <SQL-Anweisung> den entsprechenden String einsetzen:<\/p>\n Leider treten mitunter Fehler bei der Bearbeitung langer SQL-Anweisungen auf. Daher sollten Sie im vorliegenden Fall eine Alternative wählen: Legen Sie einfach eine neue Abfrage mit den gewünschten Feldern der drei Tabellen in der Nordwind-Datenbank an und speichern Sie die unter dem Namen qryArtikel. Dementsprechend ersetzen Sie den Platzhalter <SQL-Anweisung> durch den String „qryArtikel“.<\/p>\n Das angezeigte Ergebnis sieht nun schon ansprechender aus (siehe Bild 6). Leider ist die Spaltenüberschrift etwas misslungen.<\/p>\n <\/b><\/p>\n Bild 6: Anzeige der Artikel mit Kategorie und Lieferant<\/span><\/b><\/p>\n Die überschrift einer Spalte können Sie mit einer einfachen Zuweisung des gewünschten Wertes ändern. Dazu verwenden Sie die Caption-Eigenschaft der gewünschten Spalte. In der Regel sind die Spalten des DataGrid-Steuerelements in der vorliegenden Reihenfolge durchnummeriert. Die Nummerierung beginnt dabei mit der Nummer 0.<\/p>\n Im vorliegenden Fall müssen Sie also die Spalten 2 und 3 anpassen. Dazu fügen Sie der Prozedur Form_Load des Formulars die folgenden zwei Zeilen hinzu:<\/p>\n Nun stimmen auch die überschriften der angezeigten Spalten(siehe Bild 7).<\/p>\n <\/b><\/p>\n Bild 7: Das DataGrid mit den richtigen Spaltenüberschriften<\/span><\/b><\/p>\n Sie können auch noch einige andere Eigenschaften der unterschiedlichen Spalten anpassen. Um die Anpassung der Eigenschaften zu testen, legen Sie einige neue Schaltflächen in dem Formular an.<\/p>\n Im ersten Beispiel sollen Sie mit Hilfe eines Kombinationsfeldes und einer Schaltfläche einzelne Spalten des DataGrids ein- und ausblenden.<\/p>\n Erstellen Sie dazu zunächst ein Kombinationsfeld namens cmbSpalten. Setzen Sie die Eigenschaft Herkunftstyp des Kombinationsfeldes auf den Wert Wertliste. Fügen Sie anschließend eine Schaltfläche mit der Bezeichnung btnSpaltenAusEinblenden ein.<\/p>\n Nun müssen Sie die beiden Steuerelemente noch so konfigurieren, dass Sie damit die gewünschte Spalte auswählen und sie ein- oder ausblenden können.<\/p>\n Dazu füllen Sie das Kombinationsfeld mit den Namen der Spalten des DataGrid. Erforderlich ist dazu die folgende Prozedur:<\/p>\n Die Prozedur liest nacheinander die einzelnen Spaltenbeschriftungen des Datagrid aus und setzt sie zu einer Zeichenfolge der folgenden Form zusammen:<\/p>\n „Spaltenname1″;“Spaltenname2“;…<\/p>\n Anschließend fügt es die Zeichenfolge in die Datenherkunft des Kombinationsfeldes ein. Falls die Eigenschaft Herkunftstyp auf Wertliste eingestellt ist, erhalten Sie ein Resultat ähnlich Bild 8).<\/p>\n <\/b><\/p>\n Bild 8: Kombinationsfeld zur Auswahl ein- und auszublendender Spalten<\/span><\/b><\/p>\n Selbstverständlich müssen Sie noch einen Aufruf für die Prozedur SpaltenEinlesen in der Prozedur Form_Load unterbringen – und zwar am Ende der Prozedur, da die Felder des DataGrid zuvor gefüllt werden müssen.<\/p>\n Schließlich versehen Sie die Schaltfläche btnSpaltenEinAusblenden noch mit entsprechender Funktionalität. Setzen Sie für die Ereigniseigenschaft Beim Klicken der Schaltfläche die folgende Prozedur ein:<\/p>\n Die Prozedur fragt zunächst ab, ob der Anwender eine Spalte aus dem Kombinationsfeld ausgewählt hat. Anschließend blendet die Prozedur die gewählte Spalte ein oder aus – je nachdem, wie der aktuelle Zustand der Spalte ist.<\/p>\n Die Auswahl der ein- oder auszublendenden Spalte soll jedoch nicht nur über das Kombinationsfeld erfolgen. Auch ein Klick auf die entsprechende Spalte soll die Anzeige des Spaltennamens im Kombinationsfeld bewirken. Für diesen Zweck stellt das DataGrid-Steuerelement bestimmte Ereigniseigenschaften zur Verfügung. Im vorliegenden Fall handelt es sich um die Eigenschaft HeadClick. Um die Ereignisprozedur anwenden zu können, legen Sie sie in folgender Art an:<\/p>\n Die Prozedur weist dem Kombinationsfeld cmbSpalten die Spaltenüberschrift der ausgewählten Spalte zu.<\/p>\n Mit den voreingestellten Parametern ist eine vernünftige Navigation durch die Felder der einzelnen Datensätze nicht möglich. Die einzige Möglichkeit, ein Feld zu markieren, ist ein Mausklick in das gewünschte Feld.<\/p>\n Um auch mit den Pfeiltasten von Feld zu Feld navigieren zu können, müssen Sie die Eigenschaft AllowArrows auf den Wert True setzen. Fügen Sie die folgende Anweisung am Ende der Prozedur Form_Open des Formulars frmArtikelDataGrid ein:<\/p>\n Mit der Tabulatortaste können Sie weiterhin von Steuerelement zu Steuerelement navigieren. <\/p>\n Das DataGrid-Steuerelement stellt die beiden Eigenschaften Row und Col für die Ermittlung der Koordinaten eines Feldes als auch für das Festlegen eines Feldes zur Verfügung.<\/p>\n Die folgende Prozedur beispielsweise zeigt ein Meldungsfenster mit den Koordinaten des aktuell markierten Feldes an (siehe Bild 9):<\/p>\n <\/b><\/p>\n Bild 9: Ausgabe der aktuellen Koordinaten<\/span><\/b><\/p>\n Bearbeiten von Daten im DataGrid-Steuerelement<\/b><\/p>\n Neben dem Betrachten von Daten bietet das DataGrid-Steuerelement auch die Möglichkeit, Daten zu ändern, hinzuzufügen oder zu löschen. Leider gestaltet sich das Bearbeiten von Daten aus solchen Datenquellen wie z.B. Abfragen oder Tabellen mit Nachschlagefeldern als problematisch. Der Grund liegt in der fehlenden Fähigkeit des DataGrid-Steuerelementes, verknüpfte Daten anzuzeigen. Für die folgenden Beispiele ändern Sie daher am Besten die Datenherkunft und verwenden die Tabelle Personal der Nordwind-Datenbank. Sie müssen dazu lediglich den Namen der Tabelle in der Prozedur Form_Open ändern.<\/p>\n Bevor Sie änderungen an Daten im DataGrid-Steuerelement vornehmen können, müssen Sie die Eigenschaft AllowUpdate auf den Wert True einstellen. Fügen Sie daher den folgenden Befehl am Ende der Prozedur Form_Load des Formulars frmArtikelDataGrid ein:<\/p>\n ändern Sie anschließend testweise einen Wert eines beliebigen Datensatzes. Sie übernehmen die änderung in die zugrundeliegende Tabelle, indem Sie mit der Maus in eine andere Zeile klicken.<\/p>\n Wenn Sie Werte ändern, die nicht geändert werden können – z.B. der Primärindex als Autowert – erscheint wie in Access selbst eine entsprechende Fehlermeldung (siehe Bild 10). Dummerweise können Sie solche änderungen nicht – wie in herkömmlichen Tabellen – durch Betätigen der Escape-Taste rückgängig machen. Anscheinend handelt es sich hier um einen Bug.<\/p>\n <\/b><\/p>\n Bild 10: Fehlermeldung beim ändern eines Autowertes<\/span><\/b><\/p>\n Die übernahme eines aktualisierten Datensatzes erfolgt nur, wenn Sie die Aktualisierung durch den Wechsel in eine andere Zeile quittieren. Wenn Sie nach der Aktualisierung beispielsweise ein anderes Steuerelement aktivieren oder das Formular schließen, übernimmt das DataGrid die Aktualisierung nicht in die Datenherkunft. <\/p>\n Wenn Sie mit Hilfe des DataGrid neue Datensätze hinzufügen möchten, müssen Sie zuvor die Eigenschaft AllowAddNew auf den Wert True setzen. Dadurch zeigt das DataGrid unterhalb des letzten Datensatzes in der Liste eine leere Zeile für einen neuen Datensatz an (siehe Bild 11).<\/p>\n <\/b><\/p>\n Bild 11: Neue Zeile zum Hinzufügen eines neuen Datensatzes<\/span><\/b><\/p>\n Damit das DataGrid-Steuerelement das Löschen von Daten zulässt, müssen Sie auch hier die entsprechende Eigenschaft setzen.<\/p>\n Damit ein Datensatz, der vom Benutzer aus dem DataGrid gelöscht wird, auch aus der Datenherkunft – also der Herkunftstabelle oder -abfrage – verschwindet, setzen Sie zunächst die Eigenschaft AllowDelete auf den Wert True.<\/p>\n Anschließend können Sie die zu löschende Zeile markieren und mit der Entfernen-Taste löschen.<\/p>\n Verwenden des DataGrid-Steuerelements zur Anzeige bestimmter Datensätze<\/b><\/p>\n Sie können das DataGrid-Steuerelement auch dazu verwenden, nur bestimmte Datensätze anzuzeigen.<\/p>\n Im folgenden Beispiel soll weiterhin die Tabelle Personal als Datenherkunft dienen. <\/p>\n Im vorliegenden Fall verwenden Sie einen zusammengesetzten Filter zum Ermitteln bestimmter Datensätze.<\/p>\n Legen Sie zunächst zwei Textfelder namens txtVorname und txtNachname sowie zwei Schaltflächen mit den Bezeichnungen btnFilterAnwenden und btnFilterLöschen gemäß Bild 12 an.<\/p>\n Für die Beim Klicken-Ereigniseigenschaft der Schaltfläche btnFilterAnwenden hinterlegen Sie die folgende Ereignisprozedur:<\/p>\n <\/b><\/p>\n Bild 12: Steuerelemente zum Filtern von Datensätzen<\/span><\/b><\/p>\n Die Prozedur überprüft, ob die beiden Textfelder Vergleichskriterien enthalten. Dementsprechend setzt die Prozedur einen geeigneten Filterstring zusammen und wendet den Filter auf die Datenherkunft des DataGrid-Steuerelements an.<\/p>\n Auch die Schaltfläche btnFilterLöschen soll mit einer Prozedur versehen werden:<\/p>\n Die Prozedur löscht den Filter der Datenherkunft und aktualisiert sie.<\/p>\n Wenn Sie nun den gewünschten Ausdruck für die beiden Filterfelder eingeben, zeigt das DataGrid die entsprechenden Datensätze an.<\/p>\n Wenn Sie beim Ausprobieren des Filters eine Fehlermeldung erhalten, schließen Sie das Formular und öffnen es erneut. Anschließend sollte der Filter anstandslos funktionieren. <\/p>\n","protected":false},"excerpt":{"rendered":" Die Developer Edition von Microsoft Office 2000 bietet einige nützliche Tools für den Entwickler. In loser Folge sollen Sie die unterschiedlichen nützlichen Features der ODE kennen lernen. Ein sehr interessantes Tool ist ein neues Steuerelement namens Microsoft DataGrid Control. Es dient zur Anzeige von Daten in Tabellenform innerhalb von Formularen und kann in manchen Fällen das Einbinden von Unterformularen verhindern. Außerdem bietet es einen nicht zu unterschätzenden Vorteil: Seine Datenherkunft und seine Eigenschaften können während der Laufzeit an die jeweiligen Gegebenheiten angepasst werden.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"om_disable_all_campaigns":false,"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":""},"categories":[66022001,662001,44000023],"tags":[],"class_list":["post-55000010","post","type-post","status-publish","format-standard","hentry","category-66022001","category-662001","category-Mit_Formularen_arbeiten"],"yoast_head":"\n![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic002.png\")
<\/p>\nHinweis<\/h3>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic003.png\")
<\/p>\nDataGrid-Steuerelement mit Daten füllen<\/h3>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic004.png\")
<\/p>\nPrivate Sub Form_Load()\r\n \r\n Set rst = New ADODB.Recordset\r\n Set con = New ADODB.Connection\r\n \r\n con.Provider = \"Microsoft.jet.oledb.4.0\"\r\n con.CursorLocation = adUseClient\r\n con.Open CurrentProject.Connection\r\n \r\n Set rst.ActiveConnection = con\r\n rst.CursorType = adOpenStatic\r\n rst.LockType = adLockOptimistic\r\n \r\n rst.Open \"qryArtikel\", , , , adCmdTable\r\n \r\n Set ocxDataGrid.DataSource = rst\r\n \r\n Set Me.Recordset = rst\r\n \r\nEnd Sub<\/pre>\n
Private Sub Form_Unload(Cancel As Integer)\r\n Set rst = Nothing\r\n con.Close\r\n Set con = Nothing\r\nEnd Sub<\/pre>\n
Dim con As ADODB.Connection\r\nDim rst As ADODB.Recordset<\/pre>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic005.png\")
<\/p>\nHinweis<\/h3>\n
rst.Open \"Artikel\", , , , adCmdTable<\/pre>\n
rst.Open \"<SQL-Anweisung>\", , , , adCmdTable<\/pre>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic006.png\")
<\/p>\nändern einer Spaltenüberschrift<\/h3>\n
ocxDataGrid.Columns(2).Caption = \"Kategorie\"\r\nocxDataGrid.Columns(3).Caption = \"Lieferant\"<\/pre>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic007.png\")
<\/p>\nEin- und Ausblenden einer Spalte<\/h3>\n
Sub SpaltenEinlesen()\r\n Dim Spalte As Column\r\n Dim Spaltenliste As String\r\n \r\n For Each Spalte In Me.ocxDataGrid.Columns\r\n \r\n Spaltenliste = Spaltenliste & \";\" & \"\"\"\" & Spalte.Caption & \"\"\"\"\r\n \r\n Next Spalte\r\n Me!cmbSpalten.RowSource = Mid(Spaltenliste, 2, Len(Spaltenliste))\r\nEnd Sub<\/pre>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic008.png\")
<\/p>\nPrivate Sub btnSpaltenEinAusblenden_Click()\r\n If IsNull(Me!cmbSpalten) Then\r\n MsgBox \"Bitte wählen Sie zunächst die ein-\/auszublendende Spalte aus.\", vbOKOnly, \"Keine Spalte ausgewählt\"\r\n Exit Sub\r\n End If\r\n If Me.ocxDataGrid.Columns(cmbSpalten).Visible = True Then\r\nMe.ocxDataGrid.Columns(cmbSpalten).Visible = False\r\n Else\r\nMe.ocxDataGrid.Columns(cmbSpalten).Visible = True\r\n End If\r\nEnd Sub<\/pre>\n
Private Sub ocxDataGrid_HeadClick(ByVal ColIndex As Integer)\r\n Me!cmbSpalten = Me!ocxDataGrid.Columns(ColIndex).Caption\r\nEnd Sub<\/pre>\n
Navigieren durch Felder und Datensätze<\/h3>\n
Me!ocxDataGrid.AllowArrows = True<\/pre>\n
Zugriff auf einzelne Felder<\/h3>\n
Private Sub _\r\n btnZellenkoordinatenAusgeben_Click()\r\n MsgBox \"Die Koordinaten des aktuellen Feldes lauten: \" & vbCrLf & \"Zeile: \" & ocxDataGrid.Row & vbCrLf & \"Spalte: \" &ocxDataGrid.Col, vbOKOnly, \"Feldkoordinaten\"\r\nEnd Sub<\/pre>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic009.png\")
<\/p>\nändern eines Datensatzes<\/h3>\n
Me!ocxDataGrid.AllowUpdate = True<\/pre>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic010.png\")
<\/p>\nHinweis<\/h3>\n
Hinzufügen eines Datensatzes<\/h3>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic011.png\")
<\/p>\nLöschen eines Datensatzes<\/h3>\n
Private Sub btnFilterAnwenden_Click()\r\n Dim Filterstring As String\r\n If Not IsNull(txtVorname) Then\r\n Filterstring = \"Vorname LIKE ''\" & txtVorname & \"''\"\r\n End If\r\n If Not IsNull(txtVorname) And Not IsNull(txtNachname) Then\r\n Filterstring = Filterstring & \" AND \"\r\n End If\r\n If Not IsNull(txtNachname) Then\r\n Filterstring = Filterstring & \"Nachname LIKE ''\" & txtNachname & \"''\"\r\n End If\r\n rst.Filter = Filterstring\r\n rst.Requery\r\nEnd Sub<\/pre>\n
![](\"..\/fileadmin\/_temp_\/{EE8EE4A9-9350-4A1C-B4B8-0DDC6777304B}\/pic012.png\")
<\/p>\nPrivate Sub btnFilterLöschen_Click()\r\n rst.Filter = adFilterNone\r\n rst.Requery\r\nEnd Sub<\/pre>\n
Hinweis<\/h3>\n