Returns or sets the way that the MapPoint Control border is drawn. The BorderStyle property of the MappointControl object must be
1, otherwise this setting has no effect. Read/write Integer.
|Sunken border, two pixels wide|
|Black border, single pixel wide|
|object||Required. An expression that returns a MappointControl object.|
Sub Form_Load() Dim strPath as String 'Assume the default installation Path strPath = "C:\Program Files\Microsoft MapPoint\Samples\" MappointControl1.OpenMap strPath & "Clients.ptm" MappointControl1.BorderStyle = vbFixedSingle End Sub
Sub Command1_Click() 'Toggle the appearance of the control If MappointControl1.Appearance = 1 Then MappointControl1.Appearance = 0 Else MappointControl1.Appearance = 1 End If End Sub
Note This sample code contains data that is specific for use in MapPoint North America; it is for illustration purposes only.