I am beginning to work with the MapPoint 2009 ActiveX control. The sample code was written in VB 6 and some samples do not appear to have the correct syntax for VB 8. Can anyone explain this?
Code:
[Microsoft Visual Basic 6.0]

Sub ShowOnlySomeFields()
Dim objApp As New MapPoint.Application
Dim objDataSet As MapPoint.DataSet
objApp.Visible = True
objApp.UserControl = True

Set objDataSet = objApp.OpenMap(objApp.Path & "\Samples\Clients.ptm").DataSets(1)
arArray = Array(objDataSet.Fields(1), objDataSet.Fields(2), objDataSet.Fields(3))

'Set which fields will be visible in the Pushpin balloon
objDataSet.SetFieldsVisibleInBalloon arArray

'Show the balloon for the first record
objDataSet.QueryAllRecords.Pushpin.BalloonState = geoDisplayBalloon
End Sub
()
Specifically, the assignment of the array elements using the "fields(x)" syntax does not work.

Any help on this would be appreciated.