| |
|
|
| | при открытии формы есть код - корректировал, сохранял - начал выдавать ошибку на функцию Val() - думал данные не те (хоть они теже что и вчера) - тупо написал
i=Val("1")
балалайка - таже ошибка Ran-Time error 13 - Tipe mismatch
написал i=Val("1") в модуле в отдельной процедуре - работает в форме по прежнему нет.
что характерно когда пишешь текст Val( - в модуле появляется надписть String а в тексте функции формы нет 
че делать? | |
| |
| |
| |
|
|
| | Проверил
Private Sub Form_Open(Cancel As Integer)
Dim i As Double
i = Val("1.1")
Rem i получилось 1,1
....
Все работает.!!!!
>>а в тексте функции формы нет
|
а у меня в подсказке и в модуле и в форме string...
Резюме.
Иногда в процессе отладки че-то случается с базой.
Думаю поможет декомпиле или другие способы восстановления. Типа удалить модуль формы(предварительно скопировав). Все закрыть Открыть - вставить обратно и т.п. | |
| |
| |
| |
|
|
| | увы, увы!!!!
даже охфис переставил
все одно - тут работаем тут не работаем
был сохраненный файл 10-минутной давности - тама все робэ. оттуда полностью перекопировал эту функцию - фигня таже, с формой возиться не стал - заменил файл и рабатаю дальше
- но копию с цирком оставил - мож как нибудь добью  | |
| |
| |
| |
|
|
| |
был сохраненный файл 10-минутной давности - тама все робэ
|
Может вы за эти 10 минут успели в модуле формы создать переменную или собственную функцию с именем Val? Или добавили на форму одноименній элемент?
Если правой мышкой щелкнуть на Val и вібрать Definition - куда прыгнет? | |
| |
| |
| |
|
|
| | нету там Val новой функции - біла добавлена строка strSQL="........."
фсе, даже при полной замене редактируемой процедуры вылетает ошибка.
при нажатии Definition - орет о том что путь к файлу не содержит библиотеку, переходим в любую соседнюю форму/можуль где есть VAL - нажимаем - она нормально перескакивает на библиотеку | |
| |
| |
| |
|
|
| | Скопируйте форму и вставьте под другим именем - будет работать?
Не мешало бы перекомпилировать БД. | |
| |
| |
