Apportez la correction de ce code ci-dessous

[cheidly]

Ce code vb6.0 permet de transférer les types des données dans les textes boxes, j'ai besoin du corrigé en cas d'Erreur de compilation: Attendu: Expression

Code :

1
2
3
4
5
Private Sub Command2_Click()
  If Value.Is(In.Text1.Text2.Text3.Text4) Then
     Value.Transfer
  End If
End Sub

[ProgElecT]

Salut cheidly

Pour ma part, je doute que ce code soit du VB6.0 (utilisation de In pour des composants ?)
Es tu sûr de programmer en VB6 et non en VBA, sinon vois ce lien, Comment savoir si l'on utilise VBA ou VB6 ?