首页 相关文章 怎样添加一个下拉框到msflexgrid

怎样添加一个下拉框到msflexgrid

  首先应该建立一个combo1的comboBox控件,作为下拉框的最终实现工具。

  

Private Sub Combo1_Click()
MSFlexGrid1.Row = MSFlexGrid1.RowSel
MSFlexGrid1.Col = 2
MSFlexGrid1.Text = Combo1.Text
End Sub

'Private Sub Combo1_LostFocus()
'Combo1.Text = MSFlexGrid1.Text

'End Sub
Private Sub Form_Load()
Combo1.Visible = False
Combo1.AddItem "aaa"
Combo1.AddItem "bbb"
Combo1.AddItem "ccc"
MSFlexGrid1.Cols = 10
MSFlexGrid1.Rows = 10
End Sub
Private Sub MSFlexGrid1_EnterCell()
If MSFlex...[ 查看全文 ]

2016-02-19 标签:

怎样添加一个下拉框到msflexgrid的相关文章

手机页面
收藏网站 回到头部