我一般都是用代码的.

流程:
VB中添加ADO引用.
定义ADO连接对像与数据集
生成连接字串
连接数据库.
使用ADO对像执行查询,删除,修改等操作.
执行后关闭ADO对像,释放资源.

示例代码 :

    On Error Resume Next
    Dim SQL_DB As New ADODB.Connection    '生成ADO数据连接对象
    Dim SQL_Rs As New ADODB.Recordset     '数据集对象
    Dim SQL_Requete As String             'SQL语句
    Dim xID As String
    Dim xName As String
    Dim xPassword As String
    ConADODB_JET = "Provider=SQLOLEDB.1;User ID=" & SQL_DB_USER & ";password=" & SQL_DB_PASSWORD & ";Initial Catalog=" & SQL_DB_NAME & ";Data Source="
    SQL_CONNECTION_X = ConADODB_JET & SQL_DB_DATA_SOURCE

    SQL_DB.Open SQL_CONNECTION_X          '打开数据库
        If Len(Me.TextID.Text) > 8 Then
            Me.TextID.Text = Left(Me.TextID.Text, 8)
        End If
        xID = Trim(Me.TextID.Text)
        If xID = "" Then
            Exit Sub
        End If
        SQL_Requete = "select * from PA_PersonMain where [SID]='" & xID & "'"
        Set SQL_Rs = SQL_DB.Execute(SQL_Requete)
        If SQL_Rs.EOF = True Or SQL_Rs.BOF = True Then
            Me.TextUserName = ""
            Exit Sub
        End If
        xName = SQL_Rs.Fields("OperatorName")
        Me.TextUserName.Text = xName
    SQL_Rs.Close
    SQL_DB.Close