请各位大侠帮帮吗？！我是初学者！！！！！！！！！！！！

Question

vb利用msflexgrid控件的时候，单击单击下拉菜单时这中间的代码怎么写啊！！！！！
还有我用的数据库是SQL假如数据库的名字是WH,表名为xm,请问该怎么实现这个显示内容，请把代码写出来看看
请大侠们多关照！

Answer 1

先把要显示的内容查询出来，再利用控件的Additem方法添加进来
dim rs as new adodc1.recordset
rs.open"xm"。
with rs 
  if not.eof and not  .bof then
    .movefist
    do while not.eof
     msflexgrid.additem !子段名 &vbtable &!子段名 &vbtable &
    .movenext
    loop
end with

Answer 2

还有我用的数据库是SQL假如数据库的名字是WH,表名为xm,请问该怎么实现这个显示内容，请把代码写出来看看
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
用以下的代码来实现和数据库的链接：
1.在ＶＢ工程下拉菜单点引用，引用一下Activex Dtae Objects
dim rs as adodb.recordset   '创建记录集对象
dim Conn as adodb.connection
dim strConn as string strconn = "数据库连接的代码"   '你可以新建一个文本把文件的扩展名改为udl然后链接一下　　　　　　　　　　　　　　　　数据库，然后把文件改成文本文件，把里面的第三行代码得　　　　　　　　　　　　　　　　制出来就可以了。
Set Conn = New ADODB.ConnectionConn.open strconnSet rs = New ADODB.Recordsetrs.open "select * from xm(你的表名)",conn,1,1set msflexgrid.datasoure = rs   '将ＲＳ集合赋到控件的数据源如果你是刚学ＶＢ建议你用控件吧，用控件会比较简单，再看看有关数据库操作方面的书。

Answer 3

to lz: 单击单击下拉菜单时这中间的代码怎么写啊！！！！！
--
是什么意思？