Сложение Label'ов

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
nikemike
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 59
Зарегистрирован: 29.07.2005 (Пт) 11:36
Откуда: Chel

Сложение Label'ов

Сообщение nikemike » 08.08.2005 (Пн) 18:22

Есть 4 лабела допустим назовем их lbl1,lbl2,lbl3,lbl4.
мне нужно сделать такую вешь lbl4 = lbl1 * 1.03 + lbl2 + lbl3
Вся компиляция проходит успешно, но при запуске проги у меня выскакивает вот такая ошибка :
Код: Выделить всё
Run-Time error '13'
Type mismatch

В чем дело :?: :?: :?:

Faust
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 649
Зарегистрирован: 29.12.2003 (Пн) 13:38
Откуда: лаборатория

Сообщение Faust » 08.08.2005 (Пн) 19:26

Попробуй так:
Код: Выделить всё
Label4.Caption = Str(CDbl(Label1.Caption)*1.03+CDbl(Label2.Caption)+CDbl(Label3.Caption))
Листинги не горят!

nikemike
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 59
Зарегистрирован: 29.07.2005 (Пт) 11:36
Откуда: Chel

Сообщение nikemike » 08.08.2005 (Пн) 19:36

Не не пашет!??

kirrun
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 514
Зарегистрирован: 06.04.2005 (Ср) 15:41
Откуда: Питер

Сообщение kirrun » 08.08.2005 (Пн) 20:20

Cint() и Cstr()
"Единственный безопасный компьютер - это тот, который выключен из электросети, закрыт в сейфе, который зарыт 20 футов под землей в засекреченной местности. И то я не уверен относительно его безопасности."
(Деннис Хьюджес, ФБР)

lord0n
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 845
Зарегистрирован: 30.06.2005 (Чт) 9:55
Откуда: Moskow

Сообщение lord0n » 09.08.2005 (Вт) 5:59

а так:
bl4 = val(lbl1) * 1.03 + val(lbl2) + val(lbl3)

nikemike
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 59
Зарегистрирован: 29.07.2005 (Пт) 11:36
Откуда: Chel

Сообщение nikemike » 09.08.2005 (Вт) 7:39

lord0n, ты как всегда на высоте ВСЕ РАБОТАЕТ!!! :D

lord0n
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 845
Зарегистрирован: 30.06.2005 (Чт) 9:55
Откуда: Moskow

Сообщение lord0n » 09.08.2005 (Вт) 7:43

просто для сложения тебе нужно стороку перевести числа - val() это и делает

nikemike
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 59
Зарегистрирован: 29.07.2005 (Пт) 11:36
Откуда: Chel

Сообщение nikemike » 09.08.2005 (Вт) 7:56

Спасибо, понял!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 133

    TopList