и начать с раздела "Приступая к работе" | Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > MS Access > Вопрос по Access-у |
| Автор: Markus 22.10.2004, 21:29 |
| У меня пару вопросов по использованию таблицы в качестве хранения данных, которые (данные) время от времени должны обновляться. Есть таблица tabl1, в ней поля k1,k2,k3. В ней должна быть всего одна запись, в которой будут хранится текущие коэффициенты. 1) Как мне сделать, чтобы формой вводились значения в эти ячейки? Я имею ввиду, чтобы при нажатии на кнопку в форме предыдущие значения в таблице заменялись новыми, введеными в поля формы. 2) Как в базе ссылаться на эти ячейки (одним словом, как мне ими пользоваться)? |
| Автор: geo 25.10.2004, 19:07 |
| делаешь форму, источник строк - tabl1. На форму кидаешь textbox, где источник строк - поле k1, и т.д. Все должно работат. |
| Автор: Markus 25.10.2004, 22:33 |
| А можно в этой форме как-то заблокировать кнопки вперед, назад, добавить запись и т.д.? |
| Автор: Akina 26.10.2004, 08:52 |
| Да можно вообще убрать панель навигации по записям... а еще можно хелп по Аксессу почитать... и начать с раздела "Приступая к работе" |
| Автор: geo 26.10.2004, 09:56 |
| NavigationButtons Property See AlsoApplies ToExampleSpecificsYou can use the NavigationButtons property to specify whether navigation buttons and a record number box are displayed on a form. Read/write Boolean. expression.NavigationButtons expression Required. An expression that returns one of the objects in the Applies To list. Remarks The NavigationButtons property uses the following settings. Setting Visual Basic Description Yes True (Default) The form has navigation buttons and a record number box. No False The form doesn't have navigation buttons or a record number box. Note You can set this property by using the form's property sheet, a macro, or Visual Basic. Navigation buttons provide an efficient way to move to the first, previous, next, last, or blank (new) record. The record number box displays the number of the current record. The total number of records is displayed next to the navigation buttons. You can enter a number in the record number box to move to a particular record. If you remove the navigation buttons from a form and want to create your owns means of navigation for the form, you can create custom navigation buttons and add them to the form. Example The following example returns the value of the Navigation Buttons property for the "Order Entry" form. Dim b As Boolean b = Forms("Order Entry").NavigationButtons |
| Автор: Guest 26.10.2004, 18:48 |
| Akina очень смешно geo thanx |
| Автор: Markus 26.10.2004, 23:14 |
| Все прикольно, спасибо. Только вот проблебка еще одна: я когда Tab нажимаю для перехода по полям, при переходе с последнего поля осуществляется переход на след запись. Как можно от этого избавиться? |
| Автор: Akina 27.10.2004, 08:54 |
| Сервис - Параметры - Клавиатура |
| Автор: geo 27.10.2004, 09:42 |
| на следующую или на новую? Если на новую то смотри свойство AllowAdditions в форме. Если на следующую то смотри совет Akina и смотря что тебе надо. Вообщето лучшебы четко сформулировать что тебе надо. |
| Автор: shilnik 27.10.2004, 13:17 |
| Там гдето в свойствах формы можно выставить табуляцию только по текущей записи. |
| Автор: Guest 3.11.2004, 17:47 |
| Оращаться к этим полям нужно запросом ... Проблемма возникает тогда когда нужно поместить значение в запрос или ещё куда ... Вот пример решения проблеммы: -Берёт первое поле запроса при ошибке даёт 0 Function ЗапросВПоле(ТекстЗапроса As String) As Variant On Error GoTo ОбработчикОшибокФункцииЗапросВПоле Dim База As DAO.Database Dim Рекордсет As DAO.Recordset Set База = CurrentDb Set Рекордсет = База.OpenRecordset(ТекстЗапроса) If Рекордсет.RecordCount > 0 Then Рекордсет.MoveFirst ЗапросВПоле = Nz(Рекордсет.Fields(0).Value) If IsEmpty(ЗапросВПоле) Then ЗапросВПоле = 0 Else ЗапросВПоле = 0 End If Рекордсет.Close База.Close Set Рекордсет = Nothing Set База = Nothing Выход: Exit Function ОбработчикОшибокФункцииЗапросВПоле: ЗапросВПоле = 0 Resume Выход End Function |
| Автор: Lavda 3.11.2004, 17:50 |
| Главное функцию записать в модуль текущей базы ... потому как почему-то функции из присоедененных баз не работают в запросах...(( |