Visual Basic 6.0 - VBA

Hello, All!

Как узнать размер массива?

With best regards, Mihail Borisov.
* Origin: Demos online service (2:5020/400)




Wed Jun 02 2004 16:57, Mihail Borisov wrote to All:


UBound(Massiv) - LBound(Massiv) + 1

* Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)




Здравствуйте.

Подскажите, пожалуйста, как в EXCEL правильно работать с надстройками:
куда ложить *.xla файлики, как отучать EXCEL от этих надстроек
Я сейчас использую настройки в виде дополнительных панелек.

Заранее благодарен,
Анатолий


* Origin: Digital Generation (2:5020/400)




Hello, A.!
You wrote to A. Skrobov on Wed, 02 Jun 2004 12:18:11 +0400:











Большое спасибо за оба совета! :)

Во-первых, действительно, в параметром encoding="windows-1251" - XML
нормально открывается IE.

Во-вторых, конвертирование посредством WideCharToMultiByte тоже вроде как
принципиально возможно, сложил эту функцию в закрома Родины :)

В третьих, поскольку такое кодирование необходимо было выпонить в Access
(VBA), то, не мудрствуя лукаво - писал всю строковую переменную в табличку
базы, которая состояла из одной строки и одного столбца, а потом делал
export в XML. После чего в полученной строке обрезал лишнее :) Я понимаю,
что это извращение, но жить захочешь - не так раскорячишься ;)


With best regards, Alex
--
* Origin: Talk.Mail.Ru (2:5020/400)




Есть модемное соединение с инетом. В стандартном
окошке на соединение есть две конпки - подключить
(снять трубку, набрать номер и соединиться с хостов-
ым модемом) и отключить (положить трубку).

Вопрос к всезнающему ALL: как программно сделать
эти две операции ? Ссылки на Windows API и приме-
ры приветствую и заранее благодарю. Спасибо.


* Origin: HOME (2:5020/400)


Привет, Sergey!

* 17 Май 04 14:08, Sergey S Shulgin писал(а) All








Может я не в курсе, но скорее всего у твоих друзей просто нет .NET Framework. Пущай 20 мб с сервака майкрософта качают!..

Vlad
* Origin: FidoNet, InterNet... Deneg net... (2:5061/120.41)


/*_г=¬ г===¬_*/
/*_¦ ¦РИВЕТ¦_*/ _All_
/*_L=======¦=======----_*/ /*_·_*/ /*_·_*/ /*_·_*/ /*_·_*/ /*_·_*/

кто-нибyдь занимался сабжем из под эхотага???
т.е. выводом изобpажения на 8ми битный ЛЦД посpедством 8 битного поpта?
интеpесyют всяческие нюансы. или может эхотаг не совсем pyлит для сабжа?? может
лyчше асмом или сёй?(пpо асм и си лyчше в мыло)
пpога должна пахать под ХР где низя пpямо так pyлить поpтом, интеpесyет pyление
поpтом под ХР.


Пока *All* . Да встанет твой _КОМП_ на _PATH_ истинный!!!
http://medbedb.boom.ru medbedb [@] inbox.ru ICQ:177470289

* Origin: In vino veritas... (2:5030/659.23)





message


Отличный трюк, Дмитрий, спасибо !

Я только позволил себе чуток подправить код класса, привожу
его с комментариями:

Private WithEvents mTextBox As TextBox
'---Private mParent As Form1
Private mParent As Form
'Объявляем тип не конкретной формы из примера, а формы вообще

'---Public Sub Initialize(ByVal Object As TextBox, ByVal Parent As Form1)
Public Sub Initialize(ByVal Object As TextBox, ByVal Parent As Form)
'Аналогично предыдущему комментарию
Set mTextBox = Object
Set mParent = Parent
End Sub

Private Sub mTextBox_Change()
'---Form1.TextBoxChange mTextBox
mParent.TextBoxChange mTextBox
'Вызываем псевдособытие не в конктерной форме из примера,
'а в форме, переданной в класс при вызове Initialize
End Sub

В таком виде класс нормально работает с любыми формами.

Я сам почти пришел к такому же решению, застрял только на
правильном выборе формы для вызова псевдособытия, трюк
с иннициализацией parent-формы пришелся очень кстати.
Еще раз спасибо !


* Origin: HOME (2:5020/400)


Приветствую Вас Sergey!

14 мая 2004 года (а было тогда 22:55)
Sergey Litvinsky в своем письме к Igor Shilak писал:







"VB-бухгалтерия" 8-)

С уважением, Sergey 24 мая 2004 года

* Origin: My Station (2:5003/57.68)