Guten Abend,
in meiner Datei habe ich eine UF mit verschiedenen Steuerelemeten.
In einem Modul habe ich Public Anweisungen z.B. Public KUNDENKUERZEL as String
Public WERT as String etc.
Nach drücken eines Button wird der Zaehlerstand z.B. auf 6000 gesetzt.
Private Sub CommandButton1_Click()
bolAusloesen = False
KUNDENKUERZEL = „KDF“
WERT = 6000
LBLAnzeigetext = „Firmenkunden Nummernkreis“
Application.Run „Kunden_FRM_oeffen“
bolAusloesen = True
bolSpeichern = False
End SubPrivate Sub CommandButton2_Click()
bolAusloesen = False
KUNDENKUERZEL = „KDPV“
WERT = 5000
LBLAnzeigetext = „Privatkunden Nummernkreis“
Application.Run „Kunden_FRM_oeffen“
bolAusloesen = True
bolSpeichern = False
End Sub
Wenn ich jetzt CommandButton2 drücke wirs zwar der Wert richig angezeigt
jedoch das Kundenkürzel falsch.
Wie kann ich das beheben.
Habe eine Mustredatei, weiss jedoch nicht wie ich diese hochladen kann.
Danke!
Gruß
Ludmila
Wenn ich jetzt CommandButton2 drücke wirs zwar der Wert richig
angezeigt
jedoch das Kundenkürzel falsch.
Wie kann ich das beheben.
Habe eine Mustredatei, weiss jedoch nicht wie ich diese
hochladen kann.
Hallo Ludmila,
lad die Musterdatei hoch mit z.B. fileupload, s. FAQ:2606 und zeige uns den erhaltenen Link.
Gruß
Reinhard
Hallo Reinhard,
danke erstmal für Deine Antwort.
Hier ein kleiner Auszug aus meiner Datei.
http://www.file-upload.net/download-8658671/Beispiel…
Ich habe das Problem so gut wie möglich in der UF beschrieben.
Es geht darum das der Wert zwar geändert wird, das Vorzeichen jedoch nicht.
Nochmals, danke!
Gruß
Ludmila
Hallo Ludmila,
http://www.file-upload.net/download-8658671/Beispiel…
Ich habe das Problem so gut wie möglich in der UF beschrieben.
ich habe mit deiner Mappe paar Probleme. Lade sie bitte nocheinmal hoch und ändere bitte die Beschreibung in der UF ab. Sie ist mir zu uneindeutig.
Du schreibst man soll den Button „Firma-Privat“ klicken, welchen denn nun, es gibt die Buttons „Firmenkunden“ und „Privatkunden“?
Später schreibst du „Dann Textkürzel,…“ Was heißt das? Das ist eine ComboBox, soll man da nur in das Boxfeld reinklicken ODER mittels Pfeil etwas auswählen, was?
Bitte ändere so daß es eine Step by Step Anleitung für mich wird, danke.
Es geht darum das der Wert zwar geändert wird, das Vorzeichen
jedoch nicht.
Mit Vorzeichen meinst du „KDPV“? Das ist jetzt nix was ich als Vorzeichen bezeichnen würde.
Zu deinen Namensgebungen. Sehr zu loben ist daß du in etwa der ungarischen Notation folgst. Ich rate dir, behalte das mit den Präfixen unbedingt bei aber schreib sie klein.
Also txt anstatt TXT, op anstatt OP.
Dann sieht:
LBLKD.Enabled = False
TXTKDkurz.Value = „“
TXTKDkurz.Enabled = False
so aus:
lblKD.Enabled = False
txtKDkurz.Value = „“
txtKDkurz.Enabled = False
Ich finde das liest sich flüssiger in langen Codes.
Was für einen Codefremden für mich und AUCH für dich wenn du mal 6 Wochen Urlaub gemacht hast sehr zeitraubend aufhält ist, daß es kaum Namensbezug zwischen deinen Elementnamen und den Bezeichnungen auf der UF gibt.
Beispiel:
Erscheint die UF sieht man wie üblich links ein Label mit dem Text „Individuell“.
Das ist die Bezeichnung für die TextBox rechts davon. Soweit okay. Aber im Code hat diese TextBox den Namen TXTKDkurz…
Nenne sie doch im Code txtIndi o.ä. ist eine Variante. Nicht gesagt die beste aber besser als bislang.
Wenns bei deinen beiden CommandButtons beim Namen bleibt, so what, nenne sie auch weiterhin CommanButton1 bzw. 2 ABER in ihren Code gehört dann unbedingt zuoberst rein:
’ Firmenkunden bzw. 'Privatkunden
Besser ist natürlich cbFirmen …
Und Ludmila, ich will dir nix böses, ich will dir helfen und bedingt durch das oben gesagte kam ich noch gar nicht richtig dazu gezielt den Fehler zu suchen.
Den krieg ich schon, keine Sorge aber ich sehe daß das was ich sehe nur Teilcode von etwas größerem ist.
Und dann weitergedacht, auch das größere ist so wie jetzt aufgebaut, aaargs, da ist es eine Qual einen Fehler zu suchen. Bei viel Code und vielen Global-Variablen (müssen die unbedingt global sein?) ist es sowieso schon mühsam.
Gruß
Reinhard
Hallo Reinhard,
vielen Dank für Deine Antwort.
Ich werde meine UF umbauen und Dir ´dann mein Ergebnis nochmals mitteilen.
Wenn ich Dich richtig verstanden habe, dann soll ich die globalen weglassen und die Bezeichnungen eindeutiger beschreiben.
Wäre dies sinnvoller wenn ich statt xSuch suchbyte schreibe und dies in der UF selbst?
Es wäre nett von Dir wenn ich Dir zeitweise meine Datei zusenden dürfte und Du mal einen Blick darüber wirfst bevor ich mich weiter verstricke.
Danke!
Gruß
Ludmila
Hallo Ludmila,
Ich werde meine UF umbauen und Dir ´dann mein Ergebnis
nochmals mitteilen.
ja, gerne.
Wenn ich Dich richtig verstanden habe, dann soll ich die
globalen weglassen und die Bezeichnungen eindeutiger
beschreiben.
Jain. Du bist Jeffe und machst was du willst, ich hab da in deiner Mappe nix zu sagen. Von daher keinerlei „du solltst“. Andererseits überwiegen für mich bei globalen Variablen (nicht Konstanten) die Nachteile von Ihnen bei der Fehlersuche in vielen Modulen die Vorteile die sie durchaus auch haben.
Aber is kein Dogma.
Zu den Bezeichnungen, je sprechender die sind desto besser.
Wäre dies sinnvoller wenn ich statt xSuch suchbyte schreibe
Wie wärs mit bytSuch?
und dies in der UF selbst?
Kommtauf die Prozedur u.ä. an.
Es wäre nett von Dir wenn ich Dir zeitweise meine Datei
zusenden dürfte und Du mal einen Blick darüber wirfst bevor
ich mich weiter verstricke.
Lade sie hier hoch.
Gruß
Reinhard