Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question'Dans le module Public Type dataname name As String SurName As String Othername As String End Type 'Dans la classe Private Sub mymethode(Namesdetails As dataname) End Sub
'Dans le module
Public Type dataname
name As String
SurName As String
Othername As String
End Type
'Dans la classe
Private
Sub mymethode(Namesdetails As dataname)
End Sub
en net pas de problème...Pas d'accord!!
Public Structure namedata Public family As String Public surname As String Public othername As String End Structure
Public Class Sevenseg Public Sub shownames(ByVal mynames As namedata) MsgBox(mynames.family & mynames.surname & mynames.othername) End Sub
Module Module1 Public Structure namedata Public family As String Public surname As String Public othername As String End Structure End Module
Public Class Form1 Public Sub shownames(ByVal mynames As namedata) MsgBox(mynames.family & mynames.surname & mynames.othername) End Sub End Class
Module Module1 Public Structure namedata Public family As String Public surname As String Public othername As String End Structure End Module
Public Structure namedata Public family As String Public surname As String Public othername As String End Structure Module Module1 End Module