山寨机中的战斗机！	程序优化工程师到底对IT界有没有贡献

vsflexgrid控件显示数据的问题，我晕了........

楼主goldenLoveYou（迷茫的菜鸟）2005-08-01 12:10:20 在 VB / 控件提问

刚刚开始用vsflexgrid，7.0版本（PoJie)，手头只有一个网上下载的控件浏览对照表，很多地方讲解不全。
环境：SQL+VB6.0
要求：将SQL表中的数据显示在vsflexgrid中
程序部分：
dim rst as adodb.recordset
'连接部分就不写了，这部分没问题
set vsflexgrid.datasource=rst
vsflexrid.text=rst.filed(0) & ""

.text属性这里是用的Mshflexgrid中的，主要是实在找不到该用什么属性了...
这里不知道该用什么属性，就是不能把数据填入控件显示....是用哪个属性啊？mshflexgrid里面的.text在vsflexgrid中就没用，它只填入了1个单元格，而不是整张vsflexgrid 控件表。
麻烦给各位指点一下，如果可以，希望能加个QQ类的及时通方法，便于请教，谢谢问题点数：30、回复次数：9Top

1 楼goldenLoveYou（迷茫的菜鸟）回复于 2005-08-01 12:11:50 得分 0

通讯方法留在短信里面吧～～谢谢了～Top

2 楼TrueYi（）回复于 2005-08-01 12:13:10 得分 0

我提供的资料,可以看一下,较为全面的vsflexgrid
http://club.5ivb.net/dispbbs.asp?boardID=126&Page=1&ID=39602Top

3 楼TrueYi（）回复于 2005-08-01 12:16:45 得分 10

一般采用的是
.TextMatrix(i, j) =rst.filed(0) & ""
Top

4 楼xyhv（乌龙茶）回复于 2005-08-01 13:56:00 得分 10

Set vsflexgrid.DataSource = rst.CloneTop

5 楼fishmans（金脚指）回复于 2005-08-01 14:48:05 得分 10

.text是当前单元格内容
.TextMatrix(i, j) =rst.filed(0) & ""，I为行J为列Top

6 楼goldenLoveYou（迷茫的菜鸟）回复于 2005-08-01 15:52:38 得分 0

谢谢各位的回答！
VSFLEXGRID控件挂接数据这么麻烦啊？！

TO：fishmans(金脚指)及各位
我测试了，问题出现了，怎么过不了第十列？！，数据本来有19列，但是到了第10列就中止了，只显示了9列，后面的没有显示......，这是控件问题嘛？？还是POJIE的就这样？？
Top

7 楼fishmans（金脚指）回复于 2005-08-01 20:41:14 得分 0

你是怎么给网格赋值的？
绑定记录集还是写网格？

给代码看看Top

8 楼goldenLoveYou（迷茫的菜鸟）回复于 2005-08-02 09:57:16 得分 0

下面是我给VSFLEXGRID网格写入数据的部分代码，其中有自定义的函数1个
'*——ExecuteSQL()是1个挂接SQL数据库的函数，没任何问题。 MSFDATA是VSFLEXGRID控件名称。 DBRST是另一个ADODB.Recordset，其作用是向控件中写入的SQL表数据。SELTAB是一个选择打开表的名称。
Dim CountL As Integer
Dim CountC As Integer
Dim CCL As Integer
'Dim CCK As Integer
Dim Crst As ADODB.Recordset
Set Crst = ExecuteSQL("select count(*) from syscolumns where id=object_id('" & SelTab & "')") '*——此处是获取SQL表的列数目
CCL = Crst.Fields(0)
Set Crst = Nothing
Crst.Close
MsgBox CCL
'CCK = DBRst.RecordCount - 1
MsgBox CCK
For CountC = 0 To DBRst.recordCount-1
For CountL = 0 To CCL
'MsfData.Select CountC + 1, CountL + 1
MsfData.TextMatrix(CountC + 1, CountL + 1) = DBRst.Fields(CountL) & ""
Next CountL
DBRst.MoveNext
Next CountC

————————————————————————————————————————
程序中一些数据的结果 DBRST.Record-1=19 ，也就是说总共有19列
问题是VSFLEXGRID控件只显示了9列，行数是对的共43行，也就是说其他10列的数据没有。
有点乱，不知道看清楚没有。Top

9 楼goldenLoveYou（迷茫的菜鸟）回复于 2005-08-02 11:35:40 得分 0

哭了～～控件选择有问题，不应该选LIGHT的...........Top