Поиск в базе данных

[Tenzor]

Здравствуйте. Вопрос в следующем. Есть textbox в котром есть число, так же есть база данных. Надо, чтобы по нажатию на кнопку производился поиск в базе и выбиралась запись с ближайшим меньшим числом по отношению к числу находящемуся в textbox (т.е. если число в textbox=10, то из базы выбирается число 9,4). Просто с базами дела не имел, и из-за этого вся работа стоит.

[Денис]

Что УЖЕ сделано на пути решения задачи?

[Tenzor]

Составлена база, и сделан расчёт, осталось только вот это, я даже не знаю с чего начать

[Хакер]

"Составлена база" не входит в ряд мер, необходимый для решения проблемы, тебе не кажется?.

Если не знаешь, с чего начать - печально, что ты вообще взялся за такое дело. Начать с запроса. И кончить им же.

[Tenzor]

Ладно жалеть меня будете потом, а пока, неужели так трудно показать простенький пример. Есть форма, на ней textbox с цифрой и кнопкой. Надо, чтоб по нажатию кнопы, искалось ближайшее меньшее число из поля расхода в базе. Неужели это такой сложный пример?

[alibek]

Если ты читал объявление в этом разделе, то мог заметить, что домашние задания здесь не решают, их надо делать самостоятельно.
Задача примитивная и для ее решения достаточно минимальных усилий. А не решена она потому что даже попыток решить ее не было.

[Tenzor]

сделал такую штуку
Private Sub Command2_Click()
Dim DB As dao.Database
Dim RS As dao.Recordset
Set DB = OpenDatabase(App.Path & "\db2.mdb")
Set RS = DB.OpenRecordset("SELECT TOP 1 * From tabl Where q Б=" & Val(Me!Text13))
Set Data1.Recordset = RS
End Sub

но, он выдаёт все записи которые меньше, но начиная с первой, а если меняю < на >, то выдаётся одна запись которая которая больше, т.е. работает, но не в ту сторону. Чувствую, ведь осталась одна мелочь, но...

[alibek]

q < ... order by ...

[Tenzor]

спасибо. помогло