powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Параметры открытия формы
25 сообщений из 78, страница 2 из 4
Параметры открытия формы
    #32222828
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Владимир Саныч
Так к лучше :)
где не дробное число - там все ОК
Гед дробное - открывается пустая форма
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222835
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
по-моему надо format(...,"0.00")
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222842
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2sasha_1
В этом случае даже не дробное число пишется так 78,00 => ошибка
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222843
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а почему запятая в числе?
попробуй еще СDbl(...)
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222850
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
СDbl что ето такое??? Sub function not found

Я тут и сам бьюсь с этой запятой: как в напрямую форме изменить формат этого поля?
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222858
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
> открывается пустая форма

А стринг-то какой получается?

На крайний случай предлагаю:

Netto(f)

где:

Function Netto(s As Variant) As String
Dim c As String*1, i As Integer, s0 As String
If IsNull(s) Then
Netto="0"
Else
s0 = ""
For i=1 To Len(s)
c = Mid(s, i, 1)
if c <> "," Then s0 = s0 & c
Next
End If
End Function
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222863
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А зачем в форме?
Число хранится в памяти не как "123,45" а как какие-то фигульки из 1/2/4/8 байт. Ну и нехай с ним. Как оно отображается - на скорость не влияет. Тебе надо, чтобы форма получила строку

WHERE ... AND [Приход]=123.45 AND ...

Посмотри, будет ли работать, если вместо

AND [Приход] = " & Format(f, "#.##") & "

насильно написать число

AND [Приход] = 78.00

Eсли да, проблема в передаче числа. Нет - будем искать дальше.
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222868
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>А стринг-то какой получается?
где мне его увидать-то?


>На крайний случай предлагаю ...
Ошибка: пропущен оператор в выражении запроса... AND [Приход] = и все
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222871
Фотография progist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
стоило отойти на пару часов уже в одной запятой запутались

самое простое - для SQL преобразовывать числа в String и менять запятую на точку:
Dim s as string

s = Replace(Cstr(Nz(curr1)), ",", ".") 'здесь внимательней

а потом s вставлять в строку SQL уже с одинарными кавычками.
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222874
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Geo
AND [Приход] = 1000,45
запятая его напрягает
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222878
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2progist
invalid procedure or call argument
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222883
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Geo
SORRY
AND [Приход] = 1000.45
Работает
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222885
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
у меня . и , выправляются функцией CDbl
работает при включенной ссылке VBA
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222890
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AND [Приход] = 1000.45
Работает


А выложи текущий код открытия формы.
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222892
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
x = Me![Реф №]
            b = Me!Дата
            c = Me!Организация
            e = Me!ФИО
            d = Me!Наименование
            f = Me!Приход
            DoCmd.OpenForm  "Приход" , , ,  "[Реф №] = '" & x & "'
 AND [ФИО] = '" & e & "' AND [Наименование] = '" & d & "' 
AND [Дата] = date() AND [Организация] = '" & c & "' AND [Приход] = 1000 . 45  "
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222894
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2sasha_1
Типа я не спроста спроил что такое CDbl
соответственно я не вкурсе насчет ссылки...
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222898
TRoUbLEs
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ребята, я, конечно, извиняюсь за вторжение в беседу профи, но не проще ли было бы не извращаться в "format...", а сделать обую настройку для компа?
Пуск->Настройка->Панель инструментов->Языки и стандарты.
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222902
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Нет, не этот, а тот, что не работает.
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222904
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2TRoUbLEs
Оригинальное решение и к тому же офигенный подъё...
Но это не практично
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222906
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в любом модуле
Сервис->Ссылки
смотришь есть ли галка напротив Visual Basic For Applications.
если нет ставишь.
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222907
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
x = Me![Реф №]
            b = Me!Дата
            c = Me!Организация
            e = Me!ФИО
            d = Me!Наименование
            f = Me!Приход
            DoCmd.OpenForm  "Приход" , , ,  "[Реф №] = '" & x & "' 
AND [ФИО] = '" & e & "' AND [Наименование] = '" & d & "' 
AND [Дата] = date() AND [Организация] = '" & c & "' AND [Приход] = "  & f &  " " 

...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222910
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2sasha_1
>Сервис->Ссылки это cool

там есть эта ссылка...
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222914
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Оказывается
Format(1000.35, "#.00#")
возвращает строку "1000,35". Забавно.

Тогда делай насильственную замену в этой строке запятой на точку.
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222917
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Geo
Дык а как это сделать?
...
Рейтинг: 0 / 0
Параметры открытия формы
    #32222920
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А тут выше писали.
...
Рейтинг: 0 / 0
25 сообщений из 78, страница 2 из 4
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Параметры открытия формы
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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