Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
Арифметика в VBA
|
|||
|---|---|---|---|
|
#18+
Как такое может быть????????????? Private Sub CommandButton1_Click() Dim X(11) 'As String Dim i As Integer Dim Count 'As Double X(0) = 8.888 X(1) = 8.888 X(2) = 8.888 X(3) = 8.888 X(4) = 8.888 X(5) = 8.888 X(6) = 8.888 X(7) = 8.888 X(8) = 8.888 X(9) = 8.888 X(10) = 8.888 X(11) = 2.232 Count = 0 For i = 0 To 11 Count = Count + X(i) Next i If Count <> 100# Then MsgBox ("Как не равно 100?") End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.04.2006, 08:43 |
|
||
|
Арифметика в VBA
|
|||
|---|---|---|---|
|
#18+
если тип Код: plaintext а Double если я правильно понял справку использую для дат и еще если Код: plaintext кстати 100# - возвращает тип Double забавно всё это. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.04.2006, 09:40 |
|
||
|
Арифметика в VBA
|
|||
|---|---|---|---|
|
#18+
Нельзя сравнивать целые числа и числа с плавающей запятой!!! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.04.2006, 09:42 |
|
||
|
|

start [/forum/topic.php?fid=16&fpage=185&tid=1346967]: |
0ms |
get settings: |
10ms |
get forum list: |
20ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
30ms |
get topic data: |
11ms |
get forum data: |
3ms |
get page messages: |
50ms |
get tp. blocked users: |
1ms |
| others: | 265ms |
| total: | 396ms |

| 0 / 0 |
