Dim pCmdItem As ICommandItem Dim pUID As New UIDClass() pUID.Value = "{256176AD-0C33-406C-9ED8-9F7AC784A3E3}" pCmdItem = My.ArcMap.Application.Document.CommandBars.Find(pUID) pCmdItem.Execute() Dim tableWindow As ITableWindow3 = New TableWindow Dim pSet As ISet = Nothing tableWindow.Application = My.ArcMap.Application tableWindow.FindOpenTableWindows(pSet) pSet.Reset() tableWindow = pSet.Next While Not tableWindow Is Nothing If tableWindow.IsOpen Then tableWindow.TableControl.RemoveAndReloadCache() tableWindow.Refresh() End If tableWindow = pSet.Next End While
Dim pCmdItem As ICommandItem Dim pUID As New UIDClass() pUID.Value = "{256176AD-0C33-406C-9ED8-9F7AC784A3E3}" pCmdItem = My.ArcMap.Application.Document.CommandBars.Find(pUID) pCmdItem.Execute() Dim tableWindow As ITableWindow3 = New TableWindow Dim pSet As ISet = Nothing tableWindow.Application = My.ArcMap.Application tableWindow.FindOpenTableWindows(pSet) pSet.Reset() tableWindow = pSet.Next While Not tableWindow Is Nothing If tableWindow.IsOpen Then tableWindow.TableControl.RemoveAndReloadCache() tableWindow.TableControl.Redraw() tableWindow.Refresh() End If tableWindow = pSet.Next End While
Dim pCmdItem As ICommandItem Dim pUID As New UIDClass() pUID.Value = "{256176AD-0C33-406C-9ED8-9F7AC784A3E3}" pCmdItem = My.ArcMap.Application.Document.CommandBars.Find(pUID) pCmdItem.Execute() Dim tableWindow As ITableWindow3 = New TableWindow Dim pSet As ISet = Nothing tableWindow.Application = My.ArcMap.Application tableWindow.FindOpenTableWindows(pSet) pSet.Reset() tableWindow = pSet.Next While Not tableWindow Is Nothing If tableWindow.IsOpen Then tableWindow.TableControl.EditChanged() tableWindow.TableControl.RemoveAndReloadCache() tableWindow.TableControl.Redraw() tableWindow.Refresh() End If tableWindow = pSet.Next End While
>> But if I reorder the Table with the GUI
Explain?