利用网络上下载的组件，不需引用AO控件。以下为读取shp文件图形和属性结构的例子!

Imports System
Imports System.IO
Imports System.Text
Imports System.Drawing
Imports Microsoft.VisualBasic
Imports System.Windows.Forms.PictureBox
Imports System.Math

Public Class Form1
      Inherits System.Windows.Forms.Form

      Dim MyShape As New ArcViewShapeFileDLL.ShapeFiles
      Dim MaxX As Double = 0
      Dim MinX As Double = 0
      Dim MaxY As Double = 0
      Dim MinY As Double = 0
      Dim pbMaxX As Double = 0
      Dim pbMaxY As Double = 0
      Dim XDegPerPixel As Double = 0
      Dim YDegPerPixel As Double = 0
      Dim g As Graphics ' Declare a variable to hold a Graphics object
      Dim bmap As Bitmap ' Variable for Bitmap to be displayed in (PictureBox) control

#Region " Windows 窗体设计器生成的代码 "

      Public Sub New()
          MyBase.New()

          '该调用是 Windows 窗体设计器所必需的。
          InitializeComponent()

          '在 InitializeComponent() 调用之后添加任何初始化

      End Sub

      '窗体重写 dispose 以清理组件列表。
      Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
          If disposing Then
              If Not (components Is Nothing) Then
   &nb