[VBA]Return invoegen in Acces database

Pagina: 1
Acties:

  • MRED
  • Registratie: Maart 2000
  • Laatst online: 22-12-2020

MRED

Carpe diem...

Topicstarter
Ik probeer dmv een stukje VBA code de inhoud van een tekstbestand in te lezen in een database. Nu ben ik zover dat de tekstfile regel voor regel wordt ingelezen. Ik wil echter aan het einde van elke regel een return invoegen. Nu heb ik dit willen doen met deze code:

code:
1
dtText = dtText + Chr(10)


Ik voeg dus een return code toe aan de variabele die in de database weggeschreven wordt. Wanneer ik echter later het resultaat in een formulier bekijk zie ik ipv lege regels blokjes op de plaatsen waar de returns zijn ingevoegd.

Iemand een oplossing??

Mijn weblog


Verwijderd

De constante vbNewLine doet wat je wil.

  • BasieP
  • Registratie: Oktober 2000
  • Laatst online: 19-10-2025
trouwens is vba windows
en in windows is een chr(13) een enter, niet een chr(10)

zodoende werkt dat ook gewoon

This message was sent on 100% recyclable electrons.


  • MRED
  • Registratie: Maart 2000
  • Laatst online: 22-12-2020

MRED

Carpe diem...

Topicstarter
BasieP schreef op woensdag 05 januari 2005 @ 19:21:
trouwens is vba windows
en in windows is een chr(13) een enter, niet een chr(10)

zodoende werkt dat ook gewoon
chr(13) heb ik ook al geprobeerd werkt niet. Dit geeft hetzelfde resultaat als chr(10).

Ik ga ff kijken of ik er met newline uitkom

Mijn weblog


  • Equator
  • Registratie: April 2001
  • Laatst online: 16:54

Equator

Crew Council

🦺#Rodekruis #whisky #barista

Een vbCrLF is naar mijn idee een combinatie van een chr(10) en chr(13)

  • BasieP
  • Registratie: Oktober 2000
  • Laatst online: 19-10-2025
MRED schreef op woensdag 05 januari 2005 @ 19:24:
[...]


chr(13) heb ik ook al geprobeerd werkt niet. Dit geeft hetzelfde resultaat als chr(10).

Ik ga ff kijken of ik er met newline uitkom
dit kan ik me niet voorstellen, ikzelf heb het al meerdere malen gebruikt, w8 ik zal even exacte (werkende) code opzoeken

This message was sent on 100% recyclable electrons.


  • DaRace
  • Registratie: Juni 2001
  • Laatst online: 03-10-2023
wat voor veldtype gebruik je? Volgens mij werkt dat alleen met memo's??

  • BasieP
  • Registratie: Oktober 2000
  • Laatst online: 19-10-2025
ah ik ziet het al
het is niet + maar &

code:
1
2
3
Private Sub knpKnopje_Click()
  MsgBox ("hoi eikel" & Chr(13) & "biertje?")
End Sub


trouwens werken
code:
1
chr(10)
en
code:
1
chr(10) & chr(13)
nu ook gewoon

[ Voor 31% gewijzigd door BasieP op 05-01-2005 19:38 ]

This message was sent on 100% recyclable electrons.


Verwijderd

Verrek, daar had ik helemaal overheengekeken.

Handig, verschillende talen met verschillende syntaxis. :)

  • MRED
  • Registratie: Maart 2000
  • Laatst online: 22-12-2020

MRED

Carpe diem...

Topicstarter
haha... & ipv + werkt idd perfect!

Mijn weblog


  • MRED
  • Registratie: Maart 2000
  • Laatst online: 22-12-2020

MRED

Carpe diem...

Topicstarter
nog ff aan het puzzelen geweest. Wanneer je de inhoud van de variabele wilt wegschrijven in een veld van het type memo werkt & ipv + ook niet, dan werkt het met onderstaande code

code:
1
dtText = dtText & vbCrLf

Mijn weblog


Verwijderd

Volgens mij is
code:
1
chr(10) & chr(13)


hetzelfde als
code:
1
vbCrLF


Als ik een return in een string wil hebben gebruik ik altijd vbCrLF, hoef je er niet over na te denken. :)

  • Boss
  • Registratie: September 1999
  • Nu online

Boss

+1 Overgewaardeerd

Of vbNewline. Is volgens mij precies dezelfde!

The process of preparing programs for a digital computer is especially attractive, not only because it can be economically and scientifically rewarding, but also because it is an aesthetic experience much like composing poetry or music.

Pagina: 1