Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Синтаксис Property Let с индексом ? / 3 сообщений из 3, страница 1 из 1
15.06.2005, 16:32:05
    #33117842
Worobjoff
Worobjoff
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Синтаксис Property Let с индексом ?
Не нашел как сделать это:
Код: plaintext
1.
2.
Public Property Get TabsKey(ByVal Index As Long) As String

End Property
для Proerty Let

Честно скажу, не видел в справочнике по VB такое объявление свойства,
но если можно так записать свойство для чтения, то наверно должно быть и для записи.
А вот какой синтаксис?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.06.2005, 16:46:48
    #33117889
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Синтаксис Property Let с индексом ?
вот тебе пример из работающего приложения:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Public Property Get CommandValue(ByVal CommandIndex As Integer) As String
    If CommandIndex > LVW.ListItems.Count Then Exit Property
    CommandValue = LVW.ListItems.Item(CommandIndex).SubItems( 3 )
End Property

Public Property Let CommandValue(ByVal CommandIndex As Integer, ByVal Value As String)
    If CommandIndex > LVW.ListItems.Count Then Exit Property
    LVW.ListItems.Item(CommandIndex).SubItems( 3 ) = Value
End Property
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.06.2005, 17:09:20
    #33117955
Worobjoff
Worobjoff
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Синтаксис Property Let с индексом ?
Спсибо за быстрый ответ, проверил, работает!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Синтаксис Property Let с индексом ? / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 368ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2167620]:
 0ms
get settings:
 6ms
get forum list:
 11ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 97ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 43ms
get tp. blocked users:
 1ms
others: 192ms
total:  368ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]