VBでのACCESS操作について

かかし 2004-01-24 01:10:24 No: 81714 IP: [192.*.*.*]

VBからACCESSへのリンクは
    Dim cn As New ADODB.Connection
    Dim rs As New ADODB.Recordset

    Set cn = New ADODB.Connection
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\PCPARTS.mdb;"
    Set rs = New ADODB.Recordset

と、こんな感じで可能ですが、例えば
PCPARTSの中に以下の様なテーブルがあって（テーブル名:受付者）
受付番号  名前
１１１１  ひろし
１１１２  たかし
１１１３  よしお

VB内の関数でAを設定しておいて
A=１１１１,１１１２,１１１３
というように変数に値を入れるのは可能ですか？
ご教授御願いします。

編集削除

魔界の仮面弁士 2004-01-24 02:25:52 No: 81715 IP: [192.*.*.*]

やり方はいろいろあると思いますが、例えば、
rs.Open "SELECT [受付番号] FROM [受付者]", cn
A = rs.GetString(, , "", ",")
のようにしてみるとか。

編集削除