Help

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Кашалот
Начинающий
Начинающий
 
Сообщения: 7
Зарегистрирован: 26.05.2004 (Ср) 17:41

Help

Сообщение Кашалот » 02.11.2004 (Вт) 18:31

Товарищи, дорогие,
пишу обычную событийную процедуру для занесения данных из текстового окна в переменную:

Private Sub Text1-Change()
Peremenaya = Text1.Value
End Sub

Ругается, пишет, что метод не определен.

Что сделать?
Помогите, пожалуйста. :cry:

Flo
Обычный пользователь
Обычный пользователь
 
Сообщения: 90
Зарегистрирован: 09.03.2004 (Вт) 16:43
Откуда: Таллинн, Эстония

Сообщение Flo » 02.11.2004 (Вт) 18:37

По-моему у элемента Text действительно нет св-ва Value.
нужно:
Peremennaja=Text1.Text
А если переменная не строковая, то
Peremennaja=Val(Text1.Text), или там
Peremennaja=Cint(Text1.Text) или CDbl и т.п.

Mikle
Изобретатель велосипедов
Изобретатель велосипедов
Аватара пользователя
 
Сообщения: 4160
Зарегистрирован: 25.03.2003 (Вт) 14:02
Откуда: Туапсе

Сообщение Mikle » 02.11.2004 (Вт) 18:38

perem=text1.text

и зачем на Change? Как правило достаточно на LostFocus.

Кашалот
Начинающий
Начинающий
 
Сообщения: 7
Зарегистрирован: 26.05.2004 (Ср) 17:41

Спасибо

Сообщение Кашалот » 02.11.2004 (Вт) 18:48

Спасибо большое, все заработало, сразу не дотумкал, действительно свойства Value нет. :lol:

Max!
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 502
Зарегистрирован: 03.04.2003 (Чт) 22:08
Откуда: Литва

Сообщение Max! » 02.11.2004 (Вт) 21:02

Если нехош чтоб при компиляций он ругался объяви эту переменную
Код: Выделить всё
Dim permenaja as string 'or Dim peremenaja
peremenaja = Text1.Text


:wink:
Max!


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

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

Сейчас этот форум просматривают: PetalBot и гости: 10

    TopList