?? 在設計編輯時,如何在tabstrip控件的選項卡之間進行切換.txt
字號:
TabStrip不 如 SSTab好 使 , 主 要 就 體 現 在 設 計 時 , SSTab可 以 比 較 方 便 地 切 換 選 項 卡 。
你 可 以 看 看 TabStrip的 Click事 件 :
Private Sub tbsOptions_Click()
Dim i As Integer
'顯 示 并 使 選 項 的 控 件 可 用
'并 且 隱 藏 使 其 他 被 禁 用
For i = 0 To tbsOptions.Tabs.Count - 1
If i = tbsOptions.SelectedItem.Index - 1 Then
picOptions(i).Left = 210
picOptions(i).Enabled = True
Else
picOptions(i).Left = -20000
picOptions(i).Enabled = False
End If
Next
End Sub
每 個 選 項 對 應 picOptions()控 件 數 組 中 的 一 個 。 第 一 個 為 picOptions(0), 第 二 個 為 picOptions(1), 依 次 類 推 。 如 果 你 想 修 改 其 他 的 選 項 , 就 在 屬 性 窗 口 中 選 擇 相 應 的 picOptions, 然 后 修 改 該 控 件 的 Left屬 性 , 這 樣 你 就 可 以 看 到 picOptions了 。
<END>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -