![\"Unterschiedliche](\"..\/tl_files\/images\/frmTest_RT1.png\")
<\/a><\/p>\nBild 1: Unterschiedliche Wertebereiche können im Testformular mithilfe der vier Range Controls mit der Maus über Ziehpunkte eingestellt werden<\/p>\n
Ein Anwendungsfall für derartige Steuerelemente wäre etwa die Filterung von Datensätzen. Im Datenblatt von Access können Sie bereits, je nach Felddatentyp, Wertebereiche zur Filterung der Anzeige bestimmen. Klicken Sie etwa, wie im Datenblatt zur Tabelle tblArtikel<\/b> in Bild 2, auf den Dropdown-Pfeil des Spaltenkopfs zu Einzelpreisen<\/b>. Es öffnet sich das Filtermenü mit diversen Möglichkeiten. Um einen Zahlenbereich festzulegen navigieren Sie über Zahlenfilter<\/b> auf den Untermenüeintrag Zwischen…<\/b>. Es erscheint ein einfaches Dialogfenster zur manuellen Eingabe der Bereichsgrenzen für die Preise, nach dessen Bestätigung sich die Datensätze entsprechend filtern. Während dieses Feature im Datenblatt noch ganz praktisch ist, verhielte es sich in Formularen wegen der Menüverschachtelung etwas undurchsichtig. Hier käme man mit einem Range Control <\/b>schneller zum Ziel.<\/p>\n
Bild 2: Menü und Dialog für das Filtern nach Wertebereich in einem Datenblatt<\/p>\n Wenn Sie ein neues virtuelles Steuerelement entwickeln, werden Sie dieses in der Regel aus mehreren verfügbaren Access-Steuerelementen zusammensetzen wollen. Das könnten Sie direkt in jenem Formular tun, in dem dieses zum Einsatz kommen soll. Sobald dies jedoch in mehreren Formularen geschehen soll oder Sie das neue Element in andere Datenbanken importieren möchten, wird der Aufwand zu groß.<\/p>\n Die beteiligten Steuerelemente müssten alle kopiert werden und die zugehörigen Code-Abschnitte ebenso. Bequemer kommen Sie weg, wenn Sie die Steuerelemente und den Code in einem eigenen Formular anlegen, welches Sie dann schließlich nur als Unterformular in andere einsetzen. Zudem lässt sich dieses dann als Objekt auch in andere Datenbanken exportieren.<\/p>\n In der Beispieldatenbank finden Sie das neue Steuerelement in Gestalt des Formulars sfrmRanger<\/b>. Sein Entwurf zeigt sich in Bild 3. Sie können es auch unmittelbar öffnen und bedienen, wie in Bild 4 dargestellt. Die Breite des virtuellen Steuerelements passt sich dabei der Größe des Formulars an, dessen Rahmen auf Veränderbar<\/b> eingestellt ist, wodurch es mit der Maus dimensioniert werden kann. Dies wirkt sich später auch aus, wenn Sie es als Unterformular dimensionieren.<\/p>\n Bild 3: Entwurfsansicht des Range Control-Formulars<\/p>\n Bild 4: Das Range Control-Formular zur Laufzeit nach dem öffnen<\/p>\n Die weiteren relevanten Einstellungen des Formulars: Der Datenbankmarkierer<\/b> ist ausgeschaltet und ebenso die Navigationsschaltflächen<\/b>. Die Standardansicht<\/b> ist Einzelnes Formular<\/b>. Gleichzeitig ist dies die einzige zugelassene Ansicht. Es gibt auch keine Trennlinien<\/b> oder Bildlaufleisten<\/b>.<\/p>\n Sieben Steuerelemente ergeben zusammen das Range Control<\/b>. Die beiden Ziehpunkte sind Schaltflächen, die über deren Design-Eigenschaften auf blaue und violette Hintergrundfarbe mit Verlauf eingestellt sind (Bild 5). Außerdem ist ihr Rahmen rund (Bild 6). Sie erreichen diese Layout-Steuerung bei markiertem Button über den Ribbon Format | Steuerelementformatierung<\/b> und das Menü zu Fülleffekt<\/b>, sowie die Schaltfläche Form ändern<\/b>.<\/p>\n Bild 5: Farbverlauf für die Buttons<\/p>\n Bild 6: Form für die Buttons<\/p>\n Die beiden Schaltflächen heißen cmd1<\/b> und cmd2<\/b>. Für den linken und rechten Rand des Elements kommen ebenfalls Schaltflächen zum Einsatz, die sich cmdL<\/b> und cmdR<\/b> nennen. Sie sind auf ähnliche Weise formatiert, wie die Ziehpunkte.<\/p>\n Unter diesen vier Schaltflächen liegen die zwei Rechteck<\/b>-Steuerelemente r0<\/b> und r1<\/b>. r0<\/b> ist grau gefüllt und stellt den Hintergrundbalken dar, r1<\/b> ist blau und symbolisiert den gewählten Bereich. Damit diese sechs Elemente korrekt angezeigt werden, muss eine bestimmte Z-Order<\/b> eingehalten werden, weil sie ja übereinander liegen. Die Z-Order<\/b> ist jene Reihenfolge, in der Steuerelemente übereinander zu liegen kommen, also deren Tiefeneigenschaft. Unter Access lässt sich auf diese Z-Order<\/b> direkt leider weder über die Oberfläche beim Entwurf, noch per VBA zugreifen. Stattdessen bemühen Sie die beiden Ribbon-Schaltflächen In den Vordergrund<\/b> und In den Hintergrund<\/b> im Ribbon-Tab Anordnen<\/b> ganz rechts. Für unser Beispiel gehen Sie dabei so vor:<\/p>\n Markieren Sie r0<\/b> und klicken In den Hintergrund<\/b>. Markieren Sie nun r1<\/b> und klicken In den Vordergrund<\/b>. Schließlich markieren Sie cmdL<\/b>, cmd1<\/b>, cmd2<\/b> und cmdR<\/b> und klicken abermals In den Vordergrund<\/b>. Damit ist gewährleistet, dass die Buttons nie hinter die beiden Rechteck<\/b>-Steuerelemente geraten.<\/p>\n Ein Bezeichnungsfeld LblVal<\/b> am rechten Rand des Formulars dient zur Anzeige des eingestellten Wertebereichs.<\/p>\n Da das Range Control<\/b> in der Breite variabel ausfallen soll, müssen sich die enthaltenen Steuerelemente entsprechend der Größenänderung des Formulars in Position und Breite anpassen (s. Bild 7). Der Versuch, dies über das Verankern<\/b>-Feature der Elemente zu bewerkstelligen lief indessen ins Leere. Zwar lassen sich die Anpassungen damit visuell korrekt steuern, doch die aus den Button-Positionen abgeleiteten Werte können damit leider nicht mehr ermittelt werden. Stelen Sie etwa den Hintergrundbalken r0<\/b> auf Quer nach oben dehnen<\/b> ein, so macht er die Größenänderungen des Formular anstandslos mit. Möchten Sie nun dessen Breite ermitteln, die ja die Basis für den Wertebereich darstellt, so würden Sie dafür die VBA-Eigenschaft Width<\/b> des Steuerelements verwenden. Die jedoch bleibt auf dem Wert stehen, der im Entwurf angelegt wurde. Das Dehnen ändert also Width<\/b> nicht! Gleiches gilt etwa für Left<\/b> bei Steuerelementen, die auf Oben rechts<\/b> eingestellt sind. Die linke Position wandert dann zwar im Formular bei Größenänderung, doch Left<\/b> bleibt konstant auf dem im Entwurf festgelegten Wert.<\/p>\n Bild 7: Bei Größenänderung des Formulars positionieren und dimensionieren sich die integrierten Elemente passend<\/p>\n Deshalb kommt man nicht umhin, die Positionierung stattdessen per VBA im Ereignis Bei Größenänderung <\/b>(Form_Resize<\/b>) des Formulars vorzunehmen. Listing 1 zeigt den überschaubaren Code hierfür. Der linke Rand der rechten Bereichsschaltfläche cmdR<\/b> ergibt sich aus der Breite des Formulars zur Laufzeit (InsideWidth<\/b>, nicht Width<\/b>!) minus der Breite des Labels LblVal<\/b> minus seiner eigenen Breite minus 300 Twips<\/b>. Die Position des Labels LblVal<\/b> wiederum errechnet sich ähnlich. Die Breite des Hintergrundbalkens r0<\/b> ermittelt sich aus der Formularbreite minus Label LblVal<\/b> minus 150 Twips<\/b>. Die linke Bereichsschaltfläche cmdL<\/b> hingegen bleibt an Ort und Stelle. Die beiden Ziehpunkt-Buttons cmd1<\/b> und cmd2<\/b>, sowie der Bereichsbalken r1<\/b>, aber werden ja nicht in dieser Prozedur eingestellt, sondern beim Ziehen mit der Maus; und wie das geht erfahren Sie im Folgenden.<\/p>\n Listing 1: Positionierung der Steuerelemente des Formulars bei Größenänderung in der Resize-Ereignisprozedur<\/p>\n Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span><\/a><\/p>\nFormular als Steuerelement<\/h2>\n
Eigenes Range Control<\/h2>\n
<\/a><\/p>\n<\/a><\/p>\n<\/a><\/p>\n<\/a><\/p>\n<\/a><\/p>\nPrivate Sub <\/span>Form_Resize()\r\n On Error Resume Next<\/span>\r\n cmdR.Left<\/span> = Me.InsideWidth - LblVal.Width - cmdR.Width - 300\r\n LblVal.Left<\/span> = Me.InsideWidth - LblVal.Width - 150\r\n r0.Width = cmdR.Left<\/span> - cmdL.Left\r\nEnd Sub<\/span><\/pre>\nBewegen von Steuerelementen mit der Maus<\/h2>\n
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Access [basics]<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 400 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t