複数の一次元配列を基にして
表を作りそれにSqlを効かして結果をレコードセットで
受け取りたいのです。
例
社員ID Long
給料 Long
社員名 String
を表す3つの一次元データを一つの表にして
それにSQLを効かせたりといった事をしたいのですが。
ファイルを介さずに行えたら非常にうれしいです。
方法ないでしょうか?
オンメモリでレコードセット作りたいなら、
たとえばこんなかんじ。
Option Explicit
Dim rsTest As New ADODB.Recordset
Private Sub Command1_Click()
Dim i As Long
With rsTest
.Fields.Append "ID", adInteger
.Fields.Append "NAME", adBSTR, 255
.Fields.Append "SAL", adCurrency
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Open
End With
With rsTest
For i = 1 To 5
.AddNew
.Fields("ID").Value = i
.Fields("NAME").Value = String(5, Chr(Asc("a") + i - 1))
.Fields("SAL").Value = i * 100000
Next
End With
Set DataGrid1.DataSource = rsTest
End Sub
SQLはデータベース言語ですから本格的な動作を求めてるなら
DBMS(DataBase Management System)を決めていただかないと
使えないんじゃないでしょうか?。
Recordset オブジェクトの Find メソッド、Sort プロパティ
および Filter プロパティの利用で事足りるなら Say さんが
書込みされたローカルのレコードセットでやってしまえばいいかと。
ありがとうございます。
ちょっとしたデータに手軽にSQLを効かせて結果をえる方法が
ないかと思ったもので。
使い方も分かりましたし。
もう少しお聞きしたいのですが
使って用がなくなった後の処理はどうなるのでしょうか?
ファイルと接続しているわけではないですけど
最後でCloseとかしといたほうがいいでしょうか?