All Forums
 Категория Visio
 Форум Вопросы и ответы
 Вопрос по VBA (PropertyGrid)
Author Previous Topic Topic Next Topic  

ukreni

Ukraine
35 Posts
Posted - 03/13/2010 :  09:40:49
Как добавить на форму PropertyGrid?

В references добавил System_Windows_Forms
В Additional Controls ... не могу найти PropertyGrid, а

Dim pg As New PropertyGrid

Set pg = UserForm1.Controls.Add("не знаю что писать")

Tumanov

Russia
1198 Posts
Posted - 03/13/2010 :  11:42:20
В MSDN приводят такой пример:
Dim propertyGrid1 As New PropertyGrid()
propertyGrid1.CommandsVisibleIfAvailable = True
propertyGrid1.Location = New Point(10, 20)
propertyGrid1.Size = New System.Drawing.Size(400, 300)
propertyGrid1.TabIndex = 1
propertyGrid1.Text = "Property Grid"
Me.Controls.Add(propertyGrid1)
Go to Top of Page

ukreni

Ukraine
35 Posts
Posted - 03/17/2010 :  12:11:23
А как этот фрагмент кода переписать под VBA?
Т.к. приведеный не работает в Visio VBA.

Для CommandButton в VBA приведена следующая реализация:

Private Sub UserForm_Activate()
Dim pg As Control

Set pg = Controls.Add("Forms.CommandButton.1")
pg.Left = 18
pg.Top = 50
pg.Width = 175
pg.Height = 20
pg.Caption = "This is fun." & pg.Name
End Sub
Go to Top of Page
  Previous Topic Topic Next Topic  
Данный сайт является архивом форума visio.artberg.ru, который был закрыт в связи с переходом на новую платформу visio.getbb.ru
Все материалы доступны только для чтения! Если у вас появились вопросы, или вы хотите что-то обсудить, связанное с Visio, обращайтесь на новый форум!
Архив был создан благодаря совместным усилиям Генадия Туманова @Tumanov (visio.artberg.ru), Александра ака @Surrogate (visio.getbb.ru), и Николая Белых @nbelyh (unmanagedvisio.com)