Форум пользователей Visio
http://visio.getbb.ru/

MS Visio 2007 (Win XP): тест с полями ввода на изображении
http://visio.getbb.ru/viewtopic.php?f=6&t=1045
Страница 2 из 2

Автор:  AlekseyVisio [ 27 янв 2017, 00:05 ]
Заголовок сообщения:  Re: MS Visio 2007 (Win XP): тест с полями ввода на изображении

Попытался разобраться в информации по ссылке: https://surrogate-tm.github.io/visio-artberg-ru/biblio/st004.htm но пока не удается..

Автор:  AlekseyVisio [ 27 янв 2017, 00:12 ]
Заголовок сообщения:  Re: MS Visio 2007 (Win XP): тест с полями ввода на изображении

Скачал Visio 2007: Software Development Kit. Как понял, он позволяет производить качественные разработки под Visio..

Автор:  AlekseyVisio [ 27 янв 2017, 00:40 ]
Заголовок сообщения:  Re: MS Visio 2007 (Win XP): тест с полями ввода на изображении

Вот дополненный файл, где на Листе2 приведена примерная блок-схема алгоритма.

Вложения:
Test.zip [31.7 Кб]
Скачиваний: 55

Автор:  Tumanov [ 27 янв 2017, 09:03 ]
Заголовок сообщения:  Re: MS Visio 2007 (Win XP): тест с полями ввода на изображении

Пока программы не наблюдается...
Ну, давайте будем начинать постепенно. Тогда с таймером попозже, а для начала нужно просто запустить программу по кнопке.
Для этого создается обработчик события Click и в нем что-то делается. Например, просто вывод сообщения.

Вложения:
butt.gif
butt.gif [ 282.11 Кб | Просмотров: 608 ]

Автор:  Tumanov [ 27 янв 2017, 09:11 ]
Заголовок сообщения:  Re: MS Visio 2007 (Win XP): тест с полями ввода на изображении

Теперь вместо этого MsgBox нужно писать осмысленную программу. Например, обход всех шейпов на активной странице и вывод их текста в окно Immediate
Код:
    For i = 1 To ActivePage.Shapes.Count
        If ActivePage.Shapes(i).Text <> "" Then
            Debug.Print ActivePage.Shapes(i).Text
        End If
    Next

Если нужно фильтровать шейпы, то лучше самому добавить им какой-то признак. Например, создать мастер-шейп, поместить его в Document.Stencil и создавать прямоугольники как копии этого мастер-шейпа. Тогда шейпы на странице можно будет фильтровать по фрагменту имени или по имени мастер-шейпа.

Автор:  Tumanov [ 27 янв 2017, 09:25 ]
Заголовок сообщения:  Re: MS Visio 2007 (Win XP): тест с полями ввода на изображении

Пусть мастер будет называться "Процесс".
Тогда его копии будут называться Процесс, Процесс.2, Процесс.12 и т.д.
Их можно будет выбрать вот так
Код:
Private Sub ToggleButton1_Click()
    For i = 1 To ActivePage.Shapes.Count
        Dim shp As Visio.Shape
        Set shp = ActivePage.Shapes(i)
        If InStr(1, shp.Name, "Процесс") = 1 Then
            Debug.Print shp.Text
        End If
    Next
End Sub

Автор:  Surrogate [ 27 янв 2017, 11:11 ]
Заголовок сообщения:  Re: MS Visio 2007 (Win XP): тест с полями ввода на изображении

AlekseyVisio в сообщении #10584 писал(а):
Скачал Visio 2007: Software Development Kit. Как понял, он позволяет производить качественные разработки под Visio..
Software Development Kit это скорее справочный материал с массой примеров!
Я (как админ) очень люблю продолжительные ветки обсуждения, где все детально разбирается !
Но без оффтопа !
не могу понять какое отношение алгоритм из сообщения
AlekseyVisio в сообщении #10585 писал(а):
на Листе2 приведена примерная блок-схема алгоритма.
Изображение
имеет к данной ветке обсуждения, которая начиналась так
AlekseyVisio в сообщении #10091 писал(а):
Не так давно возникла необходимость создать тест на основе MS Visio. Смысл следующий.
1) Имеется схематическое изображение, содержащее фрагменты, названия которых необходимо запомнить;
2) Необходимо в поле, расположенное рядом с фрагментом, ввести название;
3) Введенное значение должно полностью совпадать с заданным.


!
Лучше разбить задачу на этапы (в отдельных ветках форума, разумеется)
и разбираться с каждый этапом по отдельности!

Автор:  AlekseyVisio [ 28 янв 2017, 00:34 ]
Заголовок сообщения:  Re: MS Visio 2007 (Win XP): тест с полями ввода на изображении

Surrogate писал(а):
Я (как админ) очень люблю продолжительные ветки обсуждения, где все детально разбирается !
Но без оффтопа !
Прошу извинить! Да, я немного поторопился.. Решение, которое было мне подсказано в этой ветке (прописывать формулу в поле FillForegnd), понравилось больше, нежели чем создавать отдельные поля рядом с фрагментами.
Чуть ранее я писал: "Признаться, вчера возникла идея зациклить тест: через каждые n секунд произвольный зеленый прямоугольник (т.е. тот, где верный ответ), сбрасывает свое значение. Так приходится постоянно вводить значения, пока не надоест, либо пока не поймешь, что все запомнил." Именно поэтому на блок-схеме представлен бесконечный цикл, который будет работать, пока пользователь не закроет документ. Не исключаю, что где-то ошибся..

Автор:  AlekseyVisio [ 28 янв 2017, 00:39 ]
Заголовок сообщения:  Re: MS Visio 2007 (Win XP): тест с полями ввода на изображении

О разбиении задачи понял, попробую разделить логически! Вопросы по основным понятиям

Автор:  AlekseyVisio [ 28 янв 2017, 11:36 ]
Заголовок сообщения:  Re: MS Visio 2007 (Win XP): тест с полями ввода на изображении

Уважаемые участники этого обсуждения, благодарю за разъяснения! Я понял (и потренировался):
- как создавать мастер-шейпы,
- как их размещать в Document.Stencil.

Надо изучить рекомендованные материалы.
Дабы не засорять ветку, прошу считать обсуждение закрытым.
Всем спасибо! :D

Страница 2 из 2 Часовой пояс: UTC + 3 часа [ Летнее время ]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/