这个功能实现起来其实也很简单，就是通过反射去读取 DescriptionAttribute 的 Description 属性的值，代码如下所示：
站在用户的角度思考问题，与客户深入沟通，找到市北网站设计与市北网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：做网站、网站设计、企业官网、英文网站、手机端网站、网站推广、主机域名、网页空间、企业邮箱。业务覆盖市北地区。
/// summary
/// 返回枚举项的描述信息。
/// /summary
/// param name="value"要获取描述信息的枚举项。/param
/// returns枚举想的描述信息。/returns
public static string GetDescription(Enum value)
{
Type enumType = value.GetType();
// 获取枚举常数名称。
string name = Enum.GetName(enumType, value);
if (name != null)
{
// 获取枚举字段。
FieldInfo fieldInfo = enumType.GetField(name);
if (fieldInfo != null)
{
// 获取描述的属性。
DescriptionAttribute attr = Attribute.GetCustomAttribute(fieldInfo,
typeof(DescriptionAttribute), false) as DescriptionAttribute;
if (attr != null)
{
return attr.Description;
}
}
}
return null;
}
这段代码还是很容易看懂的，这里取得枚举常数的名称使用的是 Enum.GetName() 而不是 ToString()，因为前者更快，而且对于不是枚举常数的值会返回 null，不用进行额外的反射。
当然，这段代码仅是一个简单的示例，接下来会进行更详细的分析。
我找到了这样一段处理方法，希望对你有所帮助：
枚举类型如下：
Public Enum ConcertCode
BEIJING
SHANGHAI
GUANGZHOU
End Enum
如果要将比如“beijing”字符串转换为ConcertCode.BEIJING的话，可以通过如下方法：
Dim c As ConcertCode = CType(Enum.Parse(Type.GetType(ConcertCode),字符串的变量,True), ConcertCode)
Enum Week
周日 = 0
周一 = 1
周二 = 2
周三 = 3
周四 = 4
周五 = 5
周六 = 6
End Enum
Sub Main()
Dim myType As Type = GetType(Week)
MsgBox(Week.GetName(myType, Week.周二))
End Sub
枚举的值只能是整数，但是枚举常量的名字本身就是字符串啊，举例：
Private Enum weekdays
星期日 = 0
星期一
星期二
星期三
End Enum
然后：
MsgBox(weekdays.星期日) '显示0
MsgBox(weekdays.星期日.ToString) '显示星期日
为什么增加的回答这么久还没显示。
我想知道你为什么要枚举这些方法，是需要打印出来还是只是为了查看和调用？
1，如果只是为了查看和调用的话，不需要用代码就能知道了。
打开VS，视图－》对象浏览器。然后开了后，点浏览右边的“。。。”，开了后。选COM活页，再在里面选ThunderAgent 1.0 Type Library。再点添加。
添加好之后。在左边的浏览窗口内就有了，展开THUNDERAGENTLib下面有几个类和接口，展开类就有方法了。
2，如果是需要用代码枚举并打印。网上有相关的代码，C#写的。我就不帖了。自己搜一下。改成vb.net相信应该不会太难。
祝你好运。
SQL通常是通过外键。
创建一个状态表包含一个状态栏，存储几个固定的状态。
然后添加到这个表的外键约束。
ALTER TABLE表名WITH CHECK ADD CONSTRAINT fk_status FOREIGN KEY（[状态]）
[状态]（[状态]）