Problem mit True/False von einer Datenbank

[CHT]

Guten Morgen,

Ich dachte nicht, dass es zu Problem werden konnte. Aber....

Ich habe eine Datenbank. Diese Datenbank hat Feldern, die unter anderem boolische Werte haben.
In meinem Code werden die Werte des Datensatzes an Variablen übergeben.

.
.
.
If Not .EOF then
Adatum = .Fields("Adatum")
Edatum = .Fields("Edatum")
StandardKopf = .Fields("StandardKopf")
StandardDiagramm = .Fields("StandardDiagramm") - hier True oder False
StandardProzent = .Fields("StandardProzent") - hier True oder False
StandardStimme = .Fields("StandardStimme") - hier True oder False
StandardGesamt = .Fields("StandardGesamt") - hier True oder False
GewKopf = .Fields("GewKopf")
GewDiagramm = .Fields("GewDiagramm") - hier True oder False
GewProzent = .Fields("GewProzent") - hier True oder False
GewStimme = .Fields("GewStimme") - hier True oder False
GewGesamt = .Fields("GewGesamt") - hier True oder False
EndeKopf = .Fields("EndeKopf")
EndeDiagramm = .Fields("EndeDiagramm") - hier True oder False
EndeProzent = .Fields("EndeProzent") - hier True oder False
EndeStimme = .Fields("EndeStimme") - hier True oder False
EndeGesamt = .Fields("EndeGesamt") - hier True oder False
DBEinstellung=True
.
.
.

Diese Variable verwende ich dann später um bestimmen Sachen anzuzeigen oder nicht (True/False)
Leider der Code

if GewDiagramm = True then
Irgendwas anzeige
End if

funktionniert nicht.

In der Datenbank habe ich zu alles geprüft, der Code habe ich schon geprüft. Mein Problem ist, dass Variablen oder Funktionen, die ich mit boolische Werte zuweisen, richtige "funktionnieren". Nur die von der Datenbank nicht. Habe ich da etwas übersehen?

Danke im Voraus
Christian

 

[CHT]

Hi,

hooo je.....

Wenn man nicht aufpasst, dann passiert so was.
Ich habe den Fehler gefunden. Aus meinem Beispielcode (vorheriger Beitrag) ist es nicht ersichtlich, aber folgendes hatte ich gemacht :

 StandardProzent = .Fields("StandardProzent")  & VbCrLf

In meinem Wahn habe ich

  & VbCrLf

dazu getippt.
Was zu fehlerhaftem Ergebnis führte, logischweise.

'tschulidgung für die Aufregung

Schönen Tag noch
Christian