如何用VB更新SQL中一列的数据？

Question

如数据库的名称是aa  表名是bb  列名是cc  现在cc列中有有的行是 0 ，有的是1 ，我想把所有的cc列的数据都改成 1 ，要用VB编写一个EXE程序来实现，就是不知道代码是怎样的，如下是SQL里的语句，就不知道VB里用什么样的代码来实现与SQL共同来执行，请大家帮忙，谢谢！
    use aa
    go
    UPDATE bb SET Type_no='dd' WHERE cc='1'

Answer 1

这是基本的数据工程.
创建数据库连接对象,设名为 conn
conn.exec "update bb set...."
就行了.

Answer 2

Sub acess连接方法()
'需引用 microsoft activex date objects 2.8
    Dim conn As ADODB.Connection    Set conn = New ADODB.Connection
    conn.ConnectionString = "Provider=Microsoft.Jet.Oledb.4.0;Data Source=aa.mdb"
    If conn.State = adStateOpen Then
        conn.exec "UPDATE bb SET cc=1"
        conn.Close
    End If
    Set conn = Nothing
End Sub