Purpose
Used to determine the total number of records in the database.
Syntax (Read-Only
Property)
Long = object.Count
| Long
(Long) |
|
This
function returns the total number fo records that currently exist
in the database.
|
Notes
This property returns a value between 0 and 1,147,483,647.
This
property returns 0 if no records exist.
Error
Values
This property does not change the state of the ErrorNumber
property.
Example
Objective:
Add a few record to a database and test the count property.
'Create the object
Dim CDP As
rtCDP.rtCompactDataPak
Set CDP = New rtCDP.rtCompactDataPak
'Add
some records to the database
CDP.Append "Port Richey, Florida", "34668"
CDP.Append "New Port Richey, Florida", "34653"
CDP.Append
"Jamestown, New York", "14701"
'This
statement prints "3" to the Immediate Pane
Debug.Print
CDP.Count
Version
History
1.0 1/15/1999 Tested
See
Also
Debug_SayAll