Тип cтруктура(Struct)

[Info_m.be_free]

Как в бейсике реализовать сишный тип struct? Я тут помучился и решил спросить совета умных людей. По почкам сильно не бить знаю что здесь не си форум но очень хочется. Может ессь у кого?

[GSerg]

Сам понял, чё сказал?

[Amed]

Используйте модуль класса. (Бейсиковский аналог сишной структуры - класс).

[GSerg]

Amed
Ты отчасти прав, но ты, имхо, внёс ещё большую путаницу в голову Info_m.be_free Таки хотелось бы узнать, что именно он имел в виду.

[Amed]

Я полностью прав

Info_m.be_free нужен аналог struct. Он есть.

[vvs_adm]

To Info_m.be_free

Вот тебе аналог сишной структуры :

Код: Выделить всё

Type MyType
    nFirst As Long
    nSecond As Long
End Type

Dim MyVar as MyType

MyVar.First = 12345
MyVar.Second=67890

[GSerg]

vvs_adm
Теперь переработай свой пример с учётом того, что struct может содержать в себе функции

[Amed]

Вообще-то, не все так плохо.
Привлечь ассемблерные вставки, и функциональность повысится

[tyomitch]

vvs_adm
Теперь переработай свой пример с учётом того, что struct может содержать в себе функции

Легко, и без ассемблерных вставок: http://www.mentalis.org/apilist/2091523 ... 22C72.html (ты ведь знал, что я эту ссылку дам, правда?)
А Amed категорически не прав. Классы самоуничтожаются, а UDT, как и сишные структуры, - нет.

[GSerg]

Дык в личке мы с ним по этому поводу говорили
Но он всё равно

А что ты дашь именно эту ссылку, я даже не догадывался

[Info_m.be_free]

Спасибо большое Всем за внимание но...

GSerg
Я таки сказал, что хочу использовать структуру что-то вроде разнотипного массива еллементов, и чтобы к ним можно было обращаться по индексу и по имени... я их потом буду складывать, сортировать, выводить в treeview и мариновать... вот.
vvs_adm ну не совсем то, с учетом приведенного уточнения надеюсь ясно что не то... или уточните как уточить под то что я заточил плиз...
tyomitch как всегда на высоте..
Нет, я понял это офигительная структура окна, я только не понял как мне это использовать
Amed клевый банан он на целый день отвлек меня от мыслей... так о чем это я? .. ах да, действительно хочу без ассемблерных вставок действительно классом.
_________________________________________
таки да на бейсике это может и неполу'чится... с1разу но Надежду убивают последней... хух выговорился.

[skiperski]

Я таки сказал, что хочу использовать структуру что-то вроде разнотипного массива еллементов, и чтобы к ним можно было обращаться по индексу и по имени... я их потом буду складывать, сортировать, выводить в treeview и мариновать... вот.

Полного аналога в VB нет. Пользовательские типы позволяют структурировать информацию (слышите? -- структура! ) и хранить каждый набор, например в массиве или коллекции, как единый элемент, но в самом типизированном наборе нет доступа к элементу по индексу. К самой коллекции можно обратиться как по индексу, так и по ключу. Классы в коллекции - это вообще супер-пупер, хотя и там к свойствам нельзя обратиться по индексу. Видимо придётся чем-то пожертвовать или делать комбинацию.

таки да на бейсике это может и неполу'чится... с1разу

Таки не то чтобы нет

[Info_m.be_free]

что никак? я вот думал взять несколько массивов для каждого типа данных и имени и потом
srtuct Cstruct(a :"String", b: 2, c:arr());
связать как нибудь так :
arrName__arrString_______arrNum___arrArr
a________ a1="String"____ b1=null___c1=null
b ________a2=null________b2 =2____c2=null
c________ a3=null________b3=null___c3=arr() надеюсь наглядно....

но может все таки найдется готовое решение....
имхо коллекции будут жрать памяти неменьше чем этот оптимизированый изврат...
________________________________________________________
у меня голова заранее болит, я не спал