100分求如何实现combobox的下拉效果

Question

我要实现combox的下拉效果，请问怎么实先呢？
就是我现在有两个控件，一个textbox，一个msflexgrid，当textbox获得焦点时，显示msflexgrid，但是呢，那个msflexgrid要想combox的下拉框一样，当没有受起来时，其他的东西都不能用，当单击msflexgrid以外的任何地方时，把msflexgrid隐藏

Answer 1

1、在textbox_gotfocus事件里，对于msflexgrid进行定义，通过，move语句来定位
2、单击msflexgrid以处的任何地方，可以在msflexgrid_lostfocus事件里写语句，设置visible为false

Answer 2

要实现想combox的下拉效果呢？？

Answer 3

你可以在显示msflexgrid的同时设置其它的组件都lock=true或者enable=false
就可以实现其他的东西都不可用了

Answer 4

to  QQ576006(Ken) 
但是其他窗口的东西呢？还有我要单击任何一个东西都隐藏to  oyljerry(【勇敢的心】→ ㊣X-Monsieur㊣) 
 
   为什么不直接用combobox
 因为我不是在里面显示一个东西，我要显示好多项，我想用msflexgrid来显示to plmsoft() 
   ufgridsp.ocx 有你要的东西
  
 废你的话！！我要原码 

Answer 5

Private Sub Form_Click()
MSFlexGrid1.Visible = False
End SubPrivate Sub Form_Load()
MSFlexGrid1.Visible = False
End SubPrivate Sub MSFlexGrid1_LostFocus()
MSFlexGrid1.Visible = False
End SubPrivate Sub Text1_GotFocus()
MSFlexGrid1.Visible = True
MSFlexGrid1.SetFocus
End Sub