ник: akkorn
Всем дня 
Есть некий код . Что-то вроде:
Private Enum MyType
Type1 = 10
Type2 = 20
End Enum
Private Function GetTypeByName(GetNameType As MyType) As String
GetTypeByName = TypeName(GetNameType)
End Function
Private Sub Command1_Click()
MsgBox GetTypeByName(Type1)
End Sub
|
Функция отдает текст "Long", а мне НУЖНО получить "Type1" (текстом Type1).
Предполагаю, что TypeName() является не той функцией, что мне надо. А что надо- нинаю..
Скажите, где я промахнулся? Изрыл инет, ответа нет....
Пасибки :)
