DataComboにレコードセットをsetするには。。。 (ID:113233)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 たとえばこんなかんじ。 Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim strSQL As String strSQL = "select aa from hh" cn.CursorLocation = adUseClient cn.Open "接続文字列" rs.Open strSQL, cn Set DataCombo1.RowSource = rs DataCombo1.ListField = "aa"