怎么添加msflexgrid控件

VB6.0可使用绑定到数据源、使用AddItem方法添加数据或逐一单元格添加数据，来向 MSFlexGrid控件添加数据。 1）使用绑定到数据源。 可使用ADODB数据源或Data控件绑定MSFlexGrid控件。 2）使用AddItem方法添加数据。 AddItem 方法 (MSHFlexGrid)，...

第一步：在“开始/运行”里输入：

regsvr32 c:\windows\system32\msflxgrd.ocx /s

第二步：然后在“工具栏（General）”就是VB界面左边栏空白处右键，部件，控件，勾选"Microsoft FlexGrid Control 6.0"，确定

打开VB，点工程-部件，找到Microsoft FlexGrid Controls 6.0，点上对勾，确定，然后在控件栏就可以看到MSFlexGrid，点一下它，就可以在窗口上画出一个出来。

以下是一个例子，添加完控件以后运行单击窗体可以看到效果

Private Sub Form_Click()

Dim Entry, i, Msg '声明变量。

Msg = "Choose OK to add 100 items to your MSFlexGrid."

MsgBox Msg '显示消息。

MSFlexGrid1.Cols = 2 '每行有两个字符串。

For i = 1 To 100 '从 1 计数到 100。

Entry = "Entry " &Chr(9) &i '创建项。

MSFlexGrid1.AddItem Entry '添加项。

Next i

Msg = "Choose OK to remove every other entry."

MsgBox Msg '显示消息。

For i = 1 To 50 '决定怎样删除

MSFlexGrid1.RemoveItem i '其它每一项。

Next i

Msg = "Choose OK to clear all items."

MsgBox Msg '显示消息。

MSFlexGrid1.Clear '清除列表框。

End Sub

---