Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: MS Visio VBA question Добавлено: 02.03.09 14:27  

Автор вопроса:  artur
Проблема в MS Visio

Дано:
Мастер шейпы ( 1.vss, 2.vss, 3.vss, 4.vss, 5.vss, 6.vss)

Нужно:
1. Ввести определенные свойства на каждый мастер шейп (тип, цена, сила, мощность и т.д), к которым можно в последствие программно обратиться, чтобы при добавлении в проект шейп уже имел эти свойства.
2. При нажатии правой кнопки мышки на шейпе, вывести стандарное меню и к нему добавить combo box
3. В этом combo box делать выборку по названию, из данных которые меняються по мере обновления.
4. При выборе в combo box названия, присвоить это название шейпу, а другие данные этого названия присвоить ему-же к которым можно в последствие программно обратиться.
5. Подсчитать сколько и каких шейпов, до шейпа с определенным типом, соединено с данным шейпом.

Дано:
есть шейп с типом "усилитель", он соединен кабелем у которого тип "кабель", с распределительной коробкой у которой тип "коробка" и четыре направления, дальше он соединен кабелем у которого тип "кабель" с распределительной коробкой у которой тип "коробка" и два направления и опять шейп с типом "усилитель"
тип "усилитель" имеет две точки соединения "УсилительВход" и "УсилительВвыход"
тип "коробка" с четырмя направлениями имеет 5 точек соединения "КоробкаВход","Квых1","Квых2","Квых3","Квых4"


получаеться схема из типов такая: "УсилительВвыход" --> "кабель" --> "КоробкаВход" --> "Квых1" --> "кабель" --> "УсилительВход"

У каждой точки соединения есть параметры которые учитываються при подсчете
"УсилительВвыход" имеет параметр 20
"кабель" имеет параметр 10
"Квых1" имеет параметр 4

Нужно:

Сложить все параметры (может быть несколько параметров) точек соединения между шейпами от тип "Усилитель" до типа "усилитель", т.е на точке "УсилительВход" должно получиться 44


6. При наведении мышки на шейпе, показать определенные данные данного шейпа

Ответить

  Ответы Всего ответов: 1  

Номер ответа: 1
Автор ответа:
 mc-black



ICQ: 308-534-060 

Вопросов: 20
Ответов: 1860
 Web-сайт: mc-black.narod.ru/dzp.htm
 Профиль | | #1
Добавлено: 02.03.09 15:04
Цена вопроса и сроки? Если надо сделать, свяжитесь со мной: mc-black[собака]yandex[точка]ru

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам