|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
Здарова, коллеги! в операторе IF проверяются значения двух переменных типа Integer. При этом при сравнении i3=71 и i1=39 почему-то уходит в ветку i3<i1. Причем при проверке функцией IsNumeric обе возвращают "true". Прилагаю саму базу. Там на форме "Форма1" есть кнопка "Step1". В ее коде внутри цикла do while всё и происходит. Уже всё урезано до проблемных данных. Сейчас сделаю по-другому: возьму i3-i1 и буду сравнивать с нулем. Но хотелось бы разобраться, что за бл?*:!во-то твориться... ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:15 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
Beliar, А с чего вы решили чё переменные Integer ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:25 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
до 150 кб не жмется, так что вот вторая часть... ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:25 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
ROI Beliar, И нечаяно ctrl+Enterнажал (чтоб перейти на новую строку) ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:26 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:26 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
ROI Beliar, А с чего вы решили чё переменные Integer Объявлены как интегер лично моими руками ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:27 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
авторСейчас сделаю по-другому: возьму i3-i1 и буду сравнивать с нулем. Вот так работает. Но что не так с прямым сравнением??? ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:32 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
Beliar Здарова, коллеги! в операторе IF проверяются значения двух переменных типа Integer. При этом при сравнении i3=71 и i1=39 почему-то уходит в ветку i3<i1. Причем при проверке функцией IsNumeric обе возвращают "true". Прилагаю саму базу. Там на форме "Форма1" есть кнопка "Step1". В ее коде внутри цикла do while всё и происходит. Уже всё урезано до проблемных данных. Сейчас сделаю по-другому: возьму i3-i1 и буду сравнивать с нулем. Но хотелось бы разобраться, что за бл?*:!во-то твориться... i1="39" строковый i3=71 числовой в отладчике все видно отсюда и не складушки ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:37 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
ROI, проблему вот осюда Dim i, h1, h2, h3, i1, i2, i3, i4, i5, i6 As Integer все переменные кроме i6 имеют тип вариант ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:39 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
ROI, Dim i1 As Integer Dim i2 As Integer Dim i3 As Integer Dim i4 As Integer Dim i5 As Integer Dim i6 As Integer ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:44 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
Beliar ROI Beliar, А с чего вы решили чё переменные Integer Объявлены как интегер лично моими руками Это вам только кажется (ноги то же участвовали но не голова) ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:49 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
ROI, вот в первый раз слышу, что при такой записи только последняя объявляется как положено а ведь уже туеву хучу проектов сдал в производство за 11 лет))) слов нет ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:56 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
ROI, Спасибо огромное! ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 10:57 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
но это отвратительно. В одном модуле бывает нужно объявить до 40-50 переменных разного типа. И каждой персонально прописывать тип??? ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 11:02 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
Beliar но это отвратительно. В одном модуле бывает нужно объявить до 40-50 переменных разного типа. И каждой персонально прописывать тип??? Да, прописывать каждую, иначе переменные типа Variant сыграют с вами злую шутку (вы это уже почувствовали) ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 11:13 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
ROI, Можно через сокращения https://docs.microsoft.com/ru-ru/office/vba/language/concepts/getting-started/declaring-variables Dim intX%, intY%, intZ as Integer Сокращение для типов: % – Integer; & – Long; @ – Currency; # – Double; ! – Single; $ – String ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 11:15 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
ROI ROI, Можно через сокращения https://docs.microsoft.com/ru-ru/office/vba/language/concepts/getting-started/declaring-variables Dim intX%, intY%, intZ as Integer Сокращение для типов: % – Integer; & – Long; @ – Currency; # – Double; ! – Single; $ – String Ну это меняет дело! Еще раз спасибо! ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 11:21 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
чуток не допонял. Допустим нужно объявить i1,i2,i3,i4,i5 как Integer. Как правильно, так: Dim i1%, i2%, i3%, i4%, i5 as Integer или так: Dim i%, i5 as Integer ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 11:31 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
Beliar чуток не допонял. Допустим нужно объявить i1,i2,i3,i4,i5 как Integer. Как правильно, так: Dim i1%, i2%, i3%, i4%, i5 as Integer или так: Dim i%, i5 as Integer Dim i1%, i2%, i3%, i4%, i5% все переменные интеджер ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 11:40 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
Beliar, здесь то-же бардак Dim dbs1, dbs2, dbs3 As Database Dim rst1, rst2, rst3 As Recordset Dim dat1, dat2 As Date Dim str1, str2, str3, str4, str5 As String Dim int1, int2, int3 As String надо так: Dim dbs1 As Database Dim dbs2 As Database Dim dbs3 As Database для объектных переменных нет сокращений ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 11:41 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
ROI, теперь понял. Перелопачу хотя бы в этой бд., пока немного)) И как это за столько лет ни разу не выстрелило?! Ладн, спасибо. Тема закрыта)) ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 11:58 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
Beliar но это отвратительно. В одном модуле бывает нужно объявить до 40-50 переменных разного типа. И каждой персонально прописывать тип??? Beliar ROI, теперь понял. Перелопачу хотя бы в этой бд., пока немного)) И как это за столько лет ни разу не выстрелило?! Ладн, спасибо. Тема закрыта)) ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 12:37 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
Beliar, изучите оператор def, причем там можно выбирать сразу несколько букв типа defbool B-C он как то не прижился в листингах, но может вам подойдет. ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 12:40 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
Beliar но это отвратительно Это вба. Что ты от него хотел? ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 12:52 |
|
интегер 71 почему-то меньше интегера 39
|
|||
---|---|---|---|
#18+
crutchmaster Beliar но это отвратительно sdku Beliar но это отвратительно. В одном модуле бывает нужно объявить до 40-50 переменных разного типа. И каждой персонально прописывать тип??? Это лишь фрагмент базы, я лишнее удалил, перед тем, как сжать и прикрепить к теме. Да и половина объектов временные. После окончания разработки удалю. Не знаю, зачем Вам подробности, но раз уж интересено: это прога по составлению ротационного отчета по продукции на складе. Из 1с выгружается в excel отчет по движению товара (ну в виде Нач.Ост.; Приход; Расход; Кон.Ост.). Импортируется сюда. Руками вбивается два прихода (для каждого наименования связанные записи в виде Кол-во;ДатаПроизводства;НомерПрихода). А дальше... юзер жмет всего одну кнопку и веселый VBA списывает расход начиная со старых дат, сначала из начальных остатков, затем из первого прихода, потом из второго и сохраняет, что осталось, ввиде нового отчета. Толку высматривать "силуэт коня" в нескольких косточках с одним копытом. sdku Стесняюсь спросить,но уж больно интересно, а за сколько лет и сколько создано "боевых"(рабочих и используемых) БД 5 в медицинском учреждении с 2008 по 2011. В те годы опыта совсем ни на грош было. И Вы, sdku, были среди тех, кто не раз помогал мне. Я то математик. Кроме акса и ВБ нихера в универе не изучалось. Потом для мелких фирм, уже и не вспомнить, сколько мелких бд-шек нацарапал. С одной, правда, возился, больше полугода, слишком много ситуативных разборов было. Здесь на кондитерке уже пятый проэкт за 2 года. Из первых 4 только один перестал использоваться за ненадобностью. Ну да, может местами рациональностью и не блещем. И у меня до сих пор Акс 2002. ... |
|||
:
Нравится:
Не нравится:
|
|||
26.01.2021, 13:37 |
|
|
start [/forum/topic.php?fid=45&fpage=10&tid=1609798]: |
0ms |
get settings: |
8ms |
get forum list: |
13ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
43ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
88ms |
get tp. blocked users: |
2ms |
others: | 11ms |
total: | 183ms |
0 / 0 |