| Вопрос: Проблема с типами данных | Добавлено: 10.03.07 11:38 |
Автор вопроса:  Alias
|
|
нужно умножить десятичных 2 числа. Не могу понять ошибку в коде:
Dim a, b, y As Variant a = TextBox1.Text b = TextBox2.Text y = a * b Label1.Caption = y |
| Ответы | Всего ответов: 1 |
|
Номер ответа: 1 Автор ответа:  SharUpOff ICQ: 354082637 Вопросов: 1 Ответов: 10 |
Web-сайт: Профиль | | #1 | Добавлено: 16.03.07 12:20 |
|
Dim a, b, y As Variant
a = TextBox1.Text ':
b = TextBox2.Text ':
y = a * b ':D
Label1.Caption = y
нужно умножить десятичных (!!!) 2 числа
Ты сначала в переменные типа Variant заносишь строку (!). Теперь твои переменные определяются как строковые, а не десятичные. Дк заноси в них не текст, а число, т.е. a = val(TextBox1.Text),b = val(TextBox2.Text). Функция val() преобразует строку в число. |
||
Страница: 1 |