Допустим есть база test.mdb в ней есть 2 таблиы:
cdnom (в ней поля: id_cd и cdnomer)
cdtext (в ней: id, text и id_cd - провязан с первой таблицей тогоже поля)

на форме имеется DataCombo и dataGrid

в Combe должны отражаться данные из таблице cdnom (все работает) номера дисков (допустим 1 2 3 4 5),

в DataGrid должны отражаться названия программ выбранного диска (не работает, отражается все содержимое таблици, а не выбранного диска)

При выборе номера диска должно отражаться содержимое только этого диска

Как это делается?

я понимаю, а как написать то кодом, мне негде посмотреть а самотыком я уж замучился

Все спасибо я только хотел все это сделать без операторов SQL

Я принципиально, если это приложение VB то зачем там должен быть SQL, это дополнительно его надо учить, а зачем.???

1. я видел прогу, (если в распечатке то на 50 стр.) так вот там ни одного SQL выражения
2. Processor примерно так и сделал и освежил, результат тот же, ну вот сами посмотрите:

это модуль:

Option Explicit
Public cnn As ADODB.Connection
Public prov As String

Public Sub conect()
Set cnn = New ADODB.Connection
cnn.CursorLocation = adUseClient
prov = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=test"
cnn.Open prov
End Sub

это форма:

Option Explicit
Private rsnom As ADODB.Recordset
Private rstext As ADODB.Recordset
Private Sub dc_Change()
Call conect
Set rstext = New ADODB.Recordset
Set rstext.ActiveConnection = cnn
If rstext.State = 1 Then rstext.Close

rstext.Open "cdtext"
rstext.Find "id_cd = '" & dc.Text & "'"
Set dg.DataSource = rstext

End Sub
Private Sub Form_Load()
Call conect
Set rsnom = New ADODB.Recordset
Set rsnom.ActiveConnection = cnn
If rsnom.State = 1 Then rsnom.Close
rsnom.Source = "cdnom"
rsnom.Open
dc.ListField = "cdnomer"
Set dc.RowSource = rsnom
Set dg.DataSource = rsnom
End Sub