Question

vb中如何让MSFLEXGRID绑定combobox控件，望高手指教

vb中如何让MSFLEXGRID绑定combobox控件，双击msflexgrid某个单元格时，可以出现combobox控件，并可以选择combobox控件下拉列表的内容添加到msflexgrid这个单元格内，请问高手应该怎么做呀？解决问题后，将非常感谢，在线等 效果如下图所示

Answer 1

不能绑定。但可以实现你说的功能
实现的思路： 在msflexgrid的click事件中写处理代码，在点击的一瞬间把控件移动到当前列并显示出来。
搞一个窗口，添加msflexgrid命名为flex1;添加一个combox;窗口中添加下面的代码
（请你自己写flex1的初始化行列代码和添加combox1的项目）

Private Sub Flex1_Click()
with flex1

if .col=4 then
s_SetPosition combox1 '调用 s_SetPosition 把combox1 移动到第四列
end if
end with
end sub
‘把控件移动到flex1的当前列的过程
Private Sub s_SetPosition(oObj As Object)
Dim i
With Flex1
oObj.Top = .Top + .RowPos(.Row) + 50
If .Col = 5 Then oObj.Top = oObj.Top + 20
oObj.Left = .Left + 50
For i = 0 To .Col - 1
oObj.Left = oObj.Left + .ColWidth(i)
Next i
oObj.Visible = True
oObj.SetFocus
End With
End Sub
'在combox1的失去焦点事件中让他不可见。
Private Sub combox1_LostFocus()
combox1.Visible = False
End Sub

追问

谢谢你的回答，我还有点问题，为什么程序一开始要把从combobox移到第四列呢？s_SetPosition什么意思呢？还有“oObj”什么意思，代表combobox吗？我看的有点迷糊的

追答

第四列是我的例子，你使用时，是第几列，列数由你决定，是你想让combox出现的那一列。
oObj 是对象变量，也就是说，你还可以用来来实现msflexgrid里出现其他对象，比如文本框，这样，表格里可以输入；出现checkbox,出现单选钮等等....

光看没用，多做！把代码加到窗口里，看运行效果...

追问

恩 我试了，是可以的 谢谢你啊 ，我明白了，给你加悬赏哦亲