在vb.net中，如何枚舉一個(gè)注冊(cè)的組件其開放的COM類的接口函數(shù)。

為什么增加的回答這么久還沒顯示。

創(chuàng)新互聯(lián)建站是專業(yè)的柯城網(wǎng)站建設(shè)公司，柯城接單;提供成都做網(wǎng)站、成都網(wǎng)站設(shè)計(jì)、成都外貿(mào)網(wǎng)站建設(shè),網(wǎng)頁設(shè)計(jì),網(wǎng)站設(shè)計(jì),建網(wǎng)站,PHP網(wǎng)站建設(shè)等專業(yè)做網(wǎng)站服務(wù);采用PHP框架,可快速的進(jìn)行柯城網(wǎng)站開發(fā)網(wǎng)頁制作和功能擴(kuò)展;專業(yè)做搜索引擎喜愛的網(wǎng)站,專業(yè)的做網(wǎng)站團(tuán)隊(duì),希望更多企業(yè)前來合作!

我想知道你為什么要枚舉這些方法，是需要打印出來還是只是為了查看和調(diào)用？

1，如果只是為了查看和調(diào)用的話，不需要用代碼就能知道了。

打開VS，視圖－》對(duì)象瀏覽器。然后開了后，點(diǎn)瀏覽右邊的“。。?！?，開了后。選COM活頁，再在里面選ThunderAgent 1.0 Type Library。再點(diǎn)添加。

添加好之后。在左邊的瀏覽窗口內(nèi)就有了，展開THUNDERAGENTLib下面有幾個(gè)類和接口，展開類就有方法了。

2，如果是需要用代碼枚舉并打印。網(wǎng)上有相關(guān)的代碼，C#寫的。我就不帖了。自己搜一下。改成vb.net相信應(yīng)該不會(huì)太難。

祝你好運(yùn)。

VB.net如何枚舉字符串？

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

vb.net中如何調(diào)用枚舉中的字符串

沒有辦法直接取枚舉名，只能根據(jù)枚舉值，自己賦值

Private Enum duihuaA As Integer

第一個(gè)

第二個(gè)

第三個(gè)

第四個(gè)

第五個(gè)

第六個(gè)

第七個(gè)

第八個(gè)

End Enum

調(diào)用：

Select case X

case duihuaA.第一個(gè)

Return "第一個(gè)"

case duihuaA.第二個(gè)

Return "第二個(gè)"

..............

VB.NET的枚舉求教解決方法

這個(gè)功能實(shí)現(xiàn)起來其實(shí)也很簡單，就是通過反射去讀取 DescriptionAttribute 的 Description 屬性的值，代碼如下所示：

/// summary

/// 返回枚舉項(xiàng)的描述信息。

/// /summary

/// param name="value"要獲取描述信息的枚舉項(xiàng)。/param

/// returns枚舉想的描述信息。/returns

public static string GetDescription(Enum value)

{

Type enumType = value.GetType();

// 獲取枚舉常數(shù)名稱。

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;

}

這段代碼還是很容易看懂的，這里取得枚舉常數(shù)的名稱使用的是 Enum.GetName() 而不是 ToString()，因?yàn)榍罢吒?，而且?duì)于不是枚舉常數(shù)的值會(huì)返回 null，不用進(jìn)行額外的反射。

當(dāng)然，這段代碼僅是一個(gè)簡單的示例，接下來會(huì)進(jìn)行更詳細(xì)的分析。