Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Access 2010) debug.print in ungebundenem Textfeld ausgeben (wie Ausgabe im Direktbereich)

Frage Microsoft Microsoft Office

Mitglied: christiankarl

christiankarl (Level 1) - Jetzt verbinden

28.03.2014, aktualisiert 10:19 Uhr, 2525 Aufrufe, 9 Kommentare, 1 Danke

Hallo,

ich stehe vor einem Problem wo ich nicht weis wie ich es lösen kann.
Ich lasse in Access 2010 per VBA verschiedene Abläufe durchlaufen. Das Ergebnis lasse ich mir per debug.print im direkt Bereich mit ausgeben.

Wie bekomme ich es hin, diese Ergebnisse in einem ungebunden Testfeld auszugeben, ähnlich wie im Direktbereich.

Sprich für jedes Ergebnis eine neue Zeile die Automatisch weiter springt.

Würde mich über einen Ansatz freuen.

Grüße aus Köln,
Christian
Mitglied: colinardo
28.03.2014, aktualisiert um 07:36 Uhr
Hallo Christian,
01.
deinTextfeld.SetFocus 
02.
strNewText = "Deine neue Ausgabezeile" 
03.
deinTextfeld.Value = deinTextfeld.Value & strNewText & vbNewline
kannst du dir ja eine Sub oder Function draus bauen, dann sparst du Code beim setzen der Infos.
Beispiel:
01.
Sub myDebug(strText) 
02.
  deinTextfeld.SetFocus 
03.
  deinTextfeld.Value = deinTextfeld.Value & strText & vbNewline 
04.
End Sub
myDebug "Zeile 1" 
myDebug "Zeile 2"
Grüße Uwe
Bitte warten ..
Mitglied: christiankarl
28.03.2014, aktualisiert um 07:44 Uhr
Hallo Uwe,

danke für den Ansatz,
irgendwie greift dieser nicht im Formular

mein Fomular heisst debugausgabe in diesem ist ein ungebundenes Textfeld direktbereich_ausgabe

Ich möchte die Werte aus dem debug.print "löschen"
im Feld direktbereich_ausgabe ausgegeben bekommen. Leider passiert in diesem nichts

01.
Debug.Print löschen 
02.
   
03.
  direktbereich_ausgabe.SetFocus 
04.
  strNewText = löschen 
05.
  direktbereich_ausgabe.Value = direktbereich_ausgabe.Value & strNewText & vbNewLine 
06.
 
Vielleicht hast du noch einen Ansatz warum es nicht geht

Gruß
Christian
Bitte warten ..
Mitglied: colinardo
28.03.2014, aktualisiert um 07:50 Uhr
Zitat von christiankarl:
danke für den Ansatz,
irgendwie greift dieser nicht im Formular
wenn man es falsch umsetzt, klar
Vielleicht hast du noch einen Ansatz warum es nicht geht
Löschen des Feldes machst du einfach so:
01.
direktbereich_ausgabe.SetFocus 
02.
direktbereich_ausgabe.Value = ""
Viele Grüße Uwe
Bitte warten ..
Mitglied: christiankarl
28.03.2014 um 08:31 Uhr
Hallo Uwe,

danke, hab vergessen direkt das Formular anzusprechen.
Nun geht es bis auf, dass er alle Werte mir hintereinander schreibt und keine neue Zeile einfügt.

Den Umbruch " & vbNewLine " ignoriert er.

woran könnte das noch liegen?

Danke nochmal für die Hilfe
Bitte warten ..
Mitglied: colinardo
28.03.2014, aktualisiert um 08:45 Uhr
Zitat von christiankarl:
Den Umbruch " & vbNewLine " ignoriert er.

woran könnte das noch liegen?
hast du denn das Textfeld überhaupt auf Multiline festgelegt ? > Eigenschaften des Textfeldes > Eingabetastenverhalten > "Neue Zeile im Feld"
Bitte warten ..
Mitglied: christiankarl
28.03.2014, aktualisiert um 08:37 Uhr
Ja, habe ich eingestellt.

habe mal x & vbNewLine eingefügt
das Ergebnis ist ,dass er nur blanks einfügt, aber nicht umbricht
Bitte warten ..
Mitglied: colinardo
28.03.2014, aktualisiert um 08:38 Uhr
Zitat von christiankarl:

Ja, habe ich eingestellt.
dann machst du noch irgendwo anders einen Fehler.... meine Kugel kennt deinen Code und dein Formular nicht !

Ich mach dir mal eine Demo-Datenbank, sonst wird das hier eine never ending story .....
Bitte warten ..
Mitglied: colinardo
28.03.2014, aktualisiert um 08:41 Uhr
So hier die Demo-Datenbank, damit sollte es klar sein ... wie es funktioniert.
Bitte warten ..
Mitglied: christiankarl
28.03.2014 um 09:18 Uhr
Hallo Uwe,

der Fehler war das formatierte Textfeld als Rich Text, bei nur Text hat es auch funktioniert.
Ich danke dir

Gruß
Christian
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Datenbanken
gelöst Mittelwert aus anderer Query in Textfeld funktioniert nicht Access 2010 (3)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Datenbanken
gelöst Syntaxfehler VBA Access 2010 (6)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Datenbanken
gelöst Access 2010 Abfrage erster Werktag (10)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Datenbanken
gelöst Access 2010 komplizierte Abfrage (3)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (34)

Frage von patz223 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
gelöst Server erkennt Client nicht wenn er ausserhalb des DHCP Pools liegt (28)

Frage von Mar-west zum Thema LAN, WAN, Wireless ...

Windows Server
Server 2008R2 startet nicht mehr (Bad Patch 0xa) (18)

Frage von Haures zum Thema Windows Server ...