你目前正处于脱机状态,正在等待 Internet 重新连接

如何使用 ActiveX 组件,在 Visual Basic.net 中或 Visual Basic 2005 中

注意:这篇文章是由无人工介入的微软自动的机器翻译软件翻译完成。微软很高兴能同时提供给您由人工翻译的和由机器翻译的文章, 以使您能使用您的语言访问所有的知识库文章。然而由机器翻译的文章并不总是完美的。它可能存在词汇,语法或文法的问题,就像是一个外国人在说中文时总是可能犯这样的错误。虽然我们经常升级机器翻译软件以提高翻译质量,但是我们不保证机器翻译的正确度,也不对由于内容的误译或者客户对它的错误使用所引起的任何直接的, 或间接的可能的问题负责。

点击这里察看该文章的英文版: 315847
概要
本文演示如何通过使用 Visual Basic 2005 中使用 ActiveX 部件从通过使用 Visual Basic.net 的 Visual Studio.net 内或在 Visual Studio 2005 中。

back to the top

要求

下面的列表概述了建议的硬件、 软件、 网络的基础结构和服务包,您需要:
  • Visual Basic.net 或 Visual Basic 2005
本文假定您熟悉下列主题:
  • Visual Basic.net 或 Visual Basic 2005
  • ActiveX
back to the top

使用 Visual Studio.net 中或从 Visual Studio 2005 的 ActiveX 组件

通过使用 Microsoft.net 框架组件对象模型 (COM) 互操作性层 (或 COM 互操作),您可以使用从 Microsoft Visual Studio.net 或 Microsoft Visual Studio 2005 的代码中的 ActiveX 组件。与 Visual Studio.net 或 Visual Studio 2005,您可以方便地访问和使用 ActiveX 组件。

: 本文使用一个简单的 ActiveX 组件命名 MyActiveXComponent 出于演示目的。此组件包含在一个类,MyClass,与单个的方法 添加Add 方法将两个数字相加,并返回之和。Complete Code Listing for MyActiveXComponent 部分所源代码此组件的请参阅。在这篇文章中技术将应用于任何 ActiveX 组件。
  1. 启动 Visual Studio.net 或 Visual Studio 2005。
  2. 在 Visual Basic.net 中或 Visual Basic 2005 中,请创建一个新的控制台应用程序。
  3. 项目 菜单上单击 添加引用
  4. 添加引用 对话框中单击 COM 选项卡中按字母顺序排列的 ListView 控件列表进行排序的所有在本地计算机上注册的 ActiveX 组件的通知。
  5. ListView 控件中单击 MyActiveXComponent 并单击 选择,然后单击 确定。visual Studio.net 或 Visual Studio 2005 会自动创建 ActiveX 组件的包装类。您现在可以使用此 ActiveX 组件,就好像这是一个本机.net 组件。

    注意在 Visual 有关 Studio 的 2005 年没有单击 选择
  6. Module1.vb 代码窗口中将下面的代码添加到 Sub Main 过程:
    Dim myActiveX As MyActiveXComponent.MyClassmyActiveX = New MyActiveXComponent.MyClass()Dim mySum As IntegermySum = myActiveX.Add(1, 2)Console.Write("1 + 2 = " & CStr(mySum))Console.ReadLine()						
    此代码声明并创建 ActiveX 组件的实例。然后该代码调用 Add 方法,并在控制台窗口中显示总和。
  7. 调试 菜单上单击 $ 开始 以测试应用程序。在控制台窗口中将显示以下输出:
    1 + 2 = 3						
back to the top

完成 Visual Basic.net 代码列表

Option Explicit OnOption Strict OnModule Module1	Sub Main()		Dim myActiveX As MyActiveXComponent.MyClass   	myActiveX = New MyActiveXComponent.MyClass()   	Dim mySum As Integer   	mySum = myActiveX.Add(1, 2)   	Console.Write("1 + 2 = " & CStr(mySum))   	Console.ReadLine()		End SubEnd Module				
back to the top

完成 MyActiveXComponent 有关代码列表

'Sample ActiveX Component Source Code'Written in Visual Basic 6.0''Project Name: MyActiveXComponent'Project Type: ActiveX DLL'File Name: MyActiveXComponent.dll''Class Name: MyClassOption ExplicitPublic Function Add(ByVal Num1 As Long, ByVal Num2 As Long) As Long  Add = Num1 + Num2End Function				
back to the top

故障排除

与任何其他 COM 组件一样,您必须注册 ActiveX 组件之前,您可以使用它们。请确保使用工具 (如 Regsvr32.exe 注册 MyActiveXComponent。

back to the top
参考
有关详细的信息,请参阅以下 Microsoft 网站来:
若要使用基于 COM 的应用程序交互使用包装.net 互操作: 获取 Microsoft.net 的准备工作
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnmag01/html/INTEROP.asp

使用 Visual Studio.net 中的 Windows 窗体中使用 ActiveX 控件
http://msdn2.microsoft.com/en-us/library/ms973200.aspx
back to the top

警告:本文已自动翻译

属性

文章 ID:315847 - 上次审阅时间:11/27/2007 02:31:18 - 修订版本: 3.6

Microsoft Visual .NET 2002 标准版, Microsoft Visual Basic .NET 2003 标准版, Microsoft Visual Basic 2005

  • kbmt kbvs2005swept kbvs2005applies kbhowtomaster KB315847 KbMtzh
反馈
ement('meta');m.name='ms.dqp0';m.content='true';document.getElementsByTagName('head')[0].appendChild(m);" onload="var m=document.createElement('meta');m.name='ms.dqp0';m.content='false';document.getElementsByTagName('head')[0].appendChild(m);" src="http://c1.microsoft.com/c.gif?">