Bonjour,

J'ai ce code ci-dessous.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Public Interface ITestable
 
    Function functionToImplement() As String
 
End Interface
 
Public Class TestFactory
    Public Shared Function build() As ITestable
        Return New Test
    End Function
End Class
 
Public Class Test
    Implements ITestable
 
    Public Function otherFunction() As String
        Return ""
    End Function
 
    Public Function functionToImplement() As String Implements ITestable.functionToImplement
        Return ""
    End Function
End Class

J'ai donc une interface ITestable avec la fonction functionToImplement à implémenter.
La classe Test implémente cette interface et j'ai une classe TestFactory pour l'instancier.
La question se situe sur l'exécution de ce code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Dim un_test As ITestable = TestFactory.build()
Dim retour As String = un_test.OtherFunction()
Une erreur se présente : OtherFunction n'est pas un membre de ITestable.
J'avoue ne pas comprendre: j'implémente une méthode propre à la classe Test (A moins que ma classe Test soit un objet de type ITestable et OtherFunction doit donc être déclarer dans l'interface).

Merci