StatusBar 介面
代表在 Visual Studio 整合式開發環境 (IDE) 中的 [狀態列]。
命名空間: EnvDTE
組件: EnvDTE (在 EnvDTE.dll 中)
語法
'宣告
<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
StatusBar 類型會公開下列成員。
屬性
名稱 | 描述 | |
---|---|---|
DTE | 取得最上層的擴充性物件。 | |
Parent | 取得 StatusBar 物件的直屬父物件。 | |
Text | 設定或取得選取文字。 |
回頁首
方法
名稱 | 描述 | |
---|---|---|
Animate | 在 StatusBar 中顯示動畫。 | |
Clear | 從 StatusBar 清除所有文字。 | |
Highlight | 在 StatusBar 中切換文字的反白顯示。 | |
Progress | 建立、修改和清除 StatusBar 中的計量表控制項。 | |
SetLineColumnCharacter | 設定 StatusBar 中的文字欄和字元指示器 (Indicator)。 | |
SetXYWidthHeight | 設定 StatusBar 中的 x、y、寬度和高度座標指示器。 | |
ShowTextUpdates | 決定 StatusBar 是否顯示文字更新。 |
回頁首
備註
在 IDE 中只有一個 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