Конференция VBStreets

**moppuk** » 17.03.2006 (Пт) 12:47

Народ, вообщем вообще не пойму... Есть модуль, в нем общадоступная переменная Public dlina1 As Variant, короче из одной формы при вводе в Text1.text значения, оно присваивается это переменной... dlina1 = Val(Text1.Text), а потом в другой форме, ее надо вывести допустим в такой же text1.text.
Что просиходит, почему-то значение выводится 0, а при проверке с помощью msgbox (dlina1), msgbox вообще пустой...
Вообще не пойму в чем дело... =(

**Demonx** » 17.03.2006 (Пт) 13:05

Public dlina1 As Variant

Попробуй поставить тип Integer ил Long...

**moppuk** » 17.03.2006 (Пт) 13:13

Ни фига, та же песня...

**RayShade** » 17.03.2006 (Пт) 13:21

Дело скорее всего в том, что есть не одна такая переменная. Может, в какой субе или функции еще одна такая есть.

Я бы, присваивал и читал ее по полному имени: Module1.dlina1=text1.text1

Module1- это тот модуль, в котором она объявлена.

**GSerg** » 17.03.2006 (Пт) 13:28

А я бы, option explicit поставил...

**moppuk** » 17.03.2006 (Пт) 13:32

И Option Explicit стоит, и ни чего не помечается. С переменными все нормально...
Module1.dlina1= val(text1.text) поставил, просто у меня туда числа вводятся... Но все равно результат в другой форме я наблюдаю "0", хотя ввожу 44.... Блин, да что такое то....

**RayShade** » 17.03.2006 (Пт) 13:39

А ты случайно, не ожидаешь того, что она автоматически сама обновится в другой форме, а ?

**moppuk** » 17.03.2006 (Пт) 14:28

нет, случайно не ожидаю...
еще раз поясняю
module1.
Public dlina1 As Variant (перепробывал и другие типы)

form1.
dlina1 = val(text1.text)

form2.
text2.text = dlina1.

при вводе в text1.text (form1) например 43, в text2.text (form2) отображается 0

**moppuk** » 17.03.2006 (Пт) 14:48

причем если сделать вот так, то все отлично отбражается...

module1.
public dlina1 as string

form1.
dlina1 = "привет"

form2.
text2.text = dlina1

Ну подскажите что-нибудь дельное...
Эх Жалко Ameda нет, он бы точно подсказал!!!

**Kovu** » 17.03.2006 (Пт) 14:49

moppuk
Попробуй объявить как Global вместо Public

**Igor_coder** » 17.03.2006 (Пт) 14:59

Про глобал это дельо сказано. !!!!! :wink:

и ввобще Cint(string) в val запихнуть (тока объяви переменную как string) Должно работать

**moppuk** » 17.03.2006 (Пт) 15:04

Cint(string) в val запихнуть не понял как вот это сделать?
Просто Global не прокатило...

**Igor_coder** » 17.03.2006 (Пт) 15:07

нехорошо получается, щас посмотрим........

**GSerg** » 17.03.2006 (Пт) 15:07

Igor_coder писал(а):и ввобще Cint(string) в val запихнуть (тока объяви переменную как string)

Бред.

**moppuk** » 17.03.2006 (Пт) 15:10

Ааааааааааа..... Ну что сделать то... Блин....
Ну все вроде должно работать!!! Ну все элементарно!
Ан нет!!! Блин.

**Kovu** » 17.03.2006 (Пт) 15:14

Специально проверил, прилагаю пример как доказательство. У меня он работает. (основан на твоем посте http://bbs.vbstreets.ru/viewtopic.php?p=6591979#6591979 )

**Igor_coder** » 17.03.2006 (Пт) 15:17

Ну во я про тоже, с глобал должно работать, хоть убейся

**GSerg** » 17.03.2006 (Пт) 15:30

Global поддерживается для совместимости и не отличается от public ничем.

**moppuk** » 17.03.2006 (Пт) 15:43

Посмотрел я пример, знаю, что работает...
Да мне не то надо....
Надо form1. Text1.text ввел значение причем число, а не сторку
а в form2 в Техт2.техт отобразилось!!!
Со строками все просто, а вот с числами не получается!!!

module1.
Public dlina1 As Variant (перепробывал и другие типы)

form1.
dlina1 = val(text1.text)

form2.
text2.text = dlina1.

при вводе в text1.text (form1) например 43, в text2.text (form2) отображается 0

Писал же уже, как будто не туда смотрите...
А для сведения что Global так и Public это одно и тоже...

**RayShade** » 17.03.2006 (Пт) 16:10

Странно. У меня работает, и с числами и с текстом. 0- это значит что val не может сделать, число из строки.

Что если, дело в той строке которую val получает?

**moppuk** » 17.03.2006 (Пт) 16:18

а что может быть в той строка которую Val получат...
Техт1.техт в него я записывю например 43 и хочу чтобы переменная хранила это число, чего тут заумного, но вот не получается почему-то...

**Konst_One** » 17.03.2006 (Пт) 16:20

он числа наверное вводит с точкой или запятой, а региональные настройки не учитывает.

**Konst_One** » 17.03.2006 (Пт) 16:22

moppuk
мы устали гадать, что у тебя не так работает

выкладывай весь свой код сюда, тогда и посмотрим.

**GAGArin** » 17.03.2006 (Пт) 16:33

Как только не пробовал, никаких отклонений не вижу. Можно неработающий код увидеть? Как вариант можно менять сразу form2.text1.text при изменении текста в первой форме. Или тащить через модуль обязательно?

**moppuk** » 17.03.2006 (Пт) 16:40

как тут файл прикрепить?

**RayShade** » 17.03.2006 (Пт) 16:42

Нажимаешь

и потом, там будет поле для ввода

Кнопка может выглядеть как

*Amed был тут и поправил, как надо

*Ну надо же блин, а я все зачем то пытался href прописать

**GSerg** » 17.03.2006 (Пт) 16:43

Нажать кнопку Ответить.

Сейчас мы увидим файл, в котором три текстбокса, и в переменную присваивается не тот...

**moppuk** » 17.03.2006 (Пт) 16:47

а проект прежде надо например на megaupload залить?
А потом укать ссылку, или как?[/url]

**GSerg** » 17.03.2006 (Пт) 16:49

Или как.

**RayShade** » 17.03.2006 (Пт) 16:51

Можно ссылку дать, можно файл приатачить прямо. Только заархивировать не забудь.

Конференция VBStreets

Какая-то непонятка с переменной...

Какая-то непонятка с переменной...

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