VB的msflexgrid控件问题

显示全部楼层 · 2008-8-18 15:00:04

我在Msflexgrid 上面有这样几条显示
商品编号商品名称商品价格
01
橡皮擦
1.0
当我鼠标点到这个商品这一栏的时候 text1.text="橡皮擦"
我用datagrid控件直接在click事件就能做到。。如果在msflexgrid上怎么做到呢？代码该怎么编写？？商品有很多，随便点一个text1.text都会显示当前鼠标所点的这一行的商品名称。

千问 · 2008-8-18 15:00:04

根据你的问题,基本可以确定你是根据数据绑定控件来进行查询的,MSFLEXGRID虽然提供与DATA控件的绑定,但似乎不支持选中后自动移动记录集的当前记录位置.楼上两位的代码是可以实现你问题中的要求,但DATA的当前记录不会随之变化,可能不能与其它代码合用.所以即然您喜欢datagrid的用法,那还是用这个方法比较理想.Private Sub MSFlexGrid1_Click()Data1.Recordset.MoveFirstData1.Recordset.Move MSFlexGrid1.Row - 1End Sub代码说明:当表格被点击后,记录集移到首行,然后再移动表格的当前行号减一的量(在datagrid...

千问 · 2008-8-18 15:00:04

很简单，一样在MSFGird的CLICK事件里写上： MSFGird1.col=1text1.text=MSFGird1.text就行了...

千问 · 2008-8-18 15:00:04

也是click事件，text1.text=msflexgrid1.text 或者用TextMatrix Private Sub MSFlexGrid1_Click() With MSFlexGrid1 Text1.Text=.TextMatrix(.Row，2)'假设第2列是商品名End With End Sub...

千问 · 2008-8-18 15:00:04

同意 godiq - 同进士出身六级很简单，一样在MSFGird的CLICK事件里写上： MSFGird1.col=1 text1.text=MSFGird1.text 就行了...

千问 · 2008-8-18 15:00:04

TextMatrix Private Sub MSFlexGrid1_Click() With MSFlexGrid1 Text1.Text=.TextMatrix(.Row，2)'假设第2列是商品名 End With End Sub...