|
|
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
Знатоки, Помогите неспецу... Можно ли на панель инструментов (Стандартный Excel'03 + Alt+F11- UseForm...) вывести такие элементы, как Shape (рисование примитивов), Timer, DirListBox и др? Куда хоть копать (в смысле- что гуглить)? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.11.2010, 22:56 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
Тэкс. Начнем с таймера. Application.OnTime его заменит вам скорее всего. Если не заменит - можно использовать API-шный таймер ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.11.2010, 23:04 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
Вообще не мешало бы все же определиться: на UserForm надо или все же на Панель инструментов? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.11.2010, 23:05 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
Гм. CommonControls выбрать не позволяет - ничего сказать не могу. Рисование примитивов - не знаю, ну тут ща кто-нить подскажет. Что касается "и др." - а что именно нужно? Кое-что можно подключить. Например RichTextBox ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.11.2010, 23:08 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
The_PristВообще не мешало бы все же определиться: на UserForm надо или все же на Панель инструментов? он, видимо, имел ввиду панель, которая появляется при редактировании UserForm ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.11.2010, 23:08 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
авторЧто касается "и др." ListBox, выборка файла, РИсование, многострочный TextBox авторпанель, которая появляется при редактировании UserForm разумеется, желательно именно это - на панель, или хотя бы обращение в коде ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.11.2010, 23:22 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
valgruelListBox, многострочный TextBox ну это-то там и так есть ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.11.2010, 23:32 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
valgruel, Ну подключать различные элементы можно через Tools-AdditionalControls(активировав любую Userform в редакторе). Можно воткнуть и сторонние библиотеки и использовать имеющиеся в них контролы. Но тогда следует учитывать, что при запуске на другом компьютере - получите ошибку, при отсутствии соответствующей библиотеки на нем. Хотя это, я думаю, Вы знаете и без меня. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.11.2010, 23:34 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
valgruelвыборка файла Microsoft Common Dialog можно добавить через additional controls ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.11.2010, 23:34 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
На счет файлов мысли появились. Спасибо всем. А как бы порисовать примитивами на форме? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.11.2010, 23:54 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
valgruel, можно так. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 29.11.2010, 11:16 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
Бенедикт, Большое спасибо. Правда, это не совсем то, что хотелось. Нужно, чтобы каждый элемент (прямоугольник, линия, овал и др.) воспринимался как отдельный объект со свойствами (как минимум) Vizible, Enable Но пример хороший и пригодится попозже. Поэтому, и вопрос: Вот сам Ваш пример работает и картинку рисует. Пробую создать аналогично, - не получается. Ошибка компиляции (см.рисунок в файле). Останавливается тут: Private Sub UserForm_Initialize() Set c = New CDrawingSurface c. Init 200, 100 End Sub Может я не правильно что-то делаю? Например с "Modules" и "Class Modules"? Я их просто создаю (через Insert) и переименовываю... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 29.11.2010, 21:33 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
valgruel, Это странно... Option Explicit используется? Переменную "с" правильно определили, с русской не перепутали? Может выложите файл - посмотрим. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.11.2010, 00:45 |
|
||
|
Vb в Excel'е. Shape, Timer
|
|||
|---|---|---|---|
|
#18+
valgruelНужно, чтобы каждый элемент (прямоугольник, линия, овал и др.) воспринимался как отдельный объект со свойствами (как минимум) Vizible, EnableНаличие свойства Enabled для элемента управления означает наличие интерактивности. Так вот, желаемое наличие Enabled означает желание наличия интерактивности для примитива? Просто напомню, что у VB.Shape её нет (рисуется, но ни фокус клавиатурного ввода принять не может, ни мышиных событий не имеет). valgruelВот сам Ваш пример работает и картинку рисует. Пробую создать аналогично, - не получается. Ошибка компиляции (см.рисунок в файле).Действительно, странно. Либо то, что сказал Shocker.Pro, либо метод Init переименован или его область видимости стала описана как Private. Проверьте ещё, на всякий случай, отсутствие битых ссылок в References. Если не победите, выложите файл. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.11.2010, 11:37 |
|
||
|
|
start [/forum/topic.php?fid=60&fpage=114&tid=2159198]: |
0ms |
get settings: |
10ms |
get forum list: |
12ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
138ms |
get topic data: |
15ms |
get forum data: |
3ms |
get page messages: |
53ms |
get tp. blocked users: |
2ms |
| others: | 12ms |
| total: | 253ms |
| 0 / 0 |
