MsfleGrid.textmatrix(i,i)在Datagrid中有对应的函数吗

WangYang123 2003-08-20 08:40:31

MsfleGrid.textmatrix(i,i)在Datagrid中有对应的函数吗
目的，保存Datagrid中的数据到相应的Access数据表之中。

...全文

116 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

WangYang123 2003-08-20

打赏
举报

Rs.CursorLocation = adUseClient
CN,
adOpenDynamic,
adLockBatchOptimistic
请解释具体含义，谢谢

didishu0807 2003-08-20

打赏
举报

Rs.CursorLocation = adUseClient
Rs.Open "select * from table1", cnn, adOpenDynamic, adLockBatchOptimistic
Set DataGrid1.DataSource = Rs

of123 2003-08-20

打赏
举报

Datagrid是针对数据绑定设计的，所以它的操作面向记录集，而不是MsfleGrid的Cell。
例如Datagrid没有Rows属性来确定行数，也不能通过一个绝对行序号移动到一条记录。它的行属性都是针对当前可见行的。
所以从MsfleGrid改用Datagrid，要转换思维方式。

lihonggen0 2003-08-20

打赏
举报

你也可以象这样赋值：

DataGrid1.Row = 2
DataGrid1.Columns(1).Text="sds"

lihonggen0 2003-08-20

打赏
举报

Rs.CursorLocation = adUseClient
Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic

Set DataGrid1.DataSource = Rs

直接操作Rs比较方便

VB程序运行时对MSFlexGrid单元格数据进行计算

NI和vsFlexGrid控件.part2，共三部分！！ VB代码： VSFlexGrid1.ExplorerBar = flexExSortShow Dim i As Long With VSFlexGrid1 .Cell(flexcpChecked, 1, 0, 3, 0) = flexUnchecked .Cell(flexcpAlignment, 0, 0, .Rows - 1, .Cols - 1) = flexAlignCenterCenter .Cols = 5 .Rows = 4 For i = 1 To 4 .TextMatrix(0, i) = "学生档案 " .ColAlignment(i) = 4 Next .TextMatrix(1, 0) = "序号 " .TextMatrix(2, 0) = "2 " .TextMatrix(3, 0) = "2 " .TextMatrix(1, 1) = "姓名 " .TextMatrix(1, 2) = "姓名 " .TextMatrix(1, 3) = "性别 " .TextMatrix(1, 4) = "年龄 " .MergeCells = flexMergeRestrictRows .MergeRow(0) = True .MergeRow(1) = True .MergeCol(0) = True For i = 1 To .Rows - 1 .Cell(flexcpBackColor, i, 1, i, 4) = RGB(i * 100, i * 100, i * 100) Next End With VC代码： m_vsgshow.SetCols(5); m_vsgshow.SetRows(4); for (int i=0;i<5;i++) { m_vsgshow.SetTextMatrix(0,i,"学生档案"); m_vsgshow.SetColAlignment(i,4); } m_vsgshow.SetTextMatrix(1,0,"序号"); m_vsgshow.SetTextMatrix(2,0,"2"); m_vsgshow.SetTextMatrix(3,0,"2"); m_vsgshow.SetTextMatrix(1,1,"姓名"); m_vsgshow.SetTextMatrix(1,2,"姓名"); m_vsgshow.SetTextMatrix(1,3,"性别"); m_vsgshow.SetTextMatrix(1,4,"年龄"); m_vsgshow.SetMergeCells(2); m_vsgshow.SetMergeRow(0,true); m_vsgshow.SetMergeRow(1,true); m_vsgshow.SetMergeCol(0,true); // m_vsgshow.SetCellChecked(1); for (i=1;i

VB6.0统计MSHFLexGrid控件中的各种数据

