NIM007299 for No Product Found

漏洞 ID 编号	NIM007299
已提交	March 9, 2007
上次修改时间	June 5, 2024
适用范围	No Product Found
找到的版本	9.0
编程语言	VBA
状态	Will Not Be Addressed

附加信息

No Public Explanation

解决办法

Changed VBA code to skip toolcontrol and menus as follows to retest: Dim pCmdItem As ICommandItem Dim i As Integer For i = 0 To pCmdBar.Count - 1 Set pCmdItem = pCmdBar.Item(i) If (pCmdItem.Type = esriCmdTypeCommand) Then If Not pCmdItem.Command is Nothing Then If Not TypeOf pCmdItem.Command Is IToolControl Then pCmdItem.Refresh End If End If End If Next iIt seems to work but occasionally ArcMap still crashes or disappears.- When current tool is on the toolbar to be refreshed- Refreshing the commands on standard toolbar