Я уже просматривал и пробовал все рекомендации, которые я могу найти, но ничего не сработало. Моя проблема в том, что я хочу создать функцию поиска в форме и нажать кнопку, чтобы отобразить результаты поиска в подформе БЕЗ открытия нового описания.MS Access: выполнить запрос в подформе
Я написал запрос, который успешно выполняет поиск элементов на основе параметров, которые я им даю (параметры написаны в текстовых полях в форме).
У меня также есть кнопка в форме, которая открывает запрос. Но это открывает запрос в новом окне таблицы данных. Это не только делает это, но я уверен, что вообще ничего не делает для подчиненности.
Это все внутри большей формы навигации.
Edit: я буду включать код запроса, но это не так уж важно, так что я положу его в формате, который показывает только немного:
SELECT [Car Table].Car_VIN, [Car Table].Car_Class, [Car Table].Car_BodyType, [Car Table].Car_Colour, [Car Table].Car_Make, [Car Table].Car_Model, [Car Table].Car_EngineType, [Car Table].Car_TransmissionType, [Car Table].Car_GPSAvailability, [Car Table].Car_BootSpace, [Car Table].Car_FuelConsumptRate, [Car Table].Car_SeatNumber, [Car Table].Car_GreenStarRating, [Car Table].Car_ANCAPSafetyRating
FROM [Car Table]
WHERE ((([Car Table].Car_VIN) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![txtVIN] & "*") AND (([Car Table].Car_Class) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![cmbClass] & "*") AND (([Car Table].Car_BodyType) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![cmbBodyType] & "*") AND (([Car Table].Car_Colour) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![cmbBodyType] & "*") AND (([Car Table].Car_Make) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![txtMake] & "*") AND (([Car Table].Car_Model) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![txtModel] & "*") AND (([Car Table].Car_EngineType) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![cmbEngineType] & "*") AND (([Car Table].Car_TransmissionType) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![cmbTransmissionType] & "*") AND (([Car Table].Car_GPSAvailability) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![ChGPSAvailability] & "*") AND (([Car Table].Car_SeatNumber) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![txtSeatNumber] & "*") AND (([Car Table].Car_GreenStarRating) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![cmbGreenStarRating] & "*") AND (([Car Table].Car_ANCAPSafetyRating) Like "*" & [Forms]![Navigation Form]![NavigationSubform].[Form]![cmbANCAPSafetyRating] & "*") AND ((Abs([car_fuelconsumptrate]-[Forms]![Navigation Form]![NavigationSubform].[Form]![txtFuelConsumption]))<=2) AND ((Abs([car_bootspace]-[Forms]![Navigation Form]![NavigationSubform].[Form]![txtBootSpace]))<=100));
Я попытался создать кнопку, которая выполняет запрос на подчиненную форму, но запрос не сделал ничего, когда я щелкнул его, я предполагаю, потому что я действительно не ссылался на запрос сам по себе.
Я также попытался сделать форму с разделенным видом, но не только не получил нигде, я не хотел иметь разделенный вид.
RIGHT NOW У меня есть кнопка, которая запускает запрос, текстовые поля, в которые я могу ввести параметры (например, если я набрал 100 в текстовое поле загрузочного пространства, он вернет все значения около 100, включая 100, или если я также набрав «kia» в текстовое поле carmake, он вернет все автомобили с загрузочным пространством около 100 и Kias) и мою подформу под ней, которая полностью пустая.
Edit: VBA код
Private Sub Command409_Click()
Me.[Car Table subform1].Form.Requery
End Sub
Покажите нам значимые части вашего кода и то, что вы пробовали. – Mariano
@Mariano отредактировал :) – BlueRhapsody