NI和vsFlexGrid控件.part3，共三部分！！ VB代码： VSFlexGrid1.ExplorerBar = flexExSortShow Dim i As Long With VSFlexGrid1 .Cell(flexcpChecked, 1, 0, 3, 0) = flexUnchecked .Cell(flexcpAlignment, 0, 0, .Rows - 1, .Cols - 1) = flexAlignCenterCenter .Cols = 5 .Rows = 4 For i = 1 To 4 .TextMatrix(0, i) = "学生档案 " .ColAlignment(i) = 4 Next .TextMatrix(1, 0) = "序号 " .TextMatrix(2, 0) = "2 " .TextMatrix(3, 0) = "2 " .TextMatrix(1, 1) = "姓名 " .TextMatrix(1, 2) = "姓名 " .TextMatrix(1, 3) = "性别 " .TextMatrix(1, 4) = "年龄 " .MergeCells = flexMergeRestrictRows .MergeRow(0) = True .MergeRow(1) = True .MergeCol(0) = True For i = 1 To .Rows - 1 .Cell(flexcpBackColor, i, 1, i, 4) = RGB(i * 100, i * 100, i * 100) Next End With VC代码： m_vsgshow.SetCols(5); m_vsgshow.SetRows(4); for (int i=0;i<5;i++) { m_vsgshow.SetTextMatrix(0,i,"学生档案"); m_vsgshow.SetColAlignment(i,4); } m_vsgshow.SetTextMatrix(1,0,"序号"); m_vsgshow.SetTextMatrix(2,0,"2"); m_vsgshow.SetTextMatrix(3,0,"2"); m_vsgshow.SetTextMatrix(1,1,"姓名"); m_vsgshow.SetTextMatrix(1,2,"姓名"); m_vsgshow.SetTextMatrix(1,3,"性别"); m_vsgshow.SetTextMatrix(1,4,"年龄"); m_vsgshow.SetMergeCells(2); m_vsgshow.SetMergeRow(0,true); m_vsgshow.SetMergeRow(1,true); m_vsgshow.SetMergeCol(0,true); // m_vsgshow.SetCellChecked(1); for (i=1;i

NI和vsFlexGrid控件.part1，共三部分！！ VB代码： VSFlexGrid1.ExplorerBar = flexExSortShow Dim i As Long With VSFlexGrid1 .Cell(flexcpChecked, 1, 0, 3, 0) = flexUnchecked .Cell(flexcpAlignment, 0, 0, .Rows - 1, .Cols - 1) = flexAlignCenterCenter .Cols = 5 .Rows = 4 For i = 1 To 4 .TextMatrix(0, i) = "学生档案 " .ColAlignment(i) = 4 Next .TextMatrix(1, 0) = "序号 " .TextMatrix(2, 0) = "2 " .TextMatrix(3, 0) = "2 " .TextMatrix(1, 1) = "姓名 " .TextMatrix(1, 2) = "姓名 " .TextMatrix(1, 3) = "性别 " .TextMatrix(1, 4) = "年龄 " .MergeCells = flexMergeRestrictRows .MergeRow(0) = True .MergeRow(1) = True .MergeCol(0) = True For i = 1 To .Rows - 1 .Cell(flexcpBackColor, i, 1, i, 4) = RGB(i * 100, i * 100, i * 100) Next End With VC代码： m_vsgshow.SetCols(5); m_vsgshow.SetRows(4); for (int i=0;i<5;i++) { m_vsgshow.SetTextMatrix(0,i,"学生档案"); m_vsgshow.SetColAlignment(i,4); } m_vsgshow.SetTextMatrix(1,0,"序号"); m_vsgshow.SetTextMatrix(2,0,"2"); m_vsgshow.SetTextMatrix(3,0,"2"); m_vsgshow.SetTextMatrix(1,1,"姓名"); m_vsgshow.SetTextMatrix(1,2,"姓名"); m_vsgshow.SetTextMatrix(1,3,"性别"); m_vsgshow.SetTextMatrix(1,4,"年龄"); m_vsgshow.SetMergeCells(2); m_vsgshow.SetMergeRow(0,true); m_vsgshow.SetMergeRow(1,true); m_vsgshow.SetMergeCol(0,true); // m_vsgshow.SetCellChecked(1); for (i=1;i

VB基础类

7,789

社区成员

197,583

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章