当然可以，
站在用户的角度思考问题，与客户深入沟通，找到上蔡网站设计与上蔡网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：网站设计制作、网站建设、企业官网、英文网站、手机端网站、网站推广、域名注册、虚拟空间、企业邮箱。业务覆盖上蔡地区。
A已知dll的路径和文件名，但不知里面的类名，只知道里面必定有某类实现了接口I
可以让B设计一个方法，返回这个接口I
这样A的程序里面通过调用B的这个方法，来得到自己需要的接口实现类对象
为什么增加的回答这么久还没显示。
我想知道你为什么要枚举这些方法，是需要打印出来还是只是为了查看和调用？
1，如果只是为了查看和调用的话，不需要用代码就能知道了。
打开VS，视图－》对象浏览器。然后开了后，点浏览右边的“。。。”，开了后。选COM活页，再在里面选ThunderAgent 1.0 Type Library。再点添加。
添加好之后。在左边的浏览窗口内就有了，展开THUNDERAGENTLib下面有几个类和接口，展开类就有方法了。
2，如果是需要用代码枚举并打印。网上有相关的代码，C#写的。我就不帖了。自己搜一下。改成vb.net相信应该不会太难。
祝你好运。
可以的，把项目的类型设成类库，将所有的函数用Public修饰附封装在类里面，生成dll文件。这样别人就可以在别人项目属性的引用页里面添加对你的dll文件的引用，然后导入命名空间，直接使用了。
比如说，在一个项目里：
NameSpace Controller
Public Class ControlMachine
Public Sub Boot()
End Sub
Public Sub Shutdown()
End Sub
End Class
End NameSpace
进入另一个项目的项目属性，进入引用页，添加到那个dll文件的引用。在代码中：
Imports Controller '加在代码文档的最顶端
使用：
Dim controller As New ControlMachine
controller.Boot()
controller.Shutdown()
希望你能了解，不懂再追问
在VB.NET的类里，实现一个接口的语句是：
implements接口名称
例如，下面定义一个车（总称）的接口，这里的车是各种车的总称：
Public Interface ICar
Property color() As String
Property speed() As Long
Sub PrintInfo()
End Interface
然后在不同类型的“车”类里实现它：
Public Class A_Car
Implements ICar
Dim m_color As String, m_speed As Long
Public Property color() As String Implements ICar.color
Get
Return m_color
End Get
Set(ByVal Value As String)
m_color = Value
End Set
End Property
Protected Overrides Sub Finalize()
MsgBox(I was deconstructed!)
End Sub
Public Sub New()
m_color = Red
m_speed = 210
MsgBox(I was constructed!)
End Sub
Public Property speed() As Long Implements ICar.speed
Get
Return m_speed
End Get
Set(ByVal Value As Long)
m_speed = speed
End Set
End Property
Public Sub PrintInfo() Implements ICar.PrintInfo
MsgBox(Color: m_color vbNewLine Speed: m_speed, MsgBoxStyle.Information)
End Sub
End Class
在 Form 的 Load 事件中编写：
Dim myCar As New A_Car
myCar.PrintInfo()
运行之后就创建了一个 A_Car 类的实例 myCar，然后出现两个对话框，分别说明实例已经创建和汽车的信息。当窗体卸载时，这个类的实例 myCar 将自动销毁，这时将出现一个“I was deconstructed!”的对话框。
声明一个接口时,需要考虑以下几点：
1.接口主体只限于对方法,索引器以及属性的声明；
2.接口成员是隐式公开的,如果对其显式指定访问级别,就会出现编译器错误；
3.接口中不能包含字段,构造函数和常量等；
4.在接口中不能实现任何方法,属性或者索引器；
5.在指定方法时,只需要给出返回类型,名称和参数列表,然后分号结束。
面向对象的接口
在C++中，一个类被允许继承多个类。但是在Java以后的语言不被允许。
这样，如果想继承多个类时便非常困难。所以开发方想出了新办法：接口。
一个接口内，允许包含变量、常量等一个类所包含的基本内容。但是，接口中的函数不允许设定代码，也就意味着不能把程序入口放到接口里。由上可以理解到，接口是专门被继承的。接口存在的意义也是被继承。和C++里的抽象类里的纯虚函数是相同的。不能被实例化。
定义接口的关键字是interface，例如：
publicinterfaceMyInterface{
public void add(int x,int y);
public void volume(int x,int y,int z);
}
继承接口的关键字是implements，相当于继承类的extends。
需要注意的是，当继承一个接口时，接口里的所有函数必须全部被覆盖。例如：
class Demo implements MyInterface{
public void add(int x,int y){
System.out.println( +(x+y));
}
public void volume(int x,int y,int z){
System.out.println( +(x*y*z));
}
public static void main(String args[]){
Demo d=new Demo();
d.add(10,20);
d.volume(10,10,10);
}
}
输出结果：
30
1000
当想继承多个类时，开发程序不允许，报错。这样就要用到接口。因为接口允许多重继承(,)，而类不允许。所以就要用到接口。
Case 4 '支付宝支付
Dim cmd, subject, body, order_no, prices, rurl, types, number, transport, ordinary_fee, express_fee, readonlytrue, buyer_msg, buyer, buyer_name, buyer_address, buyer_zipcode, buyer_tel, buyer_mobile, partner As String
Dim t1, t2, t3, t4, t5 As String
Dim AlipayObj, itemUrl As String
t1 = ":" '支付接口
t2 = ConfigurationSettings.AppSettings("adminaliPay") '商户支付宝账户（改成你自己的）
t3 = "m7yeav29bcdz14szvi2rbfcixywob59y" '安全校验码
cmd = "0001" '命令码
subject = "订单号:" NoID '商品名称
body = Convert.ToString(ViewState("CourseName")) '商品描述
order_no = NoID '商户订单号
prices = Convert.ToString(ViewState("NowPrice")) '商品单价
rurl = Request.Url.ToString() '商品展示网址
types = "1" '支付类型 1:商品购买,2:服务购买,3:网络拍卖,4:捐赠
number = "1" '购买数量
transport = "3" '发货方式 1:平邮,2:快递,3:虚拟物品
ordinary_fee = "0" '平邮运费
express_fee = "0" '快递运费
readonlytrue = "true" '交易信息是否只读,true或false,默认值为false
buyer_msg = "" '买家给卖家的留言:string(200)
'buyer = Convert.ToString(ViewState("txtIDEmail")) '买家Email
buyer_name = Convert.ToString(ViewState("txtIDName")) "，Email:" Convert.ToString(ViewState("txtIDEmail")) '买家姓名,买家Email
buyer_address = Convert.ToString(ViewState("txtIDaddress")) '买家地址
buyer_zipcode = Convert.ToString(ViewState("txtIDPost")) '买家邮编
buyer_tel = Convert.ToString(ViewState("txtIDtelephone")) '买家电话号码
buyer_mobile = Convert.ToString(ViewState("txtIDTel")) '买家手机号码
partner = "" '合作伙伴ID（保留字段）
itemUrl = creatAlipayItemURL(t1, t2, t3, t4, t5, cmd, subject, body, order_no, prices, rurl, types, number, transport, ordinary_fee, express_fee, readonlytrue, buyer_msg, buyer, buyer_name, buyer_address, buyer_zipcode, buyer_tel, buyer_mobile, partner)
itemUrl = "script language=javascript" vbCrLf "!--" vbCrLf "document.forms[0].submit();" vbCrLf "//--" vbCrLf "/script"
Response.Write(itemUrl)
End Select
重庆分公司
重庆分公司
