You'd have to make some concessions, but this works for me

Public Function ImportText()
Dim myfilename As String
Dim myExampleArray(1, 1)

myExampleArray(0, 0) = "Latitude"
myExampleArray(0, 1) = geoFieldLatitude
myExampleArray(1, 0) = "Longitude"
myExampleArray(1, 1) = geoFieldLongitude

myfilename = "C:\import.txt"
oMap.DataSets.ImportData myfilename, myExampleArray, , geoDelimiterSemicolon, 0

End Function

Latitude;Longitude
47.6443507242948000 ; -70.1569795701653000
46.8069542571902000 ; -71.2153752241284000
46.8412129394710000 ; -71.2770252116024000
46.8361057620496000 ; -71.2258935067803000
48.5575715638697000 ; -71.6472415532917000
46.8123630993068000 ; -71.2303665094078000
48.4017124213278000 ; -71.1607911810279000