Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Проблема в написании кода, Хочу розобратся почему не запускантся пр 
:(
    Опции темы
АлександрЗуб
Дата 1.4.2011, 10:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 25.3.2011

Репутация: нет
Всего: нет



Уважаемые знатоки работы на VB6, Я начинаю изучение этой программы самостоятельно, по книге. Дошел до раздела изменения размеров формы и столкнулся с ситуацией: Написал код: 
Код

         Private Sub Form_Resize()
              lblHeight.Caption = Form1.Height
              lblLeft.Caption = Form1.Left
              lblTop.Caption = Form1.Top
              lblWight.Caption = Form1.Width
         End Sub

Он отвечает за автоматическое изменения данных у специальной строке отвечающих за верх, низ, левою и правою стороны формы.
Проблема в том что при запуске программы вне выдает ошибку на скрытый файл и акцентирует внимание на строку 
 lblWight.Caption = Form1.Width
Помогите разобраться в чем загвоздка. Заранее спасибо.

Это сообщение отредактировал(а) Akina - 1.4.2011, 12:59
PM MAIL   Вверх
Akina
Дата 1.4.2011, 12:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



Цитата(АлександрЗуб @  1.4.2011,  11:02 Найти цитируемый пост)
выдает ошибку на скрытый файл 

Что за скрытый файл?
Но вообще неплохо бы выполнять явное приведение типов. Размеры и координаты - числа, а Caption - строки. 


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
АлександрЗуб
Дата 1.4.2011, 13:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 25.3.2011

Репутация: нет
Всего: нет



ОК. спасибо тебе. Будем разбираться.
PM MAIL   Вверх
АлександрЗуб
Дата 2.4.2011, 21:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 25.3.2011

Репутация: нет
Всего: нет



Извините меня пожалуйста, но уточните на примере (не большом) как указать размеры и координаты - числа, а Caption - строки.  
А ошибку мне выдает следующего характера:  
Run-time error'424': Object reguired.
У книге не могу розобратся. (А книга Брайана Сайлера и Джеффа Споттса "Использование VB6 -а 2007")  smile 
PM MAIL   Вверх
Akina
Дата 2.4.2011, 21:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454





--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Данкинг
Дата 2.4.2011, 23:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130



Цитата(АлександрЗуб @  1.4.2011,  11:02 Найти цитируемый пост)
lblWight

Может, всё-таки lblWidth?
Цитата(АлександрЗуб @  2.4.2011,  22:04 Найти цитируемый пост)
уточните на примере (не большом) как указать размеры и координаты - числа, а Caption - строки.  

Очень небольшой пример: функция Cstr ().  smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
АлександрЗуб
Дата 3.4.2011, 09:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 25.3.2011

Репутация: нет
Всего: нет



Цитата(Данкинг @ 2.4.2011,  23:20)
Может, всё-таки lblWidth?

Очень благодарен. Получилось, была опечатка и Я ее не заметил. Чайник еще, что тут скажешь.  smile 
Еще раз спасибо. 
PM MAIL   Вверх
Данкинг
Дата 3.4.2011, 10:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130



Цитата(АлександрЗуб @  3.4.2011,  10:29 Найти цитируемый пост)
Еще раз спасибо.  

На здоровье. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Akina
Дата 3.4.2011, 14:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



Цитата(АлександрЗуб @  3.4.2011,  10:29 Найти цитируемый пост)
Получилось, была опечатка и Я ее не заметил

Начинайте модули строкой Option Explicit - очень помогает


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
АлександрЗуб
Дата 9.4.2011, 12:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 25.3.2011

Репутация: нет
Всего: нет



Народ привет. Вопрос очень детский, попытайтесь не смеяться, пожалуйста smile 
Ребята, Как научится писать коды? Я заметил, что все начинается практически с   
              Private Sub....()
                 Dim....
              End Sub
Но как решить тот или иной вопрос?

PM MAIL   Вверх
aclips
Дата 9.4.2011, 14:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 49
Регистрация: 1.6.2008

Репутация: нет
Всего: нет



Цитата

Ребята, Как научится писать коды? Я заметил, что все начинается практически с   
              Private Sub....()
                 Dim....
              End Sub
Но как решить тот или иной вопрос?



Событие (например нажатие на кнопку)
   то, что должно произойти
конец события

всё)
PM MAIL   Вверх
Данкинг
Дата 9.4.2011, 14:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130



Цитата(АлександрЗуб @  9.4.2011,  13:28 Найти цитируемый пост)
Вопрос очень детский, 

Правила форума: один топик - один вопрос.
Цитата(АлександрЗуб @  9.4.2011,  13:28 Найти цитируемый пост)
Как научится писать коды? 

Почитать умные книги по соответствующему языку программирования. Неужели по VB мало литературы? Ну или же разобрать готовый код, но это если всё же имеешь какие-то навыки программирования.
Цитата(АлександрЗуб @  9.4.2011,  13:28 Найти цитируемый пост)
Я заметил, что все начинается практически

 smile 
Цитата(АлександрЗуб @  9.4.2011,  13:28 Найти цитируемый пост)
Но как решить тот или иной вопрос?

На тот или иной вопрос следует попытаться получить какой-либо ответ. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
АлександрЗуб
Дата 9.4.2011, 15:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 25.3.2011

Репутация: нет
Всего: нет



OK, все понял. Спасибо.
PM MAIL   Вверх
neic
Дата 17.4.2011, 14:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 839
Регистрация: 28.1.2007

Репутация: нет
Всего: 7



АлександрЗуб
Цитата

Народ привет. Вопрос очень детский, попытайтесь не смеяться, пожалуйста  
Ребята, Как научится писать коды? Я заметил, что все начинается практически с   
              Private Sub....()
                 Dim....
              End Sub
Но как решить тот или иной вопрос?

Процедуры обычно начинаются с объявлений переменных. В некоторых случаях это не надо.

Пример с объявлением переменной:
Код

Private Sub write(integer count, string add)
Dim value as integer
value = count * 2
Form1.TextBox1 = Cstr(value) + add
End Sub


Пример без объявления переменной:
Код

Private Sub clean(string add)
Form1.TextBox1 = add
End Sub


Будут вопросы пиши.
PM MAIL WWW ICQ Skype   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0652 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.