| Вопрос: Классы в ВБ | Добавлено: 28.04.06 12:20 |
Автор вопроса:  Billi Gates | ICQ: 242-026-281 |
|
Стыдно мне, не знаю зачем нужны class в vb??? И что с ними можно сделать, пожалуйста, объясните мне!!! И если есть учебник или статья по использованию и созданию классов, где взять подскажите!!! Help-help-help!!!
P.S. В поиске на vbnet нет такой темы!!! (Специально для LeX) :) |
| Ответы | Всего ответов: 3 |
|
Номер ответа: 1 Автор ответа:  HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #1 | Добавлено: 28.04.06 14:32 |
| http://www.yandex.ru/yandsearch?rpt=rad&text=VB+%D7%F2%EE+%F2%E0%EA%EE%E5+%EA%EB%E0%F1%F1%FB | ||
|
Номер ответа: 2 Автор ответа: Neco ICQ: 247906854 Вопросов: 133 Ответов: 882 |
Web-сайт: Профиль | | #2 | Добавлено: 28.04.06 19:33 |
|
Вот это ты кроме как классами не реализуешь:
Option Explicit
Public name As String Public surname As String Public father As clsHuman Public mother As clsHuman ' можно засунуть все родственные связи, в принципе Public Function GetFatherName() As String If father Is Nothing Then Exit Function GetFatherName = father.name End Function Public Function SurnameOfParentsIsEqual() As Boolean If father Is Nothing Or mother Is Nothing Then Exit Function SurnameOfParentsIsEqual = (father.surname = mother.surname) End Function Ну или реализуешь, но руку тебе после этого пожимать перестанут. 
|
||
|
Номер ответа: 3 Автор ответа: NecoICQ: 247906854 Вопросов: 133 Ответов: 882 |
Web-сайт: Профиль | | #3 | Добавлено: 28.04.06 19:38 |
|
Совсем забыл пояснить. Это надо вставить в файл clsHuman и потом можешь проверить этот код:
Private Sub Form_Load()
Dim man As clsHuman MsgBox (man.father.mother.father.mother.father.father.father.mother.mother.mother.mother.name) End Sub Должно выйти "Ева". P.S. Шучу, не выйдет даже Адама... |
||
Страница: 1 |