将数据库绑定到Dbgrid控件,鼠标右键单击某一行时触发某个事件,出现菜单选项。
1、用鼠标右键单击某一行,弹出菜单。选择复制,将该行各个项目的值赋给变量。
2、用鼠标右键单击某一行,弹出菜单。选择粘贴,将已赋值的变量的值分别赋给每一个cell,然后下移一条记录。
3、用鼠标右键单击某一行,弹出菜单。选择删除,用程序判断并找到该条记录,删除记录。

解决方案 »

  1.   

    Dbgrid.Text属性你研究一下一定会有所发现的!
      

  2.   

    不好意思,这两天硬盘坏了,上面的VB打不开了。代码无法现做现送。无非就是
    赋值:
    var1=data1.recordset!field1
    var2=data1.recordset!field2
    粘贴:
    data1.recordset.addnew
    data1.recordset!field1=var1
    ...
    data1.recordset.update

    dbgrid1.col=0
    dbgrid1.seltext=var1
    ...
    dbgrid1.row=2   一个移动到下一行的命令,记不清楚了。
      

  3.   

    to:lou_df、ouyangke
    thank .我会试试.先给lou_df加二分。有oicq号吗,做个朋友吧。
      

  4.   

    不好意思,没有装 oicq ,有空发 email 来:[email protected]