首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

MsFlexGrid的Row怎么与ADO的RS记录相互关联

2012-02-04 
MsFlexGrid的Row如何与ADO的RS记录相互关联在MsFlexGrid控件中,显示数据库记录常用方法如下:sql select*

MsFlexGrid的Row如何与ADO的RS记录相互关联
在MsFlexGrid控件中,显示数据库记录常用方法如下:
  sql= "select   *   from   tname   "
        If   RS.State   =   1   Then   RS.Close
        RS.Open   SQL,   adoCN,   adOpenKeyset,   adLockOptimistic
        With   FG
                .Redraw   =   False
                .Rows   =   1
                .Rows   =   2
                iRow   =   0注释:irow   自己定义的变量,表示当前行
                Do   While   Not   RS.EOF
                        注释:使fg.rows   随记录变化
                        iRow   =   iRow   +   1
                        If   iRow   > =   .Rows   Then   .Rows   =   .Rows   +   1
                        .TextMatrix(iRow,   0)   =   rs(0)
                        .TextMatrix(iRow,   1)   =   rs(1)
                        ......
                        RS.MoveNext
                Loop
        End   With
End   Sub

从我查的资料看,ADO的RS记录通过TextMariX在MSFextGrid中显赫。
逆操作,点击MsFlexGrid的任何一行,返回MSHFlexGrid1.Row,再通过
MsFlexGrid.row获得MsFlexGrid.col(0),MsFlexGrid.col(1)值。

    Select   MsFlexGrid.col(0),MsFlexGrid.col(1)   From   表名

请教各位大侠的问题,
有什么方法,点击MsFlexGrid控件,MsFlexGrid.Row如何与ADO的RS记录相互关联。


[解决办法]
用关键字,比如rs(0)是关键字

sql= "select * from tname where keyname= " & MsFlexGrid.TextMatrix(MsFlexGrid.Row, 0)
If RS.State = 1 Then RS.Close
RS.Open SQL, adoCN, adOpenKeyset, adLockOptimistic

*****************************************************************************
欢迎使用CSDN论坛阅读器 : CSDN Reader(附全部源代码)
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html

热点排行