初めましてよろしくお願いします。
開発環境はVB6です。

Private Sub Command1_Click()
sql = "SELECT TABLE_NAME FROM USER_TABLES"

Set session = CreateObject("OracleInProcServer.XOraSession")
Set Database = session.DbOpenDatabase("orcl", "yamato" & "/" & "kouei", 0&)

Set dynaset = Database.dbcreatedynaset(sql, 0&)
If dynaset.BOF = True And dynaset.EOF = True And dynaset.RecordCount = 0 Then
MsgBox "NoData"
Else
i = 1
Do Until dynaset.EOF
If i > 1 Then
Combo1.AddItem CStr(dynaset![TABLE_NAME])
Else
End If
i = i + 1
dynaset.MoveNext
Loop
End If

End Sub

こんな感じでコンボボックスを作ったのですが、
ボックスのリストをクリックした時に、選択したリストの内容全てが
フレキシブルグリッドに上手く表示できません。（選択は1つです）

お手数お掛けしますがよろしくお願いします。

すみません。
フレキシブルグリッドの記述がどこにもないのですが・・・
これではアドバイスできません。

> 開発環境はVB6です。

とありますが、もう少し詳細に記述願います。
ＯＳ、ＯＳのSPVer.、VB6のSPVer.などなど。

あとフレキシブルグリッドってGrapeCity(旧文化オリエント、BOC)製ですか？
グリッドのバージョンはいくつですか？