VB學習筆記－－控制項（2）

10.Frame
用於對其它控制項進行分組
常用屬性：Name，Caption,Font
注意：添加Frame內的控制項時在Frame內部繪製其它控制項。如果是把外部的控制項移動到內部則移動時控制項和Frame不會一起移

動。

11.Microsoft Hierarchical FlexGrid（功能比較強，相當麻煩，需要用時再深入瞭解）
1)基本用法
MSHFlexGrid與MSFlexGrid以網格形式顯示Recordset資料。與DataGrid類似，但是不同的是MSHFlexGrid不允許編輯資料

。不過，通過將它與TextBox結合也可以實現編輯功能。

MSHFlexGrid支援以下功能：在對包含字串和圖片的表格進行分類、合并以及格式化時，具有完全的靈活性。當綁定到

Data 控制項上時，MSHFlexGrid 所顯示的是唯讀資料。
可以將文本、圖片，或者文本和圖片，放在MSHFlexGrid 的任意單元中。Row 和 Col 屬性指定了MSHFlexGrid 中的當前

單元。程式員可以在代碼中指定當前單元，也可以在運行時，使用滑鼠或者方向鍵來對其進行修改。Text 屬性引用當前單元

的內容。
如果單元的文本過長而不能在該單元中顯示，而且 WordWrap 屬性被設定為 True，那麼文本就會換行到同一單元內的下一

行。為了顯示換行的文本，可能需要增加單元的列寬度（ColWidth 屬性）或者行高度（RowHeight 屬性）。
可以用 Cols 和 Rows 屬性來決定MSHFlexGrid 控制項中的列數和行數。
常用綁定資料屬性：DataSource,DataMember
例：
Dim Cn As New Connection,Rs As New Recordset
Cn.ConnectionString="..."
Cn.Provider = "MSDataShape"
Cn.CursorLocation=adUseNone
Cn.Open
Rs.Source="Select * from Test"
Set Rs.ActiveConnection=Cn
Rs.Open
Set MSHFlexGrid.DataSource=Rs

12.HScrollBar和VScrollBar
Change事件：在捲動方塊移動後發生
Scroll事件：在捲動方塊移動時發生，單擊滾動簡單或捲軸時不發生
Value，Min，Max屬性：位置值為整數
LargeChange屬性：單擊捲軸時移動量
SmallChange屬性：單擊兩端箭頭時的移動量

13.Image
1)支援圖片類型：Bitmap(.bmp,.dib),Icon(.ico),Cursor(.cur),Metafile(普通的.wmf，增強.emf),JPEG,GIF
2)載入：LoadPicture，如：
Set Image.Picture = LoadPicture("...",vbLpLarge,vbLPColor)
若為Set Image.Picture = LoadPicture 不指定檔案則為清除圖形
3)Stretch屬性：為True時可調整Image控制項大小

14.Label
常用屬性：
Caption:顯示文本
AutoSize：為True時自動調整寬度
WordWrap：為True時自動換行並垂直擴充

15.Line
常用屬性：BorderStyle，BorderColor

16.ListBox
1)基本用法
Click和DblClick事件
添加項目：<box>.AddItem <item,[index]>
刪除項目：<box>.RemoveItem <index>
通過Text屬性擷取內容：<box>.Text
通過List屬性訪問清單項目：<box>.List(index)
通過ListIndex屬性判斷位置：從0開始，未選擇時為-1
2)多列和多選項列表框
Columns屬性：0垂直滾動的單列列表框，1水平滾動的單列列表框，>1水平滾動的多列列表框
MultiSelect屬性：0標準列表框，1簡單多項選擇;單擊或按Space鍵選定或撤銷選定項;2擴充多項選擇，可用Shift和Ctrl選定

17.OLE容器
可以通過OLE控制項將基於Windows的應用程式中的資料。通常用來建立以文檔處理為中心的應用程式。

18.OptionButton
一組內只能選中一個OptionButton，一般結合Frame使用
Click事件;Value屬性;&捷徑;Style屬性;Picture屬性;DownPicture屬性;DisablePicture屬性

19.PictureBox
與Image類似，不同的是PictureBox可以作為其它控制項的容器和支援圖形方法
調整圖片的大小時需要將AutoSize屬性設為True
圖形方法：Circle，Line，Point 例：Picture.AutoRedraw = True    Picture.Circle(1200,1000),750
Print方法：將AutoRedraw屬性設為True，然後使用Print

20.RemoteData
通常用於遠端資料物件。相容Data控制項，不支援Image資料類型。ADO Data適用性更廣，推薦使用ADO Data。
與資料相關屬性：
Connect，UserName，Password，SQL，RowSetSize（返回結果集的行數），ReadOnly（資料是否可寫入），

CursorDriver（決定驅動程式的位置和類型），LockType（確定其它人更改資料時的鎖定類型：optimistic自由查看和更

改，pessimistic則更改時鎖定資料庫），BOFAction/EOFAction（控制項位於游標的開始的未尾時的行為，包括停留在開始

和未尾、移動到第一個或最後一個記錄，或在未尾時可以添加一個新記錄），ResultSetType（游標是靜態或鍵集類型），

KeySetSize（游標為鍵集類型時，可最佳化返回結果集的大小），LoginTimeOut（等待時間），MaxRows（游標大小），

Options（是否非同步執行查詢），Prompt，QueryTimeOut（查詢等待時間），BatchSize（批處理髮送多少條語句）

21.Shape
Style屬性：
1）矩形： 0 vbShapeRectangle
2)正方形：1 vbShapeSquare
3)橢圓形：2 vbShapeOval
4)圓形：  3 vbShapeCircle
5)圓角矩形：4 vbShapeRoundedRectangle
5)圓角正方形：5 vbShapeRoundedSquare
FillStyle，BorderStyle，BackColor，FillColor屬性

22.TextBox
1)基本屬性
MultiLine屬性：自動換行
SelStart，SelLength，SelLength屬性：選擇文本的屬性
PasswordChar屬性：密碼框
MaxLength屬性：輸入長度限制
2)取消文字框擊索引值
KeyPress事件節流或轉換輸入的字元，若將KeyAscii置為0取消索引值。
例：限制輸入的為數字
Private Sub txtEnterNums_KeyPress（KeyAscii As Integer）
 If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then
  KeyAscii = 0
 End If
End Sub
3)唯讀文字框：Locked屬性

23.Timer
Interval屬性：時間間隔，單位毫秒