---

Hallo,

wenn ich über nachfolgenden Code eine TextDatei zeilenweise einlese, sollte es ja eigentlich keine Problem geben ...

Code:

---

Dim fso as FileSystemObject
Set fso = CreateObject("Scripting.FileSystemObject")

Dim Fle as Scripting.TextStream
Set Fle = fso.OpenTextFile("C:\test.txt",ForReading")

Dim StrZeile as String

Do While Not Fle.AtEndOfStream
  strZeile = Fle.ReadLine
Loop

---

So steht es überall beschrieben .. gelle

Doch fügt man nun Fle.ReadLine zur Überwachung hinzu, wird bei jedem Befehl, der in der Do .. Loop Schleife steht ein Fle.ReadLine ausgeführt.
Warum führt die Überwachung den Befehl aus? Sie sollte doch nur dazu sein um Werte anzuzeigen oder ist Sie nicht dafür ausgelegt Methoden zu überwachen.
Überwachen verbinde ich mit dem reinem Anzeigen von Werten, nicht aber von Methoden ausführen.

Versteh ich da etwas falsch?

Gruß TP

------------------

Code:

---

For Each Person In This.Forum
    TP.Say "have a nice day!"
Next Person

---

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

ist_nunmal_so.jpg

nun ja, das ist nun mal so

wenn du Fle.ReadLine in die überwachung gibts, muss die vba-umgebung das nun mal durchführen, um dir das ergebniss anzuzeigen.

hab ich mal im lisp-editor ausprobiert. hier ist das ergebniss dass gleiche (siehe jpg)
obwohl, der haltepunkt eindeutig VOR der ersten zeile (setq a1 (1+ a1)) steht, wurde der wert von a1 beireits 2x! erhöht, da ich inder überwachung (setq a1 (1+ a1)) hizugefügt habe . sogar jeder wechsel zwischen acad und der Vlide erhöhen der wert a1, weil dabei das überwachugsfenster aktualisiert wird.

also genau aufpassen, was man überwachen lässt. also in deinem fall NICHT das Fle.ReadLine sondern die variable in der das ergebniss gespeichert wird überwachen. ein jeder aufruf von Fle.ReadLine schiebt nun mal der dateizeige um eine zeile weiter, egal ob im code-ablauf oder über die überwachung.

genauso kannst du während einem haltepunkt-stopp über die Visual-Lisp Konsole (aber auch in der VBA-Umgebung) dieses verhalten erzwingen.
z.B.: ich schreibe einfach (setq a1 55)[enter] in der konsole der vlide, und im aktuellen programmablauf hat a1 ab jetzt den wert 55.

ist manchmal zum testen ganz praktisch , um z.B.: fehler zu simulieren

------------------

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP