Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RFpro.ru: Программирование на Basic / VBA


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный ХОСТИНГ на базе Linux x64 и Windows x64

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Лучшие эксперты по данной тематике

Асмик Гаряка
Статус: Академик
Рейтинг: 8498
∙ повысить рейтинг »
Vasiliy83
Статус: Профессионал
Рейтинг: 2293
∙ повысить рейтинг »
Megaloman
Статус: Академик
Рейтинг: 1824
∙ повысить рейтинг »

/ КОМПЬЮТЕРЫ И СОФТ / Программирование / Basic/VBA

Номер выпуска:1069
Дата выхода:22.09.2011, 23:00
Администратор рассылки:Vasiliy83 (Профессионал)
Подписчиков / экспертов:172 / 83
Вопросов / ответов:3 / 7

Консультация # 91569: После компилировании программы и нажатия какой нибудь кнопки в программе появляется окно :" Run-time error 424", что делать? Private Sub Cmdclear_Click() Txtdisplay.Text = "" End Sub Private Sub Cmdexit_Click() Beep End End Sub Private Sub Cmdhello_Click() Txtdisplay.Text = &quo...


Консультация # 73128: Здраствуйте, эксперты. Подскажите, как заставить VBasic 6 читать по слову из Text1 и анализировать этот текст....
Консультация # 88454: Такой вопрос. Мне нужно, чтобы моя программка сворачивалась в трее. Как это сделать?...

Консультация # 91569:

После компилировании программы и нажатия какой нибудь кнопки в программе появляется окно :" Run-time error 424", что делать?

Private Sub Cmdclear_Click()
Txtdisplay.Text = ""
End Sub

Private Sub Cmdexit_Click()
Beep
End
End Sub

Private Sub Cmdhello_Click()
Txtdisplay.Text = "Привет ,мир"
End Sub

Дата отправки: 16.06.2007, 00:05
Вопрос задал: Gvarishvili Giorgi Raulievich
Всего ответов: 3
Страница онлайн-консультации »


Консультирует Тесленко Евгений Алексеевич (Практикант):

Здравствуйте, Gvarishvili Giorgi Raulievich!
424 - Object required
ненастроены ссылки на библиотеки проекта скорее всего, и после компиляции они теряются вовсе
Евгений.

Консультировал: Тесленко Евгений Алексеевич (Практикант)
Дата отправки: 16.06.2007, 01:12
Рейтинг ответа:

НЕ одобряю 0 одобряю!


Консультирует Rush:

Здравствуйте, Gvarishvili Giorgi Raulievich!
Идет ссылка на несуществующий объект. Видимо Вы не используете Option Explicit.
Вставьте его в код проекта и запустите. Сразу будет видно, какой объект у вас не существует.

Консультировал: Rush
Дата отправки: 16.06.2007, 04:34
Рейтинг ответа:

НЕ одобряю 0 одобряю!


Консультирует deleted (Практикант):

Здравствуйте, Gvarishvili Giorgi Raulievich!
Судя по всему у вас отсутсвтует какой-то объект. Возможно вы ошиблись при написании програмного кода. Просмотрите его

Приложение:

Консультировал: deleted (Практикант)
Дата отправки: 16.06.2007, 12:36
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Консультация # 73128:

Здраствуйте, эксперты.

Подскажите, как заставить VBasic 6 читать по слову из Text1 и анализировать этот текст.

Дата отправки: 29.01.2007, 15:09
Вопрос задал: Alxx
Всего ответов: 3
Страница онлайн-консультации »


Консультирует Dimm77:

Здравствуйте, Alxx!
Не совсем понятно, что такое "анализировать".
А читать просто: перебирать побуквенно, когда встретился пробел - слово закончилось. См. в приложении - демонстрирует, как можно получить массив слов, разделённых пробелами. Если надо, можно вообще парсер (т.е. программа-разделитель на элементы) написать, используя нужные разделители разного типа, "." "," "/" и т.п.

Приложение:

Консультировал: Dimm77
Дата отправки: 29.01.2007, 17:39
Рейтинг ответа:

НЕ одобряю 0 одобряю!


Консультирует Alec Perle (Студент):

Здравствуйте, Alxx!
В принципе (только в принципе) согласен с Dimm77, однако можно воспользоваться функцией Split(). См. пример

Приложение:

Консультировал: Alec Perle (Студент)
Дата отправки: 29.01.2007, 21:39
Рейтинг ответа:

НЕ одобряю 0 одобряю!


Консультирует PsySex (Профессионал):

Здравствуйте, Alxx!
Другой вариант решения:
================================================
Private Sub Command1_Click()
Dim vWord As Variant
Dim sWord As String
Dim vWords As Variant
Dim sString As String

sString = Text1.Text
\'если нужно то удалим сначала из строки запятые и точки
sString = Replace(sString, ",", "")
sString = Replace(sString, ".", "")
vWords = Split(sString, " ")
For Each vWord In vWords
sWord = CStr(vWord)
MsgBox sWord \'sWord содержит слово
Next
End Sub
==============================================

Консультировал: PsySex (Профессионал)
Дата отправки: 29.01.2007, 22:02
Рейтинг ответа:

НЕ одобряю 0 одобряю!

Консультация # 88454:

Такой вопрос. Мне нужно, чтобы моя программка сворачивалась в трее. Как это сделать?

Дата отправки: 24.05.2007, 22:34
Вопрос задал: Кадиевский Игорь Петрович
Всего ответов: 1
Страница онлайн-консультации »


Консультирует HookEst (Специалист):

Здравствуйте, Кадиевский Игорь Петрович!
Тут можно скачать исходники для VB6 ActiveX контрола SysTray Icon:

http://download.microsoft.com/download/vb60pro/Update/6.0/W9X2K/EN-US/SysTray.exe
, он позволяет управлятся с иконками в SysTray-е.

Если у Вас VB.NET, можно использовать System.Windows.Forms.NotifyIcon компонент.
Смотрите приложение, код взят из MSDN, и немного переделан.
Успехов.

Приложение:

Консультировал: HookEst (Специалист)
Дата отправки: 25.05.2007, 07:22
Рейтинг ответа:

НЕ одобряю 0 одобряю!


Оценить выпуск | Задать вопрос экспертам

главная страница  |  стать участником  |  получить консультацию
техническая поддержка  |  восстановить логин/пароль

Дорогой читатель!
Команда портала RFPRO.RU благодарит Вас за то, что Вы пользуетесь нашими услугами. Вы только что прочли очередной выпуск рассылки. Мы старались. Пожалуйста, оцените его. Если совет помог Вам, если Вам понравился ответ, Вы можете поблагодарить автора - для этого в каждом ответе есть специальные ссылки. Вы можете оставить отзыв о работе портале. Нам очень важно знать Ваше мнение. Вы можете поближе познакомиться с жизнью портала, посетив наш форум, почитав журнал, который издают наши эксперты. Если у Вас есть желание помочь людям, поделиться своими знаниями, Вы можете зарегистрироваться экспертом. Заходите - у нас интересно!
МЫ РАБОТАЕМ ДЛЯ ВАС!



В избранное