ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Условие в выражении
8 сообщений из 8, страница 1 из 1
Условие в выражении
    #32101463
Олег Юрков
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Олег Юрков
Гость
Требуется вычислять значение в форме в зависимости от значения в другом поле. Например если в поле1="а", то значение в поле2=100/2,86, а если "б", то 100/3,13. Подскажите, пожалуйста, как это сделать, если можно, киньте пример...
...
Рейтинг: 0 / 0
05.02.2003, 12:10
| Ответить | Цитировать | Написать  
Условие в выражении
    #32101529
RiliR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RiliR
Участник
Например:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Private Sub Field1_Change
    Select Case Field1.Value
    Case  "а" 
        Field2.Value = CStr( 100  /  2 . 86 )
    Case  "б" 
        Field2.Value = CStr( 100  /  3 . 13 )
    Case Else
        Field2.Value = ""
    End Select
End Sub


Хотя можно вместо Select Case использовать конструкцию If-Then-Else, это дело вкуса.
...
Рейтинг: 0 / 0
05.02.2003, 13:17
| Ответить | Цитировать | Написать  
Условие в выражении
    #32101540
Олег Юрков
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Олег Юрков
Гость
А не кинешь примерчик с If-Then-Else?
...
Рейтинг: 0 / 0
05.02.2003, 13:25
| Ответить | Цитировать | Написать  
Условие в выражении
    #32101546
RiliR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RiliR
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub Field1_Change
    If Field1.Value =  "а"  Then
        Field2.Value = CStr( 100  /  2 . 86 )
    ElseIf Field1.Value =  "б"  Then
        Field2.Value = CStr( 100  /  3 . 13 )
    Else
        Field2.Value = ""
    End If
End Sub
...
Рейтинг: 0 / 0
05.02.2003, 13:33
| Ответить | Цитировать | Написать  
Условие в выражении
    #32101554
RiliR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RiliR
Участник
Можно еще и так:

Код: plaintext
1.
Field2.Value = IIf(Field1.Value =  "а" ,  100  /  2 . 86 ,  100  /  3 . 13 )


но только для двух вариантов.

Или так:

Код: plaintext
1.
Field2.Value = Switch(Field1.Value =  "а" ,  100  /  2 . 86 , Field1.Value =  "б" ,  100  /  3 . 13 , True, "")
...
Рейтинг: 0 / 0
05.02.2003, 13:41
| Ответить | Цитировать | Написать  
Условие в выражении
    #32101568
Олег Юрков
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Олег Юрков
Гость
А писать это в свойствах поля1?
...
Рейтинг: 0 / 0
05.02.2003, 13:58
| Ответить | Цитировать | Написать  
Условие в выражении
    #32101585
RiliR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
RiliR
Участник
Не понял. Ты про последние два варианта?
Их тоже в обработчиках событий (в модуле формы). Или смотря когда ты хочешь это дело обновлять.
...
Рейтинг: 0 / 0
05.02.2003, 14:23
| Ответить | Цитировать | Написать  
Условие в выражении
    #32101654
Олег Юрков
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Олег Юрков
Гость
Все заработало. Спасибо, RiliR.
...
Рейтинг: 0 / 0
05.02.2003, 15:40
| Ответить | Цитировать | Написать  
8 сообщений из 8, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Условие в выражении
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]