實現在VBA我自己的界面 - 錯誤：對象模塊需要實現「X」的界面「Y」

Question

如何實現我的ClsInterface類，它有這樣的代碼：

Public Function add(x As Integer, y As Integer) As Integer 
End Function 

我 Class2類

，其中有這樣的代碼：

Implements ClsInterface 

Public Function add(x As Integer, y As Integer) As Integer 
add = x + y 
End Function 

我的測試代碼

Public Sub test() 
Dim obj As New Class2 
MsgBox obj.add(5, 2) 
End Sub 

這總是出現與以下錯誤：

Microsoft Visual Basic
Compile error:

Object module needs to implement 'add' for interface 'ClsInterface'
OK/Help

但沒有幫助的Microsoft幫助（當我按下幫助按鈕時）。

任何想法？

Answer 1

您的Class2必須看起來像;

Implements ClsInterface 

Private Function ClsInterface_add(x As Integer, y As Integer) As Integer 
add = x + y 
End Function 

（簽出下拉框在Class2中的代碼窗口的頂部，你可以看到你可以參考一下基本對象;類或ClsInterface）

在你希望你的測試代碼;

Dim obj As New ClsInterface 

如果您想通過接口進行呼叫。

（我也建議形式ISomeDescription命名intefaces和使用設置，而不是作爲新）