Interfejs StatusBar

Reprezentuje Pasek stanu w Visual Studio zintegrowane środowisko programistyczne (IDE).

Przestrzeń nazw:  EnvDTE
Zestaw:  EnvDTE (w EnvDTE.dll)

Składnia

'Deklaracja
<GuidAttribute("C34301A1-3EF1-41D8-932A-FEA4A8A8CE0C")> _
Public Interface StatusBar

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

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

[<GuidAttribute("C34301A1-3EF1-41D8-932A-FEA4A8A8CE0C")>]
type StatusBar =  interface end

public interface StatusBar

Typ StatusBar uwidacznia następujące elementy członkowskie.

Właściwości

	Nazwa	Opis
	DTE	Pobiera obiekt rozszerzeń najwyższego poziomu.
	Parent	Pobiera obiekt nadrzędny natychmiastowe StatusBar obiektu.
	Text	Ustawia lub pobiera zaznaczonego tekstu.

Początek

Metody

	Nazwa	Opis
	Animate	Wyświetla obraz animowany w StatusBar.
	Clear	Usunie cały tekst z StatusBar.
	Highlight	Włącza lub wyłącza wyróżnianie tekstu w StatusBar.
	Progress	Tworzy, modyfikuje i usuwa wewnątrz formantu licznika StatusBar .
	SetLineColumnCharacter	Ustawia tekst kolumny i charakter wskaźników w StatusBar .
	SetXYWidthHeight	Ustawia x, y, szerokość i wysokość wskaźników współrzędnych w StatusBar.
	ShowTextUpdates	Określa, czy StatusBar pokazuje tekst aktualizacje.

Początek

Uwagi

Jest tylko jedna StatusBar obiektu w IDE.

Ponieważ w tym przykładzie wyświetla listę wszystkich zadań, które są obecnie w TaskList, upewnij się przed uruchomieniem kod zawiera niektóre zadania.

Przykłady

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

Zobacz też

Informacje

Przestrzeń nazw EnvDTE