ATL/COM简单工程

核心提示： STDMETHODIMP CFirst_ATL::AddNumbers(long Num1, long Num2, long *ReturnVal){ // TODO: Add your implementation code here *Ret

STDMETHODIMP CFirst_ATL::AddNumbers(long Num1, 
　　　　　　　　 long Num2, long *ReturnVal)
{
　　 // TODO: Add your implementation code here
　　 *ReturnVal = Num1 + Num2;
　　 return S_OK;
}

第4步：编译DLL

无论你相信与否，你已经拥有一个用ATL编写的COM服务器了！当然，我们还需要编译它。请按下F7键，这样VC++就可以编译了。编译器工作片刻后就会在注册表中注册你的新DLL了，这样一来其它的程序就可以使用它了。让我们来测试一下。

第5步：在Visual Basic中测试COM服务器

那么，先让我们用VB来测试这个COM服务器吧。（如果你没有VB的话，你可以跳过这一节，直接在VC++中测试。）启动VB，并选择“标准EXE（Standard EXE）”建立工程，并在对话框上放置一个命令按钮。现在，我们需要添加COM服务器的引用，请单击“工程（Project）”菜单并选择“引用（References）”，找到“Simple ATL 1.0 Type Library”并选择它。

单击确定（OK）按钮之后，你可以双击先前放置的命令按钮，VB会切换到这个按钮的代码窗口。添加以下的代码：

Private Sub Command1_Click()
　　 Dim objTestATL As SIMPLE_ATLLib.First_ATL
　　 Set objTestATL = New First_ATL
　　 Dim lngReturnValue As Long
　　 objTestATL.AddNumbers 5, 7, lngReturnValue
　　 MsgBox "The value of 5 + 7 is: " & lngReturnValue
　　 Set objTestATL = Nothing
End Sub