在使用ADO对象执行数据库操作时，如果不传递第一个参数值，则需要使用ADO对象的属性来设置连接字符串。以下是一个示例代码：

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset

Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset

' 设置连接字符串
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;"

' 打开连接
conn.Open

' 执行查询操作
rs.Open "SELECT * FROM mytable", conn

' 处理查询结果
Do Until rs.EOF
    ' 处理每一行数据
    ' ...

    rs.MoveNext
Loop

' 关闭连接和记录集
rs.Close
conn.Close

Set rs = Nothing
Set conn = Nothing

在上面的代码中，我们创建了一个ADODB.Connection对象和一个ADODB.Recordset对象。然后，通过设置conn.ConnectionString属性来设置连接字符串。接下来，使用conn.Open方法打开连接，然后使用rs.Open方法执行查询操作。

请确保根据你的实际情况修改连接字符串和查询语句。