在Runtime新增TrackBar
Dim tbar As New TrackBartbar.Height = 40tbar.Width = 300Controls.Add(tbar)TrackBar屬性
- Orientation : TrackBar1.Orientation = Orientation.Vertical '將Track Bar設為垂直狀
- Small Change:用滑鼠或Page UP/Down幾次才可到底
- LargeChange:用滑鼠或Page UP/Down幾次才可到頂
- Maximum:TrackBar最大值
- Minimum:TrackBar最小值
- TickStyle:可以指定以下四種型態
--->練習程式下載<---
*這裡需要注意的是兩個Maximum與Minimum的差要一樣.
再利用TrackBar1_Scroll的事件, 在每次 TrackBar捲動時改變ProgressBar的值.
沒有留言:
張貼留言
歡迎留言討論,沒有登入也可以留言