Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Werkt nietjust a thought?Code:if len(tabblad1.caption) > 10 then tabblad1.caption = left(tabblad1.caption, 10) & "..." end if
ja, natuurlijk werkt het niet...En verwachtte al dat het voor 200X was.
Het ging erom dat het idee er was - check de lengte van de caption, als die te lang is, kort het af. Geen idee of de len() functie bestaat in 200x, maar in 6 wel, vandaar.
ohja, en de ".caption" bestaat probly ook niet, maar dat mag je zelf gaan verzinnen.
Ja maar hoe kort ik die text in naar een bepaalt aantal tekens:S Iets met left jah maar hoe gebruik je diehoe komt de text dan OP de tabstrip? Ik neem aan dat er al iets op stond, dus die code kan je dan hergebruiken?....
[edit] met de mid() of left() functie erbij?! [/edit]
retVal$ = Left$(sInput$, iGetal)
[COLOR="SeaGreen"]'met iGetal = aantal letters
'msgbox Left$("Hallo hallo hallo",8) returnt dus "Hallo ha"
[/COLOR]
retVal$ = mid$(sInput$, ,iBegin, iAantal)
[COLOR="SeaGreen"]'met iBegin= aantal begin-letter en iAantal = aantal letters[/COLOR]
[COLOR="SeaGreen"]'msgbox Mid$("Hallo hallo hallo",2,8) returnt dus "llo hallo"[/COLOR]
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.