VB程序中实现数据更新

Question

我有一个Excel文档,想在VB程序中实现数据更新.具体情况如下:
字段名   aa  bb   cc   dd  ee  ff
数据记录 11  200    
         22  350    
         33  400
         44  600
         11  300
         22  350
现想实现情况为:
    如果aa=11,那cc=bb中的相应数据
    如果aa=22,那dd=bb中的相应数据
    如果aa=33,那ee=bb中的相应数据
    如果aa=44,那ff=bb中的相应数据
请问如何在程序代码中实现单击某一按钮,实现以上操作.
          谢谢!!!!!!!!!

Answer 1

1、用ADO打开到Excel文件的连接，连接字符串语法：
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MyExcel.xls;Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1""
其中Excel 8.0表示Excel版本是2000或以上，HDR=Yes表示第一行是字段。2、打开其中的你要修改的那个Sheet，语法：
Select * from [Sheet1$]3、其余操作与数据表一样。

Answer 2

我做不出本连接(Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MyExcel.xls;Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"")
我如果连接Provider=Microsoft.Jet.OLEDB.4.0,形成的语句为
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\tj\tj.xls;Persist Security Info=False且连接不成功.而按leayh(云卷云舒)提供的方法报语法错误
请问这是为什么?麻烦了
   谢谢

Answer 3

如果你直接用字符串连接不成功，那么可以有以下三种方法：
1、建立DSN，用DSN来连接；
2、你先引用一个ADO DataControl控件，在这个控件根据向导设置好连接字符串，把生成的连接字符串copy下来，把连接字符串赋给ADO Connection.ConnectionString，然后把ADO DataControl控件删掉就行了；
3、用连接生成器向导建立ODBC连接，也可以实现。

Answer 4

leayh(云卷云舒)你好
更新数据库记录时,本语句有问题吗?为什么无法更新,请指教?
Adodc1.RecordSource = "select * from tj$  where aa='11'"
Adodc1.RecordSource = "Update tj$ set cc = bb"
Adodc1.Refresh
谢谢!!!!!!!!

Answer 5

打开EXCEL引用，直接读写EXCEL的每一个格子的内容。在MSDN里搜索EXCEL，例子多得很。