StatusBar - интерфейс

Статья
11/05/2008

Обновлен: Ноябрь 2007

Представляет Строку состояния в интегрированной среде разработки Visual Studio.

Пространство имен: EnvDTE
Сборка: EnvDTE (в EnvDTE.dll)

Синтаксис

'Декларация
<GuidAttribute("C34301A1-3EF1-41D8-932A-FEA4A8A8CE0C")> _
Public Interface StatusBar
'Применение
Dim instance As StatusBar

[GuidAttribute("C34301A1-3EF1-41D8-932A-FEA4A8A8CE0C")]
public interface StatusBar

[GuidAttribute(L"C34301A1-3EF1-41D8-932A-FEA4A8A8CE0C")]
public interface class StatusBar

public interface StatusBar

Заметки

В интегрированной среде разработки имеется только один объект StatusBar.

В этом примере составляется перечень всех задач, включенных на данный момент в список TaskList, поэтому перед запуском кода следует убедиться, что в списке содержатся какие-либо задачи.

Примеры

Sub StatusBarExample()
   ' Create object references and initialize variables.
   Dim SBar As StatusBar
   Dim TList As TaskList
   Dim TItems As TaskItems
   Dim TI As TaskItem
   Dim count As Long
   Dim i As Long

   SBar = DTE.StatusBar
   ' Get references to Task List.
   TList = DTE.Windows().Item(Constants.vsWindowKindTaskList).Object
   TItems = TList.TaskItems
   i = 1
   count = TItems.Count
   
   ' Loop through Task List items, updating progress bar for each item.
   For Each TI In TItems
      SBar.Progress(True, TI.Description, i, count)
      SBar.SetLineColumnCharacter(i, count, 0)
      i = i + 1
      MsgBox("Task: " & i - 1 & vbCr & "Description: " & TI.Description & vbCr & "Next task item...")
   Next
   ' All done, so get rid of the bar.
   SBar.Progress(False)
End Sub

См. также

Ссылки

StatusBar - члены

EnvDTE - пространство имен

Поделиться через