vhUnitTest.TestCase aTestName:%String AantalKeyValuePairs:%Integer