Discussion:
Visible auf Bezeichnungsfeld in Form_Current funktioniert nicht
(zu alt für eine Antwort)
Tobias
2009-11-16 21:02:14 UTC
Permalink
Guten Abend,

der Betreff dieses Postings beschreibt mein Problem schon recht
umfassend. Ich habe ein Label (Bezeichnungsfeld) und möchte dies unter
einter bestimmten Bedingung gerne ausblenden. Dazu setze ich auf dem
Control die Eigenschaft Visible. Ich habe mir den Wert im Debugger
angesehen und auch wenn dieser sauber auf False gesetzt wird, bleibt
das Bezeichnungsfeld eingeblendet. Was mache ich falsch?

Danke im Vorraus und einen schönen Abend noch.

Gruß, Tobias Jamin
Thomas Möller
2009-11-16 21:08:09 UTC
Permalink
Hallo Tobias,
Post by Tobias
der Betreff dieses Postings beschreibt mein Problem schon recht
umfassend. Ich habe ein Label (Bezeichnungsfeld) und möchte dies unter
einter bestimmten Bedingung gerne ausblenden. Dazu setze ich auf dem
Control die Eigenschaft Visible. Ich habe mir den Wert im Debugger
angesehen und auch wenn dieser sauber auf False gesetzt wird, bleibt
das Bezeichnungsfeld eingeblendet. Was mache ich falsch?
ich habe gerade folgenden Code probiert:

If Me.ID Mod 2 = 0 Then
Me.Bezeichnungsfeld1.Visible = False
Else
Me.Bezeichnungsfeld1.Visible = True
End If


Der Code funktioniert wie gewünscht. Bei jedem Datensatzwechsel wird die
ID geprüft und ggfs. das Bezeichnungsfeld ausgeblendet.

Eventuell hilft es, wenn Du folgende Zeile ergänzt:

Me.Repaint


HTH
--
Thomas

Homepage: www.Team-Moeller.de
Tobias
2009-11-16 21:20:25 UTC
Permalink
[..]
     If Me.ID Mod 2 = 0 Then
         Me.Bezeichnungsfeld1.Visible = False
     Else
         Me.Bezeichnungsfeld1.Visible = True
     End If
Der Code funktioniert wie gewünscht. Bei jedem Datensatzwechsel wird die
ID geprüft und ggfs. das Bezeichnungsfeld ausgeblendet.
   Me.Repaint
[..]

Hallo Thomas,

danke für die schnelle Antwort! Ich hätte mal dazuschreiben sollen,
dass ich Repaint auch schon probiert habe. Funktioniert leider nicht.
Auch wenn ich in Form_Current z. B. das hier schreibe

Me.controlHinweis.Visible = Not Me.controlHinweis.Visible

Müsste das Bezeichnungsfeld immer zwischen sichtbar und unsichtbar
wechseln oder? Das tut es auch nicht. Es bleibt immer sichtbar. Ich
verstehe es nicht!

Gruß, Tobias
Josef Poetzl
2009-11-16 21:53:51 UTC
Permalink
Hallo!

Tobias schrieb:
[...]
Post by Tobias
Auch wenn ich in Form_Current z. B. das hier schreibe
Me.controlHinweis.Visible = Not Me.controlHinweis.Visible
Müsste das Bezeichnungsfeld immer zwischen sichtbar und unsichtbar
wechseln oder? Das tut es auch nicht. Es bleibt immer sichtbar. Ich
verstehe es nicht!
Wenn Current 2x hintereinander in kurzem Abstand läuft, dann bleibt
das Steuerelement sichtbar. ;-)
Oder: vielleicht wird deine Ereignisbehandlung von Current gar nicht
durchlaufen.

Teste doch das Umschalten der Sichtbarkeit erstmal per Click auf eine
Schaltfläche.
Oder füge einen Msgbox-Aufruf hinter die Anweisung ein.

| Me.controlHinweis.Visible = Not Me.controlHinweis.Visible
| Msgbox "Sichtbarkeit: " & Me.controlHinweis.Visible

BTW: so etwas wie /On error resume next/ hast du hoffentlich nicht in
der Prozedur, denn das könnte auch vieles "verheimlichen".


