有没有人做过这样的控件?
我想实现这样一个功能:
在User Control1中做一个Combox1,用户在combox1输入框中输入时,激活form2,在form2中有一个listview,其中显示从数据库中按照combox的值搜索得到的几个字段的值,此时,焦点要移回到combox1,使用户可以继续输入,输得越多,定位的越精确。当用户点击listview某一行时,将对应值付给combox1,主要是用来解决combox1的下拉选项非常多,用户很难选择的问题。
但是现在遇到的麻烦是:
1.无法将form2精确定位到combox的下方,(combox1所在的User COntrol1大小与combox一样,这样放在网页中,不会占据太大的空间。),用form2.left = combox1.left等不管用
2.当焦点移回到combox时,form2也被隐藏了,无法一直在网页上方
3.我曾经想不将combox1直接放到User Control1中,而是放在一个form1中,再将form1放在User Control1中,可是没法办到
谁做过类似的控件?或者有什么其它好的建议?
分不够可再加呀,

解决方案 »

  1.   

    可不可以加两个控件:combo和list,当combo得到输入时,list.visible=true ,当输入结束时,list.visible=fause?
    至于user control1的大小,可以用代码调节。trying........
      

  2.   

    Option ExplicitPrivate Sub Combo1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        UserControl.Height = Combo1.Height
        List1.Clear '//这里进行结果的处理
    Else
        UserControl.Height = Combo1.Height + List1.Height
        List1.AddItem Chr(KeyAscii) '//这里进行数据库筛选操作
    End If
    End SubPrivate Sub UserControl_Initialize()
    UserControl.Height = Combo1.Height
    UserControl.Width = Combo1.WidthEnd Sub
      

  3.   

    这样一来,UserControl.Height一改动,就会造成页面布局的改动呀?