modanim.bas

来自「GIS软件」· BAS 代码 · 共 16 行

Attribute VB_Name = "Module1"
' This sample application and corresponding sample code is provided
' for example purposes only.  It has not undergone rigorous testing
' and as such should not be shipped as part of a final application
' without extensive testing on the part of the organization releasing
' the end-user product.

Type Vehicle
    fFeature As MapXLib.Feature
    sName As String
    lSpeed As Long
    dHeading As Double
End Type

Global fArray() As Vehicle