mfg
Josef
--
EPT: (Access Error Prevention Table) http://access.joposol.com/
FAQ: (Access-FAQ von Karl Donaubauer) http://www.donkarl.com/
Thomas Möller
2009-11-16 22:10:43 UTC
Permalink
Hallo Tobias,
Post by Tobias
danke für die schnelle Antwort! Ich hätte mal dazuschreiben sollen,
dass ich Repaint auch schon probiert habe. Funktioniert leider nicht.
Auch wenn ich in Form_Current z. B. das hier schreibe
Me.controlHinweis.Visible = Not Me.controlHinweis.Visible
Müsste das Bezeichnungsfeld immer zwischen sichtbar und unsichtbar
wechseln oder? Das tut es auch nicht. Es bleibt immer sichtbar. Ich
verstehe es nicht!
auch Dein Code funktioniert bei mir - allerdings nicht in einem
Endlosformular. Welche Art von Formular hast Du im Einsatz?


CU
--
Thomas

Homepage: www.Team-Moeller.de
Tobias
2009-11-17 17:39:45 UTC
Permalink
[..]
Post by Thomas Möller
Post by Tobias
danke für die schnelle Antwort! Ich hätte mal dazuschreiben sollen,
dass ich Repaint auch schon probiert habe. Funktioniert leider nicht.
Auch wenn ich in Form_Current z. B. das hier schreibe
Me.controlHinweis.Visible = Not Me.controlHinweis.Visible
Müsste das Bezeichnungsfeld immer zwischen sichtbar und unsichtbar
wechseln oder? Das tut es auch nicht. Es bleibt immer sichtbar. Ich
verstehe es nicht!
auch Dein Code funktioniert bei mir - allerdings nicht in einem
Endlosformular. Welche Art von Formular hast Du im Einsatz?
Ach verdammt! Ich habe ein geteiltes Formular verwendet und dort geht
es nicht. Ich habe mal testweise auf "Einzelformular" umgestellt und
dort geht das. Was ist das für ein Blödsinn. Das ist doch ein Bug,
oder? Gibts vielleicht einen Trick, mit dem ich es doch noch irgendwie
im geteilten Formular hinbekomme?

Danke für den Tipp und Gruß,

Tobias
Thomas Möller
2009-11-17 21:39:15 UTC
Permalink
Hallo Tobias,
Post by Tobias
Post by Thomas Möller
auch Dein Code funktioniert bei mir - allerdings nicht in einem
Endlosformular. Welche Art von Formular hast Du im Einsatz?
Ach verdammt! Ich habe ein geteiltes Formular verwendet und dort geht
es nicht.
ich habe Deine Code gerade in einem geteilten Formular ausprobiert. Was
soll ich sagen - bei mir funktioniert's wie erwartet.

Vielleicht kannst Du mal eine auf das wesentliche reduzierte
Beispieldatenbank (nur die Tabelle mit ein paar Beispieldatensätzen und
das Formular) zum Download bereitstellen.

Die Datenbank könntest Du z.B. hier bereitstellen:
http://www.file-upload.net/
(Link in einer Zeile)
Oder Du suchst Dir hier was aus:
http://birnchen.ath.cx/Filehoster.html
(Link in einer Zeile)


CU
--
Thomas

Homepage: www.Team-Moeller.de
Elch
2009-11-18 11:07:18 UTC
Permalink
Post by Thomas Möller
Hallo Tobias,
Post by Tobias
Post by Thomas Möller
auch Dein Code funktioniert bei mir - allerdings nicht in einem
Endlosformular. Welche Art von Formular hast Du im Einsatz?
Ach verdammt! Ich habe ein geteiltes Formular verwendet und dort geht
es nicht.
ich habe Deine Code gerade in einem geteilten Formular ausprobiert. Was
soll ich sagen - bei mir funktioniert's wie erwartet.
Vielleicht kannst Du mal eine auf das wesentliche reduzierte
Beispieldatenbank (nur die Tabelle mit ein paar Beispieldatensätzen und
das Formular) zum Download bereitstellen.
Die Datenbank könntest Du z.B. hier bereitstellen:http://www.file-upload.net/
(Link in einer Zeile)
Oder Du suchst Dir hier was aus:http://birnchen.ath.cx/Filehoster.html
(Link in einer Zeile)
CU
--
Thomas
Homepage:www.Team-Moeller.de
Hallo,

schlage mich mit genau dem gleichen Problem herum. Der Code ist
garantiert richtig und funktioniert in einem anderen ähnlichen, auch
geteilten (split form) Formular.
Wenn ich das fragliche Formular auf 'Continous Forms' umstelle ist
alles ok.
Die Elemente (visible=0 oder 1) werden sofort richtig angezeigt, wenn
ich die Fenstergröße von Access verkleinere. Nachdem wieder
vergrößeret wird, bleibt die Anzeige richtig.
Ich finde keinen Weg, über den Code Access zu veranlassen, das Bild
neu aufzubauen unter Beachtung der Visible-Attribute.

Elch

Loading...