关于MSFlexGrid的简单问题

Question

我把以下这段程序写在command.click()里
If rs.State = adStateOpen Then rs.Close
    rs.Open "SELECT 物品名称,分类名称,数量 FROM 物品表 where 物品名称 = '" & DBCombo1.Text & "'", cn, adOpenDynamic, adLockOptimistic
Set MSFlexGrid1.DataSource = rs可是一运行，它就提示出错：
实时错误“91”
对象变量或with块变量未设置然后看见
Set MSFlexGrid1.DataSource = rs
这一句反黄色了请问我是错在哪里呢？

Answer 1

如楼上所说，MSFLEXGRID不支持动态绑定，换成MSHFLEXGRID控件吧！！

Answer 2

哦，我明白了，谢谢楼上两位朋友。不好意思，我还有个小问题：
请问如果使在MSHFlexGrid的表格里信息居中显示呢？

Answer 3

上面写错了，应该是：
如何使在MSHFlexGrid的表格里信息居中显示呢？

Answer 4

MSHFlexGrid.Row = r
MSHFlexGrid.Col = c
MSHFlexGrid.CellAlignment = 1看它的帮助，指定行，指定列的对齐方式

Answer 5

关于怎么让mshflexgrid表格内容怎么居中 我也感觉很奇怪
因为我按msdn里的帮助  MSHFlexGrid1.CellAlignment 这个属性设置对齐方式 可是不管用
用.ColAlignment(0) = 4也不管用
郁闷！
不知道到底应该怎么做

Answer 6

请问一下在这里如果用了Set MSFlexGrid1.DataSource = rs我想在rs中添加一条纪录后，怎样让 MSFlexGrid1中的显示数据更新？rs不像Data控件那样有refresh语句

Answer 7

Set MSFlexGrid1.DataSource = rs我想在rs中添加一条纪录后，怎样让 MSFlexGrid1中的显示数据更新？
====================================
MSFlexGrid根本不支持ADO的，何来Set MSFlexGrid1.DataSource = rs 啊？

Answer 8

居中
MSHFlexGrid1.ColAlignmentFixed = 4  
MSHFlexGrid1.ColAlignment = 4       
MSHFlexGrid1.ColAlignment(1) = 4

Answer 9

各位大哥，我上面写错了请问一下在这里如果用了Set MSHFlexGrid1.DataSource = rs我想在rs中添加一条纪录后，怎样让 MSHFlexGrid1中的显示数据更新？rs不像Data控件那样有refresh语句

Answer 10

kinlin(小林) :你好，我照了你说的做，但还是不行哦，是不是在Form_Load()里写
MSHFlexGrid1.ColAlignmentFixed = 4  
MSHFlexGrid1.ColAlignment = 4       
MSHFlexGrid1.ColAlignment(1) = 4
这几句啊？

Answer 11

Private Sub Command1_Click()
MSHFlexGrid1.ColAlignmentFixed = 4  (作用于表头）
MSHFlexGrid1.ColAlignment = 4       （作用于表中内容） 
MSHFlexGrid1.ColAlignment(1) = 4    （作用于指定列）
End SubPrivate Sub Form_Load()
MSHFlexGrid1.Cols = 10
MSHFlexGrid1.Rows = 10
MSHFlexGrid1.TextMatrix(0, 2) = "A"
MSHFlexGrid1.TextMatrix(1, 2) = "B"
MSHFlexGrid1.TextMatrix(2, 2) = "C"
MSHFlexGrid1.TextMatrix(4, 5) = "D"End Sub
先付记录集然后居中