【正文】
plements ICommandPrivate m_pApp As IApplicationPrivate Property Get ICommand_BitMap() As ICommand_BitMap = End PropertyPrivate Property Get iCommand_Caption() As String iCommand_Caption = VB SoultionEnd PropertyPrivate Property Get iCommand_Category() As String iCommand_Category = MyVBSolutionEnd PropertyPrivate Property Get ICommand_Checked() As Boolean ICommand_Checked = FalseEnd PropertyPrivate Property Get ICommand_Enabled() As Boolean ICommand_Enabled = TrueEnd PropertyPrivate Property Get ICommand_HelpContextID() As Long 39。 加入一類模塊,該模塊包含了ARCOBJECTS接口ICOMMAND。其中ESRI Obj