Можно-ли создать программно на VB базу данных FoxPro (*.dbf)?

Dim NewDB As Database 
Dim NewWs As WorkSpace 
Dim lngDBOpts As Long 
Dim strDBPath As String 
StrDBPath = “C:ExamplDBMyDB.mdb” 
'Устанавливаем опции 
LngDBOpts = dbVersion30 + dbEncrypt 
‘Создаем рабочее пространство 
Set NewWs = DBEngine.Workspaces(0) 
'Создаем Базу Данных 
Set NewDB = NewWs.CreateDatabase (strDBPath, dbLangCyrillic, lngDBOpts) 
‘После создания БД, закрываем ее и рабочее пространство 
NewDB.Close 
NewWs.Close 
'Уничтожаем объекты 
Set NewDB = Nothing 
Set NewWs = Nothing