掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
配列をADOで操作するには? (ID:113605)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
オンメモリでレコードセット作りたいなら、 たとえばこんなかんじ。 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
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.