再也不用担心这个控件不会用，那个控件忘了什么用法。有事没事常来我这转转，你就想忘也忘不了啦
一：SSTab ? ?
1添加该部件
工程--部件--Microsoft Tabed Dialog Control 6.0
2选择SSTab,画出选项卡.
默认为3个选项卡。若想要多个，可以再该控件属性窗口中，更改Tabs(选项卡数目) 和 TabsPerRow(每一行中出现的选项卡号)
3 单击选项卡事件，可参考以下
Private Sub SSTab1_Click(PreviousTab As Integer)
Select Case SSTab1.Tab '选项卡
Case 1 '欢迎
MsgBox "welcome"
Case 2 '退出该过程
Unload Me
End Select
End Sub
二 ：MSHFlexGrid ? ? ? ? ? ? ? ?
1添加该部件
工程--部件--FlexGrid Control 6.0
2选择MSHFlexGrid ，画出该控件。
3让控件显示第一标题行，可参考
With MSHFlexGrid1
.Rows = 1 '显示一行
.Cols = 4 '显示4列
.CellAlignment = 4 '单元格的内容居中、居中对齐。
.TextMatrix(0,0) = "学号" '从第0行开始
.TextMatrix(0,1) = "卡号"
.TextMatrix(0,2) = "日期"
.TextMatrix(0,3) = "时间"
End With
? 注意，有时候我们发现让控件的内容居中显示，却总是无法显示全部。这时候就只需显示的时候，加一个trim。例如：.TextMatrix(1,1)=Trim(mrc.file(2)) trim在这里就把数据库中的空格舍去了。
4显示数据库中查询的结果，可参考如下（省略查表的过程，只写出控件显示过程）
Do While Not mrc.EOF
With MSFlexGrid1
.Rows = .Rows + 1
.TextMatrix(.Rows - 1,0) = mrc.Fields(0)
.TextMatrix(.Rows - 1,1) = mrc.Fields(1)
.TextMatrix(.Rows - 1,2) = mrc.Fields(2)
.TextMatrix(.Rows - 1,3) = mrc.Fields(3)
mrc.MoveNext
End With
Loop
三： comboBox
1 呈现下拉选项效果，可参考：
comboBox1.AddItem "卡号"
comboBox1.AddItem "姓名"
comboBox1.AddItem "上机时间"
comboBox1.AddItem "上机日期"
comboBox1.AddItem "机房号"
2 设置控件 不可手动输入，只能选择
设置style 属性，改为2-DropdownList
附图
?（一）
（二）
（三）
