ATfieldcount

Syntax

N = RTF.ATfieldCount(handle, strFieldName)

Description

Geeft het aantal keren van de aanwezigheid van strFieldName.

Parameter	Description
handle	Numeriek, referentie naar de met CreateHandle geopende documentcontainer.
strFieldName	Tekst, verwijzing naar het @-veld in het geopende document.

See Also

Example

Sub Main

Dim h%

h% = RTF.CreateHandle() 'open een nieuwe container

RTF.LoadFile h%, "..\mytemplate.rtf"

RTF.InitATfields h%, "A moment, please..."

Debug.Print RTF.AtFieldCount(%h, "@artoms")

RTF.CloseHandle h% 'sluit de container

End Sub