| Вопрос: Где я ступил? | Добавлено: 06.10.06 10:00 |
Автор вопроса:  Djon | Web-сайт: www.vk-book.ru
|
|
Здрасте.
У меня проблема. Написал следующий код: For i = 0 To 30 If Val(Text1.Item(i)) = 1 Then Text36 = Val(Text36.Text) + Val(Text3.Item(i)) Next i Text37 = Val(Text35.Text) - Val(Text36.Text) а он не правильно работает. Операции с целыми числами проходят правильно, а с не целыми числами работает не правильно. Где я ошибся? Зарание спасибо. |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  VβÐUηìt Вопросов: 246 Ответов: 3333 |
Web-сайт: Профиль | | #1 | Добавлено: 06.10.06 10:19 |
|
1. Возможно
If Val(Text1.Item(i)) = 1 Then Text36 = Val(Text36.Text) + Val(Text3.Item(i)) 2. Или If Val(Text1.Item(i).Text) = 1 Then Text36.Text = Val(Text36.Text) + Val(Text3.Item(i).Text) А насчет Операции с целыми числами проходят правильно, а с не целыми числами работает не правильно. Где я ошибся? , так юзай вместо Val метод CDbl
|
||
|
Номер ответа: 2 Автор ответа: Djon Вопросов: 61 Ответов: 471 |
Web-сайт: Профиль | | #2 | Добавлено: 06.10.06 10:32 |
|
Спасибо VBD. Всё работает. вместо Val метод CDbl
А я думал, голову ломал. |
||
Страница: 1 |