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

ATfieldsCount, InitATfields, ReplaceATfield, SaveATfields

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