Tekst in pop-up scherm zelf indelen
Fred van Nuland
Bij het openen van een bestand laat ik in een pop-up schermpje een tekst
verschijnen.
Deze tekst is wat langer en nou wil ik graag weten hoe ik deze tekst zelf
over meerdere regels kan verdelen; nu doet VB dat zelf op basis van de
maximale lengte per regel waarschijnlijk.
Weet iemand een oplossing?
Alvast bedankt.
Fred
TieTo
"Fred van Nuland" <fvann...@home.nl> wrote in message
news:be21cu$2mk$1...@news4.tilbu1.nb.home.nl...
Kwa indeelmogelijkheden zou ik eerder voor een form kiezen die je laat zien.
Een leeg form kan je mooi opstellen met tekst, graphics, kaders enz.
Eens je form is opgesteld, laat je die gewoon zien wanneer het bestand wordt
geopend.
Als je form bvb "Userform1" heet, wordt het...
==code=========
Sub LaatZien()
Load UserForm1
UserForm1.Show
End Sub
==einde code=====
Eric van Uden
In VBA geeft 'vbCr' (lees: 'Visual Basic Carriage return') een regeleinde.
'vbLf' staat voor nieuwe regel of linefeed. Eigenlijk geven ze pas in
combinatie een
volwaardige nieuwe regel: 'vbCr & vbLf', of 'vbCrLf'.
De termen stammen, net als 'tab'of 'tabulator sprong' uit de tijd van de
mechanische
typemachines en letterzetsystemen.
'Chr(10)', regelinvoerteken,en 'Chr(13)' (LF) doen in Excel VBA hetzelfde.
In feite zijn dit de 'Characters' of tekens 10 en 13 uit de ASCII tekenset:
CR en LF.
Ze vallen samen met de tekens 10 en 13 uit de uitgebreidere Unicode
tekenset, in
Excel VBA weergegeven door 'ChrW(10)' respectievelijk 'ChrW(13)'.
Vergelijk met wat er gebeurt als je de cursor in een Word-tekst zet en dan
Alt+013 toetst op het numerieke deel van het toetsenbord.
In HTML zou je ' ' gebruiken (zie
http://www.bignosebird.com/ascii.shtml).
Je kunt zo ook Chr(9) gebruiken om een tab in te voegen (in Word Alt+009):
Zie in Excel de Help voor 'Chr, functie'.
Zie ook bijvoorbeeld: http://www.asciitable.com/.
Een voorbeeld:
Sub bericht()
'Visual basic carriage return en visual basic linefeed
MsgBox "Dit" & vbCr & "zijn" & vbLf & "vijf" & vbCrLf & "afzonderlijke" &
vbCr & vbLf & "regels."
'ASCII character 10 en ASCII character 13
MsgBox "Dit is" & Chr(10) & "nog" & Chr(13) & "een" & Chr(10) & Chr(13) &
"manier."
'Unicode character 10 en Unicode character 13
'Vergelijk met Alt+13 op het numerieke toetsenblok
MsgBox "Dit" & ChrW(10) & "zijn" & ChrW(13) & "vier afzonderlijke" &
ChrW(10) & ChrW(13) & "regels."
'Een tabulator-sprog of tab
MsgBox "Dit zijn:" & Chr(9) & "2 kolommen." & vbCrLf & "Met:" & Chr(9) & "2
regels."
End Sub
--
Eric van Uden
at the foot of the 'bridge too far'
"Fred van Nuland" <fvann...@home.nl> schreef in bericht
news:be21cu$2mk$1...@news4.tilbu1.nb.home.nl...