How Can I Create a contact item in specific Contact folder?

Hi guys ! How Can I Create a contact item in specific folder under default folder?

I have this situation:

Set myolApp = CreateObject("Outlook.Application")
Set myNameSpace = myolApp.GetNamespace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderContacts).Folders("Teste")

I would like create a contact item under Teste. Anyone?

Thanks